|
|
Set objUser = GetObject _
("LDAP://localhost:51008/xxxxxxxxxxxxxxxxxxxxxxxxxx")
objUser.Put "KeyValueString", "true"
objUser.SetInfo
'===================================================================================================================
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colServices = objWMIService.ExecQuery _
("Select * from Win32_Service Where Name = 'Service")
For each objService in colServices
objService.StopService()
Next
I want to restart a service after I input this keyvalue in ADAM in the same
script. But its terminates before it reaches strComputer"."
any idea?
|
|
|