批处理获取网络时间

批处理获取网络时间

@echo off
title 获取网络时间
cd /d "%tmp%"
(
echo With CreateObject("Microsoft.XMLHTTP"^)
echo .open "GET", "http://time.tianqi.com/", False
echo .send
echo s = Split(.responseText, "var timestamp = "^&""""^)^(1^)
echo s = Split(s,""""^)^(0^)
echo s = left(s,10^)
echo End With
echo WSH.Echo DateAdd("s", s * 1, "1970-1-1 8:00"^)
)>getTime.vbs
for /f "tokens=1*" %%i in ('cscript //nologo gettime.vbs') do date %%i & time %%j
echo 设置完成！
pause

编辑批处理文件时，以ANSI方式编辑即可解决乱码问题。