重新安裝ie的一個vbs
更新時間:2009年08月18日 01:54:20 作者:
對于版本有點老,所以建議學(xué)習(xí)使用,不要隨便直接運行。
復(fù)制代碼 代碼如下:
'run_ie_reinstall.vbs - Runs the Internet Explorer Setup
'?Doug Knox - 4/10/2002
'Downloaded from www.dougknox.com
X = MsgBox("Do you want to reinstall Internet Explorer?", vbYesNo, "Prompt!")
Y = MsgBox("Do you want to reinstall Outlook Express?", vbYesNo, "Prompt!")
Set WshShell = WScript.CreateObject("WScript.Shell")
If X = 6 Then
WshShell.RegWrite "HKLM\SOFTWARE\Microsoft\Active Setup\Installed Components\{89820200-ECBD-11cf-8B85-00AA005B4383}\IsInstalled", 0, "REG_DWORD"
End If
If Y = 6 Then
WshShell.RegWrite "HKLM\SOFTWARE\Microsoft\Active Setup\Installed Components\{44BBA840-CC51-11CF-AAFA-00AA00B6015C}\IsInstalled", 0, "REG_DWORD"
End If
If X = 6 OR Y = 6 Then
WshShell.Run ("rundll32.exe setupapi,InstallHinfSection DefaultInstall 132 %windir%\Inf\ie.inf")
Else
MsgBox "You chose not to reinstall IE or OE. No changes were made." & vbCR & vbCR & "Copyright 2003 - Doug Knox",vbOkOnly, "User Cancelled"
End If
相關(guān)文章
用vbs腳本獲取網(wǎng)卡MAC,CPUID,硬盤序列號的實現(xiàn)代碼
這篇文章主要介紹了用vbs腳本獲取網(wǎng)卡MAC,CPUID,硬盤序列號的實現(xiàn)代碼,需要的朋友可以參考下2019-04-04
WMI 創(chuàng)建系統(tǒng)服務(wù)的實現(xiàn)代碼(Automatic)
需要注意的是啟動模式,應(yīng)為“Automatic”,而不是“Auto”2013-07-07
用vbs讀取index.dat內(nèi)容的實現(xiàn)代碼
用vbs讀取index.dat內(nèi)容的實現(xiàn)代碼,需要的朋友可以參考下。2010-11-11
vbscript LoadPicture函數(shù)使用方法與漏洞利用
因為有人說這里L(fēng)oadPicture的代碼有些問題,所以這里給修正下,方便需要的朋友2008-12-12
用vbs實現(xiàn)的一款Worm.Win32.VB.fw病毒專殺
這篇文章主要介紹了用vbs實現(xiàn)的一款Worm.Win32.VB.fw病毒專殺2007-06-06

