延时批处理
2012年01月12日
举个例子，我们要 延时5秒打开gdh.txt这个文件，可以用以下几个方法
方法一：ping
缺点:时间精度为1秒,不够精确
@echo off
@ping 127.0.0.1 -n 6 >nul
start gdh.txt
方法二：vbs start /wait
缺点：生成临时文件
有点：时间精度为0.001秒，精度高
@echo off
echo wscript.sleep 5000>sleep.vbs
start /wait sleep.vbs
start gdh.txt
del /f /s /q sleep.vbs
方法三：vbs cscript.
@echo off
echo wscript.sleep 5000>sleep.vbs
@cscript sleep.vbs >nul
start gdh.txt
del /f /s /q sleep.vbs
方法四：choice
优点：时间精确，CPU占用低，是最佳选择
@echo off
choice /t 5 /d y /n >nul
start gdh.txt
批处理 延时方法小结:
1.ping
@echo off
:loop
echo %time%
ping 127.1 -n 2 1>nul
echo %time%
goto loop
内存使用: cmd.exe 1704k
ping.exe 2920k
误差评定: 较高
优点: 代码构造简单
缺点: 内存占用高，延迟时间长的话误差相对较大。
2.还是ping
@echo off
:loop
echo %time%
ping 1 -n 1 -w 1000 2>nul 1>nul
echo %time%
goto loop
内存使用: cmd.exe 1700k
ping.exe 2912k
误差评定: 一般
优点: 代码构造简单，时间越长误差越小，精确度较高(50ms)
缺点: 内存占用高
3.call
CODE:
@echo off
:loop
echo %time%
call :delay 1000
echo %time%
goto loop
:delay
set /a num=num + 1
if %num% geq %1 (set num=) && goto :eof
rem for /l %%i in (1,1,%1) do echo. >nul
goto :eof
内存使用: cmd.exe 1744k [for语句方案]
cmd.exe 1740k [set+goto方案]
误差评定: 很高 (受CPU频率影响非常大，几乎无法准确把握全局延迟时间)
优点: 精确度较高
缺点: 不适合需精确把握时间的场合
4.msg
CODE:
@echo off
:loop
echo %time%
msg %username% /time:20 /w "正在 延时，点确定可以取消 延时!"
echo %time%
goto loop内存使用: cmd.exe 1752k
msg.exe 2620k
误差评定: 低
优点: 比较稳定，可中途取消 延时，代码构造简单
缺点: 内存占用非常大，有窗口弹出(优点？缺点？)
5.vbs
CODE:
@echo off
echo Wscript.Sleep WScript.Arguments(0) >%tmp%\delay.vbs
:loop
echo %time%
cscript //b //nologo %tmp%\delay.vbs 2000
echo %time%
goto loop
内存使用: cscript.exe 4812k
cmd.exe 1708k
误差评定: 很低
优点: 精确度最高，使用更灵活，方便
缺点: 产生临时文件，内存占用多
@echo off
set /a Start=%time:~6,2%
:ProDelay
set /a Now=%time:~6,2%
set /a Diff=%Now%-%Start%
rem 以下这一句可以防止秒数从59跳到1时产生的错误。
if %Diff% lss 0 set /a Diff=%Diff%+60
if %Diff% leq 2 goto
roDelay
echo ok!
一个取代choice命令的 批处理 (精典)
@echo off && setlocal && cls
:tou
chcp 437 >nul
graftabl 936 >nul
set /p=请选择 [ 回车键 --- 执行A 其它键 --- 执行B ]：nul
echo.&echo.&echo.
if [%errorlevel%]==[13] ( goto :A ) else ( goto :B )
:A
::按回车符到这里执行
echo 这里是标签: A
echo.
goto :End
:B
::按其它键到这里执行
echo 这里是标签: B
echo.
goto :End
:End
:: 用于测试键值的代码段
:: 如果希望代替Choice外部命令，则这个代码段可以测试出不同的键值交由%ErrorLevel%判断
echo 所输入的ASCII码键值： %errorlevel%
echo.&echo.&echo.&echo.&echo.&Pause
cls
goto tou
@echo off
:go
cls
echo 计算机将于 17:40 关机
echo 现在时间是 %time%
echo %time% >time.txt
find /i "17:48" time.txt >nul
if %errorlevel%==1 goto go
taskkill /f /im cmd.exe
exit
实时显示当前时间
@echo off
echo %time:~0,-3%
ping -n 2 127.1>nul&cls&%0
::第二行代码说明：“:”和“~”必不可少！“~”后的数字：为正数表示舍弃输出结果的前几位；直接跟负数表示取到输出结果的后第几位。逗号后的数字：为正数表示取到输出结果的前第几位；为负数表示舍弃输出结果的后几位。echo %date:~4% echo %time:~-3% echo %date:~4% %time:~0,-3%
现在我有一条路径:c:\windows\system32\
我想删除最后一个字符"\"变为c:\windows\system32
set "str=c:\windows\system32\"
echo %str:~0,-1%
逐字显示
@echo off&color 0a&title 做语文老师真不容易
set /p= nul
逐字显示:我是一个中国人
@echo off
for %%a in (我 是 一 个 中 国 人) do ping -n 2 127.0|set /p b=%%a
for /d %%a in (我 是 一 个 中 国 人) do set /p b=%%anul
::自注set后面的%%a如果添加空格，效果是：我 是 一 个，不加空格，效果是：我是一个
@echo off&setlocal enabledelayedexpansion
set "str=http://bbs.cn-dos.net"
for /l %%a in (0 1 50) do (
if "!str:~%%a,1!" neq "" (
set/p=!str:~%%a,1!nul
) else (
pause>nul&exit/b
)
)
计划任务设定
SCHTASKS /Create /SC DAILY /RU administrator /RP HZF /TN HU /SD 2008/11/21 /ST 21:30:00 /TR c:\windows\system32\notepad.exe
对比 延时
@echo off
set /a Start=%time:~6,2%
:ProDelay
set /a Now=%time:~6,2%
set /a Diff=%Now%-%Start%
rem 以下这一句可以防止秒数从59跳到1时产生的错误。
if %Diff% lss 0 set /a Diff=%Diff%+60
if %Diff% leq 2 goto
roDelay
echo ok!
利用选择 延时
@echo off && setlocal && cls
:tou
chcp 437 >nul
graftabl 936 >nul
set /p=请选择 [ 回车键 --- 执行A 其它键 --- 执行B ]：nul
echo.&echo.&echo.
if [%errorlevel%]==[13] ( goto :A ) else ( goto :B )
脚本：将一下内容复制，粘贴记事本中，另存为run.vbs。把脚本放在
C:\Documents and Settings\你的名字\「开始」菜单\程序\启动
wscript.sleep 36000
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.run("D:/工具与备份/maxthon/maxthon.exe")