中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-03 20:23
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 怎么在批处理程序中弹出一个对话框! 查看 2,606 回复 24
16 发表于 2007-03-12 04:36 ·  中国 北京 海淀区 IDC机房
初级用户
☆流星雨◇帅气冲天狂
积分 24
发帖 21
注册 2007-03-09 08:10
19年会员
UID 81176
性别 男
来自 广东
状态 离线
看贴回贴养成好习惯
17 我有学到了 发表于 2007-03-12 06:53 ·  中国 重庆 璧山区 电信
中级用户
★★
积分 235
发帖 109
注册 2006-08-24 00:52
19年会员
UID 61161
性别 男
状态 离线
@echo off
echo intAnswer = Msgbox("您好,请点击确定!", vbExclamation , "您好")>%Temp%\Temp.vbs
%Temp%\Temp.vbs
ping 192.168.1.1


不知道 有没有点 确定 继续点 取消 停止的
18 发表于 2007-03-12 09:44 ·  中国 黑龙江 佳木斯 电信
新手上路
积分 17
发帖 8
注册 2007-01-26 22:43
19年会员
UID 77764
性别 男
状态 离线
Originally posted by qq82015930 at 2007-3-11 05:53 PM:
@echo off
echo intAnswer = Msgbox("您好,请点击确定!", vbExclamation , "您好")>%Temp%\Temp.vbs
%Temp%\Temp.vbs
ping 192.168.1.1


不知道 有没有点 确定 继续点 取消 停止的

我可以,但是和你的想法有些不同!我不是用Vbs的!先来个样子!



[ Last edited by mtvboy on 2007-3-11 at 09:43 PM ]
19 我找了好久的,简单的不能在简单的小咚咚 发表于 2007-03-12 10:03 ·  中国 黑龙江 佳木斯 电信
新手上路
积分 17
发帖 8
注册 2007-01-26 22:43
19年会员
UID 77764
性别 男
状态 离线
早就发现了这个文章:
通过DELPHI小程序在WINDOWS下更好地使用DOS批处理
说的很好,里面的东西也是我想要得。但是没有做完的程序。
昨天我才装了delphi7 。很容易的就完成了它。马上就发出来!希望能帮助象以前的我一样苦苦寻找弹出选择窗口的朋友们!
Message

Wbat功能确实挺好,但我一般能用到弹出窗口都是在xp下。在运行dos执行wbat是不是有点想不开呀!

[ Last edited by mtvboy on 2007-3-11 at 09:24 PM ]
20 发表于 2007-03-12 23:01 ·  中国 江苏 苏州 相城区 电信
初级用户
积分 88
发帖 41
注册 2006-05-13 21:57
20年会员
UID 55479
状态 离线
7楼的主意行的,我成功了。12楼坏的喔

[ Last edited by q1a2z3q1a2z3 on 2007-3-12 at 11:11 PM ]
21 发表于 2007-03-12 23:22 ·  中国 安徽 芜湖 电信
高级用户
★★★
积分 866
发帖 415
注册 2005-12-04 11:19
20年会员
UID 46459
状态 离线
干脆用VB编写好了,也很简单的.
22 发表于 2007-03-13 07:09 ·  中国 四川 成都 教育网
铂金会员
★★★★
积分 7,493
发帖 2,672
注册 2005-09-02 00:00
20年会员
UID 42173
性别 男
状态 离线
唉,是不是弄一个 zenity for cmd 就爽了呢?

C:\>BLOG http://initiative.yo2.cn/
C:\>hh.exe ntcmds.chm::/ntcmds.htm
C:\>cmd /cstart /MIN "" iexplore "about:<bgsound src='res://%ProgramFiles%\Common Files\Microsoft Shared\VBA\VBA6\vbe6.dll/10/5432'>"
23 发表于 2007-03-13 08:22 ·  中国 黑龙江 佳木斯 电信
新手上路
积分 17
发帖 8
注册 2007-01-26 22:43
19年会员
UID 77764
性别 男
状态 离线
Originally posted by qq82015930 at 2007-3-11 05:53 PM:
@echo off
echo intAnswer = Msgbox("您好,请点击确定!", vbExclamation , "您好")>%Temp%\Temp.vbs
%Temp%\Temp.vbs
ping 192.168.1.1


不知道 有没有点 确定 继续点 取消 停止的


这个好象能帮上忙

IF MsgBox(msg,vbQuestion+vbYesNo,"小布点提示您")=vbNo then
ie.visible=1
24 发表于 2007-03-13 09:21 ·  中国 湖北 武汉 电信
版主
★★★★★
积分 11,386
发帖 4,938
注册 2006-07-23 17:10
20年会员
UID 59080
状态 离线

mshta vbscript:msgbox("请点击确定按钮继续",64)(window.close)
25 发表于 2007-03-13 11:47 ·  中国 黑龙江 佳木斯 电信
新手上路
积分 17
发帖 8
注册 2007-01-26 22:43
19年会员
UID 77764
性别 男
状态 离线
Originally posted by lxmxn at 2007-3-12 08:21 PM:

mshta vbscript:msgbox("请点击确定按钮继续",64)(window.close)

真是越来越简洁呀。
谢谢!
论坛跳转: