VBS код выглядит следующим образом:

Set oShell = CreateObject ("Wscript.Shell")
Dim strArgs
strArgs = "cmd /c REG ADD "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\RUN" /v "MyCustomWorkgroupUsername" /t REG_DWORD /d 0"
oShell.Run strArgs, 0, false

Сообщение об ошибке :

Line :3
Char:28 
Error: Expected end of statement 
Code:800A0401
Source: Microsoft VBScript compilation error

1 ответ1

1

Я использовал двойной "вместо одного", и он работает нормально для меня.

Set oShell = CreateObject ("Wscript.Shell")
    Dim strArgs
    strArgs = "cmd /c REG ADD ""HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\RUN"" /v ""MyCustomWorkgroupUsername"" /t REG_DWORD /d 0"
    oShell.Run strArgs, 0, false

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .