批处理之家 - Powered by Discuz! Board

标题: [文件操作] 【已解决】批处理或vbs如何实现弹出对话框/提示框让用户选择是否执行相关操作？ [打印本页]

作者: gd6570 时间: 2016-6-12 23:30 标题: 【已解决】批处理或vbs如何实现弹出对话框/提示框让用户选择是否执行相关操作？

本帖最后由 gd6570 于 2016-6-13 11:08 编辑

我希望实现以下功能:运行程序弹出一个vbs窗口提醒用户，当用户点击确定以后在依次执行若干个操作。当用户单击取消的时候则关闭对话框什么都不做。

功能是批处理实现的，都写好了。
复制代码

作者: 再世情緣 时间: 2016-6-13 00:46

你直接写一个VBS引导bat就好了....

Set Ws = CreateObject("WScript.Shell")
Set Fso = CreateObject("Scripting.FileSystemObject")
bat = "你的批处理名字.bat"
If Not fso.FileExists(bat) Then 
	Msgbox "[ " & bat & " ] 文件不存在，不能继续运行！！" , 0 , "提示"
	Wscript.Quit
End if
bx = Msgbox("是否要继续运行？" , 1 , "提示")
If bx = 1 Then
	Ws.Run bat , 1
End if
Wscript.Quit
复制代码

只是一个例子。。。

欢迎光临批处理之家 (http://www.bathome.net/)