Windows 7アプリケーションをアンインストールするためのVBScript

Question

実行時にプログラムをアンインストールするスクリプトを作成しようとしています。問題は、バージョン番号が添付されるため、プログラムが毎回まったく同じ名前にならないことです。それは私が探しているものが含まれていると仮定して、リストからプログラム名をつかむためにとにかくありますか？その名前を使用してアンインストールを完了しますか？

私が見つけた唯一のアンインストール機能は次のとおりです。

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 

Answer 1

あなたはこのように、パターンと製品名をテストするために、あなたのクエリに代わり=のLIKE演算子を使用することができます。

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