VBScript zum deinstallieren eines Windows 7-Anwendung

Ich bin versucht zu schreiben, ein script zu deinstallieren ein Programm, wenn es ausgeführt wird. Das problem ist, dass das Programm nicht genau die gleichen Namen jedes mal, wie es wird eine Versionsnummer angefügt. Es ist trotzdem greifen Sie den Namen des Programms aus einer Liste, vorausgesetzt, es enthält das, was ich Suche? Dann verwenden Sie diesen Namen zum beenden der deinstallation?

Nur die uninstall-Funktion, die ich gefunden habe ist:

strComputer = "." 
Set objWMIService = GetObject("winmgmts:" _ 
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 

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

For Each objSoftware in colSoftware 
    objSoftware.Uninstall() 
Next 

InformationsquelleAutor user856354 | 2011-07-21

Schreibe einen Kommentar