bat批处理把这个代码其中倒计时结束后关闭窗口,换成倒计时结束弹出对话框,怎么弄。。 40
——————————————————————————————————————————————@ECHOOFF:beginTITLEbat命令倒计时后执行程序COLORAS...
——————————————————————————————————————————————
@ECHO OFF
:begin
TITLE bat命令倒计时后执行程序
COLOR A
SET "vbs=%TEMP%\%date%-VBSScript.vbs"
SET /P "t=请输入您要倒计时的秒数(如10秒,支持输入小数):"
echo 倒计时:%a%
if "%t%"==0"" cls & goto begin
::
::
if exist "%vbs%" del /s /q /f "%vbs%">nul
ECHO On Error Resume Next>>"%vbs%"
ECHO Dim ws,t>>"%vbs%"
ECHO Set ws=Wscript.CreateObject("Wscript.Shell")>>"%vbs%"
ECHO t="%t%">>"%vbs%"
ECHO if IsNumeric(t*1000)^<^>True Then>>"%vbs%"
ECHO MsgBox "您输入的字符有误,应为一个数值,不能输入其他字符.",0+16,"错误">>"%vbs%"
ECHO Set ws=Nothing>>"%vbs%"
ECHO Wscript.CreateObject("Scripting.FileSystemObject").DeleteFile(Wscript.ScriptFullName)>>"%vbs%"
ECHO Wscript.Quit>>"%vbs%"
ECHO End if>>"%vbs%"
ECHO Wscript.Sleep t*1000>>"%vbs%"
ECHO ws.SendKeys "^c">>"%vbs%"
ECHO ws.run "taskkill.exe /f /im cmd.exe",0,True>>"%vbs%"
ECHO Set ws=Nothing>>"%vbs%"
ECHO Wscript.CreateObject("Scripting.FileSystemObject").DeleteFile(Wscript.ScriptFullName)>>"%vbs%"
ECHO Wscript.Quit>>"%vbs%"
::
::
CALL "%vbs%"
cls
ECHO 正在倒计时...
cls & goto begin
——————————————————————————————————————————————
代码为上,我想让他倒计时结束的时候,弹出一个和(ECHO MsgBox "您输入的字符有误,应为一个数值,不能输入其他字符.",0+16,"错误">>"%vbs%" )一样的对话框。。怎么搞。。
只有这么多财富,各位大神拜托了。。 展开
@ECHO OFF
:begin
TITLE bat命令倒计时后执行程序
COLOR A
SET "vbs=%TEMP%\%date%-VBSScript.vbs"
SET /P "t=请输入您要倒计时的秒数(如10秒,支持输入小数):"
echo 倒计时:%a%
if "%t%"==0"" cls & goto begin
::
::
if exist "%vbs%" del /s /q /f "%vbs%">nul
ECHO On Error Resume Next>>"%vbs%"
ECHO Dim ws,t>>"%vbs%"
ECHO Set ws=Wscript.CreateObject("Wscript.Shell")>>"%vbs%"
ECHO t="%t%">>"%vbs%"
ECHO if IsNumeric(t*1000)^<^>True Then>>"%vbs%"
ECHO MsgBox "您输入的字符有误,应为一个数值,不能输入其他字符.",0+16,"错误">>"%vbs%"
ECHO Set ws=Nothing>>"%vbs%"
ECHO Wscript.CreateObject("Scripting.FileSystemObject").DeleteFile(Wscript.ScriptFullName)>>"%vbs%"
ECHO Wscript.Quit>>"%vbs%"
ECHO End if>>"%vbs%"
ECHO Wscript.Sleep t*1000>>"%vbs%"
ECHO ws.SendKeys "^c">>"%vbs%"
ECHO ws.run "taskkill.exe /f /im cmd.exe",0,True>>"%vbs%"
ECHO Set ws=Nothing>>"%vbs%"
ECHO Wscript.CreateObject("Scripting.FileSystemObject").DeleteFile(Wscript.ScriptFullName)>>"%vbs%"
ECHO Wscript.Quit>>"%vbs%"
::
::
CALL "%vbs%"
cls
ECHO 正在倒计时...
cls & goto begin
——————————————————————————————————————————————
代码为上,我想让他倒计时结束的时候,弹出一个和(ECHO MsgBox "您输入的字符有误,应为一个数值,不能输入其他字符.",0+16,"错误">>"%vbs%" )一样的对话框。。怎么搞。。
只有这么多财富,各位大神拜托了。。 展开
2个回答
展开全部
用ping -n 4 127.1 >nul
cls
echo 60
ping -n 2 127.0.0.1>nul
cls
echo 59
............批处理倒计时时如何在当前窗口显示
cls
echo 60
ping -n 2 127.0.0.1>nul
cls
echo 59
............批处理倒计时时如何在当前窗口显示
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询