UC知道关于vbs里的MSGBOX命令的问题
来源：百度知道 编辑：UC知道 时间：2024/05/13 03:44:30
求一vbs脚本文件，我是我的vbs脚本:
msgbox,"COM Port setting ERROR!",16+1,"系统提示:"
双击运行后会出现一个标题为系统提示，内容为COM Port setting ERROR!的对话框，并且在对话框里会出现确定和取消两个按钮，我想在用户点击确定后计算机立即重启，点击否后则无任何反应，请问用VBS应如何做？
不好意思，我还想再补充一点，就是我单击否后要运行一个C:\qq.exe程序。
msgbox,"COM Port setting ERROR!",16+1,"系统提示:"
双击运行后会出现一个标题为系统提示，内容为COM Port setting ERROR!的对话框，并且在对话框里会出现确定和取消两个按钮，我想在用户点击确定后计算机立即重启，点击否后则无任何反应，请问用VBS应如何做？
不好意思，我还想再补充一点，就是我单击否后要运行一个C:\qq.exe程序。
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
这要调用系统的API函数，和VB中是一样的，你可以到关于VB的网站上找一下，有完整的关机和重启代码。