This script will Reinstall Internet Explorer 6. (VBScript)
| 'Runs the Internet Explorer Setup Message = "This script will Reinstall IE6." & 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.Run ("rundll32.exe setupapi,InstallHinfSection DefaultInstall 132 %windir%\Inf\ie.inf") WScript.Echo "Internet Explorer IE6 reinstalled." & vbCr & "This scrip was download from www.paulsxp.com." End If |