Замечено, что "лучше" отрабатывают скрипты на vb нежели "извращения с запуском через cmd
Пример MyChatAD.vbs (заодно с автозапуском на пользователя)
Код: Выделить всёSet fso = WScript.CreateObject("Scripting.FileSystemObject")
Set WshShell = CreateObject("WScript.Shell")
USERDNSDOMAIN = WshShell.ExpandEnvironmentStrings("%USERDNSDOMAIN%")
IP = "192.168.0.1"
Port = "2005"
ServerPassword = ""
ServerSSL = "yes"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\MyChat Client\Domain", USERDNSDOMAIN, "REG_SZ"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\MyChat Client\IP", IP, "REG_SZ"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\MyChat Client\Port", Port, "REG_SZ"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\MyChat Client\ServerPassword", ServerPassword, "REG_SZ"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\MyChat Client\ServerSSL", ServerSSL, "REG_SZ"
strParam = WshShell.ExpandEnvironmentStrings("%ProgramFiles(x86)%")
If Left(strParam, 1) = "%" then
strParam = WshShell.ExpandEnvironmentStrings("%ProgramFiles%")
End If
strParam = strParam + "\MyChat Client\mcclient.exe"
WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\MyChat Client", strParam, "REG_SZ"