Set t = CreateObject(“Microsoft.XMLHTTP”)
t.open “GET”, “http://su.baidu.com/cdn-cgi/trace/”, false
t.send()
s = Split(t.responseText,chr(10))(3)
s = right(s,len(s)-3)
s = DateAdd(“s”,s,”1970-01-01 00:00:00″)
s = DateAdd(“h”,8,s)
wsh.Echo s
改造成bat代码如下: 继续阅读显示网络时间的一小段VBS代码