: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才能执行下句。不知道为什么?????
请帮忙检查。
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才能执行下句。不知道为什么?????
请帮忙检查。
