vbscript - vbs msiexec /x コーディングが正しくありません

Question

私はvbsに慣れていません。私はこれのいくつかのバリエーションを試しました。ソフトウェア アップデートをインストールする前に、アンインストールの前提条件を実行しようとしています。これもサイレントアンインストールしたい。これに関する任意の助けをいただければ幸いです。

Set oWMIroot = GetObject("WinMgmts:root/cimv2")
Set oWMIColl = oWMIroot.ExecQuery("Select IdentifyingNumber, Name  FROM Win32_Product") 
  For Each oWMIval In oWMIColl
if oWMIval.Name = "John's MIND" then
 'WScript.Echo oWMIval.Name & " = " & oWMIval.IdentifyingNumber ' this is correct

  Set WshShell = CreateObject("WScript.Shell")
  WshShell.Run "msiexec /x  oWMIval.IdentifyingNumber",1,True

End if
Next

oWMIval.IdentifyingNumber実際のGUIDに置き換えると機能します。ありがとう