当前位置: 移动技术网 > IT编程>脚本编程>VBScript > 重新安装ie的一个vbs

重新安装ie的一个vbs

2017年12月08日  | 移动技术网IT编程  | 我要评论

英语六级真题及答案,火山石工艺品,mssql2005

复制代码 代码如下:

'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

如对本文有疑问,请在下面进行留言讨论,广大热心网友会与你互动!! 点击进行留言回复

相关文章:

验证码:
移动技术网