AkulaBig
|
Posted: Sat May 16, 2026 23:44 Post subject: |
|
|
| Orion9 wrote: | | Мой скрипт работает |
Пришлось покопаться, но завел ваш скрипт. На vbs он не работает:
А вот на cscript.exe действительно работает. Только убрал коммент с stream.WriteLine "-" & tagName
В общем ваш скрипт, видимо, написан под старый движок vbs. А у меня Винда 11 с последними обновлениями.
Перевод крякозябров я делал:
| Code: |
With CreateObject("ADODB.Stream")
.Charset = "Windows-1251"
.Open
.WriteText objWshExec.StdOut.ReadAll
.Position = 0
.Charset = "UTF-8"
content = .ReadText
End With |
Но с налета привязать к вашему скрипту не получилось.
А теперь очень неприятное. Посмотрите, как отвратительно работает ваш вариант и как отлично мой. При этом вашим скриптом я вывожу только одно поле и без перекодировки. А мой скрипт выводит 35 полей и перекодирует текст. Так что искусственное задание временного интервала, это полное днище:
ваш
мой
 |
|