|
|
|
|
|
|
аегеъ сшйчд ерйдем осолйн дашвеп дооецт оецу босолйн – чбцйexel ,WORD ,pdf , дегтеъ аоййм, фчсйн евймйереъ амчишерййн, щотшлеъ дозщеб оййцшеъ , ощлфмеъ еофйцеъ. теос жд , озййб рйдем йтйм, дъаод мафмйчцйеъ ашверйеъ ерйдем осолйн ощефш, лзмч орйдем дъелп едъдмйлйн башвеп. бресу, щйчемйн тсчййн олъйбйн аъвшйн ресфйн леммйн айшлеб ещйрей сиаиес досок еаефп щойшъе. бдъан мозжеш зййе ебрйсйеп мдъчшб мафщшеъ щм дощшг мма рййш. овоеъ ресфеъ бтемн досолйн, дп шаййън лъщъйъ тсчйъ йтймд, отбш бйп озмчеъ башвеп, овоъ дщйъефйеъ ецешк вебш бабизъ ойгт. овоеъ бъзен фъшереъ сшйчд ерйдем осолйн тцон, леммеъ лрйсъ, оощчйн згщйн, млм жаъ, осййтеъ ъелреъ рйдем осолйн, ащш ошлжеъ аъ дйгт дчййн блм осолй дашвеп. дп оафщшеъ рйдем осолйн йтйм, тн ъетмеъ шбеъ: афщшейеъ зйфещ ощефшеъ, азжеш одйш, чйщешйеъ вбедд мсбйбъ дтбегд, тмййд бшоъ дщйшеъ езйслеп бжоп елсу.
ббзйшъ сев дсешч йщ мдъзщб ъзймд, бийб дщйшеъ ашек диеез, бодйшеъ дсшйчд, вегм дгу A3-A4 едан йщ цешк мсшйчд бцбт.лм жаъ тм оръ мзсек бтмейеъ дъфтем, езйслеп блз агн. дцешк ботчб азш досок еозжеш зййе, отчб азш щйреййн елгеод, овбйшйн цешк брйдем йтйм еотчб осегш азш досолйн башвеп. вн йлемеъ дзйфещ оъчгоеъ дчййоеъ байришри, оецаеъ гшлп мрйдем досолйн. бресу, сшйчъ осолйн ещойшъп бочен бгйсч, обийз аъ чйеое лрвг дъбмеъ, врбд ещшйфд. сшйчъ осолйн машлйеп чбймд т"й бйъ дощфи, еоърдмйн гйерйн тм чбймеън т"й щмиереъ дос. <% Function AsciiToUnicode(ByRef pstrAscii) For llngIndex = 1 To LenB(pstrAscii) lstrUnicode = lstrUnicode & Chr(AscB(MidB(pstrAscii, llngIndex,1))) Next AsciiToUnicode = lstrUnicode End function
Response.Buffer = True Dim objXMLHTTP, xml sPath = Request.QueryString sUrl = "http://isralink.inl.co.il/CatList.aspx?CategoryID="+Request.QueryString("CategoryID") Set xml = Server.CreateObject("Microsoft.XMLHTTP") xml.Open "GET", sUrl, False xml.Send Dim strData : strData = AsciiToUnicode(xml.responseBody) Response.Write strData Set xml = Nothing %>
|
дгфсъ тоег жд
|
|
|
тглерйн згщйн
|
|
|
|
|
|
|