Simple VBScript to restart all VMware services

strComputer = “.”
Set objWMIService = GetObject(“winmgmts:{impersonationLevel=impersonate}!\\”&strComputer&”\root\cimv2”)
Set colListOfServices = objWMIService.ExecQuery(“Select * from win32_Service where Name Like ‘VM%'”)
IntSleep = 15000
For Each objService in colListOfServices
If UCase(Left(, 1)) > “N” then
WScript.Sleep intSleep
strMsg = strMsg & vbCr & & ” Restarted.”
End If

Wscript.Echo strMsg

Sure you can tweak and modify it as you see fit šŸ™‚


Leave a Reply

Fill in your details below or click an icon to log in: Logo

You are commenting using your account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )


Connecting to %s