Как я могу выполнить код VBScript из JScript?

Question

Я пытаюсь запустить код VBS из JScript (файл .js). Это мой код:

scr = new ActiveXObject("MSScriptControl.ScriptControl"); 
s = "Sub T: MsgBox \"Hello World!\" ,1+48, \"Greet\": End Sub"; 
scr.Language = "VBScript"; 
scr.AddCode (s); 
scr.Run ("T"); 

Это прекрасно работает на Windows XP 32 бит, но выдает ошибку на Windows 10 64 бит: Automation server could not create object (800A01AD)

Что я делаю неправильно?

Answer 1

Вы также можете выполнить код VBScript с JScript, если ваш файл сценария имеет расширение .wsf. Код VBScript становится легче читать таким образом.

<job> 
<script language="vbscript"> 
Sub T 
    MsgBox "Hello World!", 1+48, "Greet" 
End Sub 
</script> 
<script> 
T 
</script> 
</job>