This script will Block SP3 Update. (VBScript)
| 'Block SP3 Update Dim WSHShell, m, MyBox, p, itemtype, Title Message = "This script will Block SP3 Update." & vbCr & vbCr Message = Message & "Continue?" X = MsgBox(Message, vbYesNo + vbQuestion, "Paul's XP and Vista Tweaks") If X = 6 Then Set WSHShell = WScript.CreateObject("WScript.Shell") p = "HKLM\Software\Policies\Microsoft\Windows\WindowsUpdate\" p = p & "DoNotAllowSP" itemtype = "REG_DWORD" m = 1 WSHShell.RegWrite p, m, itemtype Title = "SP3 Update is now Blocked." & vbCr & vbCr Title = Title & "Ths script was downloaded from www.paulsxp.com." MyBox = MsgBox(Title,64,"Finished") End If |