Тема: JS: Изменить имя входа в систему на удаленном компьютере
Здравствуйте, появилась проблемка со сменой Winlogon на удаленных компьютерах.
Написал вот такой скрипт на .vbs, его можно запустить из cmd и передать параметр, например,
c:\1.vbs Logon1
Сам код:
'Передача из CMD
Dim Arg
Set Arg=Wscript.Arguments
Dim sComp
sComp = ""
If Arg.Count>=1 Then ' имеется переданный параметр
StUser = Arg(0)
else
StUser = InputBox("Введите имя подключаемого компьютера", "Настройка запуска ""Offer Remote Assistance""")
End IF
dim WSHShell, stRegKey, objItem, intRetCode
Set WSHShell = CreateObject("WScript.Shell")
stRegKey = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\" 'reestr
'StUser = InputBox("Tell me login," & vbCrLf & vbCrLf & "Example - GilmullinRR", "Set Last logged on", "username") 'name
'StDomain = InputBox("Tell me name - domain for logon," & vbCrLf & vbCrLf & "Example - Mechel", "Set Logon Domain", "Mechel") 'domain
StDomain= "Mechel"
wshShell.RegWrite stRegKey & "DefaultDomainName", StDomain, "REG_SZ"
wshShell.RegWrite stRegKey & "DefaultUserName", StUser, "REG_SZ"
wshShell.RegWrite stRegKey & "AltDefaultDomainName", StDomain, "REG_SZ"
wshShell.RegWrite stRegKey & "AltDefaultUserName", StUser, "REG_SZ"
wshShell.RegWrite stRegKey & "AutoAdminLogon", "0", "REG_SZ"
Как можно реализовать его запуск на удаленном компьютере через JS?
Пробовал следующее:
function RemoteAdm_WinLogon ()
{
var hostWL = ComputerName.value;
var valueWL = ValueWinLogon.value;
var logon = logonValue.value;
var pass = passValue.value;
var shell = new ActiveXObject("WScript.Shell");
shell.Run('PsExec.exe '+"-u"+' '+logonValue+' '+"-p"+' '+passValue+' '+hostWL+' '+"%windir%\\system32\\cscript.exe"+' '+"\\10.2.10.93\\c$\\1.vbs"+' '+valueWL+'');
}
Помогите с данной проблемой пожалуйста.