[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off
  2. pushd %tmp%
  3. (
  4. echo Randomize
  5. echo With CreateObject("Microsoft.XMLHTTP"^)
  6. echo .open "get","http://open.baidu.com/special/time/?"^&Rnd*1e15,False
  7. echo .send
  8. echo t=DateAdd("s",CLng(Left(Split(.responseText,"baidu_time("^)(1^),10^)^),"1970-1-1 8:00"^)
  9. echo WScript.echo right(year(t^),4^) ^& right("0" ^& month(t^),2^) ^& right("0" ^& day(t^),2^),Hour(t^)^&":"^&Minute(t^)^&":"^&Second(t^)
  10. echo End With
  11. )>gettime.vbs
  12. for /f "tokens=1*" %%i in ('cscript //nologo gettime.vbs') do  date %%i&time %%j&set "日期=%%i"
  13. set 日期
  14. popd
  15. pause
复制代码
初学BAT,非专业。代码不适当之处还望前辈们多多指点。在此表示感谢!

TOP

返回列表