This script will Disable Windows XP AutoUpdate. (VBScript)

'Disable Windows Update
Dim WSHShell, MyBox, Title

Message = "This script will Disable Automatic Updates." & 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 "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\WindowsUpdate\DisableWindowsUpdateAccess", 1, "REG_DWORD"
WshShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoWindowsUpdate", 1, "REG_DWORD"

Title = "Windows Automatic Updates are now Disabled!" &vbCr &vbCr
Title = Title & "This script was download from www.paulsxp.com"
MyBox = MsgBox(Title,48,"Finished")
End If

Download


Back to Line 7