Как вывести кириллический текст методом Popup в VBS

Я пытаюсь показать кириллицу перед открытием файла HTA через .VBS

CreateObject("Wscript.Shell").Popup "Пожалуйста подождите...", 1

Но текст отображается в неправильной кодировке

Как я могу установить правильный?

пс. и как добавить новую строку типа \n ?


vbscript wsh
person stckvrw    schedule 15.07.2018    source источник

Ответы (1)


arrow_upward
2
arrow_downward

Сохраните скрипт в формате Unicode (UTF-16 с прямым порядком байтов), и текст должен отображаться нормально.

Что касается новых строк, VBScript не поддерживает управляющие последовательности, но вы можете объединить константу vbNewLine в строку:

Set sh = CreateObject("WScript.Shell")
sh.Popup "Пожалуйста" & vbNewLine & "подождите...", 1
person Ansgar Wiechers    schedule 15.07.2018
comment
Мой файл .VBS уже находится в кодировке UTF-8, но я все еще получаю неправильную кодировку. И я не знаю, как установить UTF-16 в Notepad++. - person stckvrw; 15.07.2018
comment
UTF-8 не будет работать. В Notepad++ выберите в меню Кодирование › Кодировать в UCS-2 LE BOM, затем сохраните файл. - person Ansgar Wiechers; 16.07.2018