时间接口 = "http://api.m.taobao.com/rest/api3.do?api=mtop.common.getTimestamp"
Do
网络源文件 = Lib.网络.获得网页源文件_增强版(时间接口, "utf-8")
时间 = split(Split(网络源文件, "t" & chr(34) & ":" & chr(34))(1), chr(34))(0)
毫秒时间 = "," & Mid(时间, len(时间) - 2, 3)
//TracePrint 时间
NewDate = DateAdd("s",Mid( 时间,1,len(时间)-jianqu), "1970/01/01 00:00:00")
NewDate = DateAdd("h",8, NewDate)
网络时间 =Split(NewDate, " ")(1)
现在时间 = 网络时间 & 毫秒时间
TracePrint 现在时间
Delay 1'这里延迟越小 越精确
Loop
代码如上,就是获取淘宝时间接口的时间戳,然后转成时间输出。平时不卡,但是有时候会出现卡顿,要几秒才输出一次结果,这是什么原因?
Do
网络源文件 = Lib.网络.获得网页源文件_增强版(时间接口, "utf-8")
时间 = split(Split(网络源文件, "t" & chr(34) & ":" & chr(34))(1), chr(34))(0)
毫秒时间 = "," & Mid(时间, len(时间) - 2, 3)
//TracePrint 时间
NewDate = DateAdd("s",Mid( 时间,1,len(时间)-jianqu), "1970/01/01 00:00:00")
NewDate = DateAdd("h",8, NewDate)
网络时间 =Split(NewDate, " ")(1)
现在时间 = 网络时间 & 毫秒时间
TracePrint 现在时间
Delay 1'这里延迟越小 越精确
Loop
代码如上,就是获取淘宝时间接口的时间戳,然后转成时间输出。平时不卡,但是有时候会出现卡顿,要几秒才输出一次结果,这是什么原因?










