uninstall program from remote computer

[cuner]

hi
i want to uninstall all cracks and other illegal type programs on client machine how can i do it with vbscript any idea?
thanx

 

[AnonGod]

Pulled this out of a new scripting book...

I'm not sure if the uninstall method works remotely - if not, create a controller object to run the uninstall remotely.

gl -TAG

strComputer = "remotecomputername"
Set objWMIService = GetObject("winmgmts:" _
	& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colSoftware = objWMIService.ExecQuery _
	("SELECT * FROM Win32_Product")
msgbox(colSoftware.count)
str = ""
For Each objSoftware in colSoftware
	'msgbox(objSoftware.Name)
	'If objSoftware.Name = "Napster" Then
	'	objSoftware.Uninstall()
	'End If
Next

[Signature modified by admin request]
-TAG
anongod@hotmail.com
'Drawing on my fine command of language, I said nothing.'

 

[cuner]

not working