On Error Resume Next Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.RegDelete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\MSConfig"