Set WshShell = CreateObject("WScript.Shell") X = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\HotFix\KB890859\Fix Description") If X = "Windows XP Hotfix - KB890859" Then WshShell.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Uninstall\KB890859\","Needed to prevent Win Update from prompting for this install" Set WshShell = Nothing Message = "Windows Update should no longer prompt" & vbCR Message = Message & "for Hotfix KB890859 to be installed." & vbCR & vbCR MsgBox Message, vbOkOnly, "Finished!" Else Message = "The Registry was checked and it doesn't appear" & vbCR Message = Message & "that Hotfix KB890859 was ever installed." & vbCR Message = Message & "no changes were made to your system." & vbCR & vbCR MsgBox Message, vbInformation, "No changes made!" End If Set WshShell = Nothing