This script will Block SP1 Update. (VBScript)
| 'Block SP1 Update On Error Resume Next Dim WSHShell, MyBox, Title Message = "This script will Block SP1 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") WshShell.RegWrite "HKLM\Software\Policies\Microsoft\Windows\WindowsUpdate\DoNotAllowSP", 1, "REG_DWORD" Title = "SP1 Update is now Blocked." & vbCr & vbCr Title = Title & "Ths script was downloaded from www.paulsxp.com." MyBox = MsgBox(Title,64,"Finished") End If |