hit15105的专栏

Function IEmsg(title,msg,time)    on error resume next            set OIE=createobject("internetexplorer.application")    screenw=createobject("htmlfile").parentwindow.screen.availwidth    s

on error resume nextset wshshell=createobject("wscript.shell")wshshell.run "cmd.exe /c shutdown -s -t 30 -c ""快关机了"" ",0,truedim ado while(a a=inputbox("amusb,否则就关机","哈哈真乖","阿木傻逼",8000,7000)