Vipre Troubleshooting Notes Service Change User Name Password VBScript VBS

In Knowledge Base Blog by angeladmin

regsvr32 /u msxml4.dll

regsvr32 msxml4.dll

net stop sbamsvc

net start sbamsvc

set path=%path%;%programfiles%Windows Resource KitsTools

subinacl /subdirectories “C:Documents and SettingsAll UsersApplication DataSunbeltAntiMalware” > c:loginfo.txt

strComputer = “.”
Set objWMIService = GetObject(“winmgmts:” & strComputer & “rootcimv2”)

Set colServiceList = objWMIService.ExecQuery(“Select * from Win32_Service where Name = ‘sbamsvc'”)

For Each objService in colServiceList
If objService.State = “Running” Then
objService.StopService()
Wscript.Sleep 5000
End If
ErrReturn = objService.Change( , , , , , ,”.administrator”, “password”)
objService.StartService()
Next

Angel Computers – Contact Us