[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
%date%和%time%要求为标准格式
  1. @echo off&setlocal enabledelayedexpansion
  2. call:k
  3. ping 127.1 -n 2 >nul
  4. call:k
  5. set/a D=D2-D1,K=K2-K1
  6. if %K% leq 0 set/a K+=8640000,D-=1
  7. if %D% leq 0 (echo %K%0毫秒)else echo %D%天%K%0毫秒
  8. pause&exit
  9. :k
  10. set E=%date%&set T=%time%&set K=%time:~0,2%&set/a N+=1
  11. set/a D%N%=1%E:~8,2%%%100,M=1%E:~5,2%%%100-1,Y=%E:~0,4%,"K%N%=%K: =%*360000+(1%T:~3,2%-100)*6000+(1%T:~6,2%-100)*100+1%T:~9,2%-100"
  12. for /l %%a in (1,1,%M%) do set/a "K=^!(%%a-4)|^!(%%a-6)|^!(%%a-9)|^!(%%a-11)","D%N%+=^!(%%a-2)*(28+^!((^!(Y%%4)&^!^!(Y%%100))|^!(Y%%400)))+K*30+(^!^!(%%a-2)&^!K)*31"
  13. set/a D%N%+=(Y-1)*365+Y/4-Y/100+Y/400
复制代码
1

评分人数

寒夜孤星:在没有说明的情况下,本人所有代码均运行在 XP SP3 下 (有问题请发贴,QQ临时会话已关闭)

TOP

回复 8楼 的帖子

把 7楼 中的 ping 127.1 -n 2 >nul 替换为你需要执行的代码,显示的就是执行这个命令所需要的时间
寒夜孤星:在没有说明的情况下,本人所有代码均运行在 XP SP3 下 (有问题请发贴,QQ临时会话已关闭)

TOP

返回列表