快速简单的获取网络时间·代替本地时间不准的用
MsgBox, % "当前网络时间:" GetTime()
GetTime() {
local whr, gTime
whr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
whr.Open("GET", "http://quan.suning.com/getSysTime.do", true)
whr.Send()
whr.WaitForResponse()
Time := whr.ResponseText
Text:=SubStr(Time,-15)
年:=SubStr(Text,1,4)
月:=SubStr(Text,5,2)
日:=SubStr(Text,7,2)
时:=SubStr(Text,9,2)
分:=SubStr(Text,11,2)
秒:=SubStr(Text,13,2)
return 时 ":" 分 ":" 秒
}可以用RegExReplace正则代替SubStr（我对正则不熟所以就用笨方法了）
声明：本站所有文章，如无特殊说明或标注，均为本站原创发布。任何个人或组织，在未征得本站同意时，禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益，可联系我们进行处理。
main:
MsgBox, % “当前网络时间:” getTime()
return
getTime() {
local whr, gTime
whr := ComObjCreate(“WinHttp.WinHttpRequest.5.1”)
whr.Open(“GET”, “http://quan.suning.com/getSysTime.do”, true)
whr.Send()
whr.WaitForResponse()
gTime := whr.ResponseText
RegExMatch(gTime, “sysTime1.{3}(\d+)”, rtTime)
return rtTime1
}
学到了感谢?
感谢