中国DOS联盟

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

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

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » 论坛回收站 » 帮忙看看这段代码

ntsznc
初级用户

积分 33
发帖 15
注册 2007-1-9
状态离线

『楼主』: 帮忙看看这段代码

:loop
set DD=%date:~0,11%
set TT=%time:~0,11%
echo %DD%%TT%>>F:\copy.log
copy /y T:\"tester list".txt>>F:\copy.log
if errorlevel 1 goto aa
if errorlevel 0 goto bb
:aa
echo set os = CreateoBject("wscript.shell")>%n%.vbs
echo a=msgbox("网络中断，请检查连接，确认'OK'点击'是'，点'否'退出，请选择!!!",4,"Test Equipment 询问")>>%n%.vbs
echo if a=6 then>>%n%.vbs
echo os.run "f:\copy002.bat">>%n%.vbs
echo end if>>%n%.vbs
echo createobject^("scripting.filesystemobject"^).deletefile wscript.scriptname>>%n%.vbs
start %n%.vbs
:bb
ping -n 5 127.1>>f:\ping.log&&goto loop

在debug过程中一直弹出对话框 “网络中断，请检查连接，确认'OK'点击'是'，点'否'退出，请选择”，a=6才能执行下句。不知道为什么？？？？？

请帮忙检查。

2010-1-27 11:16