Тренувальний Міні-контест на УКХРегламент контестаСтатистика контеста
0 Користувачів і 3 Гостей дивляться цю тему.
російською лепече. дякую. шкода нема по-нашинськи.можна було б спробувати до SVX лінк прикрутити =)
Цитата: "SkyLine" post=26167 , для пгт.Ворзель.а зараз працює? в мене не відтворюється. і взагалі на сайті про це не найшов інфи....
, для пгт.Ворзель.
g = "92220" 'код міста з сайту Метеоноваurl = "http://www.meteonova.ua/frc/" & g & ".htm"fName = g&".htm"t1 = "blog_title"p1 = "="&Chr(34)&"frc_text_0"Set req = CreateObject("Msxml2.XMLHttp.6.0")req.open "GET", url, Falsereq.sendIf req.Status = 200 Then CreateObject("Scripting.FileSystemObject").OpenTextFile(fName, 2, true).WriteLine (req.responseText)End IfSet tsLog = CreateObject("Scripting.FileSystemObject").OpenTextFile(fName, 1)Do While Not tsLog.AtEndOfStream LineInFile = tsLog.ReadLine i1 = InStr(1,LineInFile, t1, 1) If i1 <> 0 Then out = out + LineInFile End If i2 = InStr(1,LineInFile, p1, 1) If i2 <> 0 Then out = out + Replace(LineInFile," none;", "non;")End IfLoopCreateObject("Scripting.FileSystemObject").OpenTextFile(fName, 2, true).WriteLine (out)CreateObject("WScript.Shell").Run fName
wget -q -U Mozilla -O output.mp3 "http://translate.google.com/translate_tts?ie=UTF-8&client=tw-ob&q=Професор дурень, але радіо має&tl=uk"
російською лепече. дякую. шкода немає української.можна було б спробувати до SVX лінк прикрутити =)
Здравствуйте!! У меня вопрос. FT-7900R будет работать с HRI-200??