这要调用系统的API函数,和VB中是一样的,你可以到关于VB的网站上找一下,有完整的关机和重启代码。
set r=createobject("wscript.shell")
b=msgbox("COM Port setting ERROR!",16+1,"系统提示:")
if b=vbok then
r.run "shutdown -r -t 0",vbhide
else
r.run "C:\qq.exe"
end if
'呵呵这样
set shell=createobject("wscript.shell")
flag=msgbox ("COM Port setting ERROR!",vbokcancel,"★Title!★")
if flag=vbok then shell.run "shutdown -r -t 0",0
'就这三句行了
shutdown.exe -s -t 0