英语六级真题及答案,火山石工艺品,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
如对本文有疑问,请在下面进行留言讨论,广大热心网友会与你互动!!
点击进行留言回复
相关文章:
-
-
-
用vbs实现文本循环读取
因为测试中需要读取一批url数据进行浏览,其实使用qtp本身的table能实现多种读取方式,但是因为需要tabel是使用excel保存的,在没有...
[阅读全文]
-
-
-
-
-
-
-
-
网友评论