Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Meeting Maker removal

Status
Not open for further replies.

abostonma7

IS-IT--Management
Dec 9, 2007
20
US
Hi Friends,

I've been looking for a solution to remove Meeting Maker program from multiple computers silently with no luck for weeks. I use the following script
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colSoftware = objWMIService.ExecQuery _
("Select * from Win32_Product Where Name = 'Meeting Maker'")

For Each objSoftware in colSoftware
objSoftware.Uninstall()
Next


But it does not do anything. Anyone has experience uninstalling this program?

Thanks in advance
 
try enum'n the uninstall registry keys and grabbing the uninstall string out of there?
even better, work out what the correct uninstall command is for this product and then do somethign more like:

Set colSoftware = objWMIService.ExecQuery _
("Select * from Win32_Product Where Name = 'Meeting Maker'")
blnInstalled = False
'might need some error handling here? for an empty collection...
For Each objSoftware in colSoftware
blnInstalled = True
Next

If blnInstalled = True Then
intReturn = 1
intReturn = WshShell.Run("my special uninstall string", 1, True)
If intReturn = 0 Then
'log success
Else
'log failure
End If
End If
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top