level 1
燓冄
楼主
大神们,我写了一个倒计时器,想在倒计时到0时弹出对话框,按对话框“是”就重新倒计时,按“否”则退出。
以下是我写的代码(未完成),可否麻烦你帮我完善或修改一下,谢谢!!
@echo off
title 自己做的倒计时器
color d
echo WScript.Sleep 1000 > %temp%\tmp$$$.vbs
set /a i = 5
:Timeout
if %i% == 0 goto Next
setlocal
set /a i = %i% - 1
cls
echo.
echo.
echo.
echo 现在还剩多少秒
echo.
echo ┌ ┐
echo %i%
echo └ ┘
cscript //nologo %temp%\tmp$$$.vbs
goto Timeout
:Next
cls
for %%f in (%temp%\tmp$$$.vbs) do del %%f
mshta vbscript:msgbox("是否确定?",36)
2016年07月20日 07点07分
1
以下是我写的代码(未完成),可否麻烦你帮我完善或修改一下,谢谢!!
@echo off
title 自己做的倒计时器
color d
echo WScript.Sleep 1000 > %temp%\tmp$$$.vbs
set /a i = 5
:Timeout
if %i% == 0 goto Next
setlocal
set /a i = %i% - 1
cls
echo.
echo.
echo.
echo 现在还剩多少秒
echo.
echo ┌ ┐
echo %i%
echo └ ┘
cscript //nologo %temp%\tmp$$$.vbs
goto Timeout
:Next
cls
for %%f in (%temp%\tmp$$$.vbs) do del %%f
mshta vbscript:msgbox("是否确定?",36)