Опитвам се да изпълня пакетен файл, който се намира в сървър от vbscript в моята локална система.
Кодът по-долу извежда отказано разрешение при достъп до GETOBJECT
strDomain = "SBICAD"
strComputer = "10.29.83.22"
Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = objSWbemLocator.ConnectServer(strComputer, _
"root\cimv2", _
"ec12345", _
"sorry@1", _
"MS_409", _
"ntlmdomain:" + strDomain)
objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!" & _
"\\" & strComputer & _
"\root\cimv2:Win32_Process")
result = objWMIService.Create("C:\script\checkremote.bat", Null, Null,process)
Msgbox result
WScript.Quit
Има ли все пак да предам моите идентификационни данни за влизане в сървъра на GetObject?
Забележка: Потребителят ec12345 има администраторски права.