恭喜,你发布的帖子
发布于 2017-12-26 17:28:26
6楼
接上面的脚本
Dim dBeginTime,dEndTime
' Local Time
dBeginTime = CDate(sBeginTime)
dEndTime = CDate(sEndTime)
' Convert to UTC
dBeginTime = DateAdd("h", -8, dBeginTime)
dEndTime = DateAdd("h", -8, dEndTime)
sBeginTime = CStr(Year(dBeginTime)) _
& "-" & Right("00" & CStr(Month(dBeginTime)),2) _
& "-" & Right("00" & CStr(Day(dBeginTime)),2) _
& " " & Right("00" & CStr(Hour(dBeginTime)),2) _
& ":" & Right("00" & CStr(Minute(dBeginTime)),2) _
& ":" & Right("00" & CStr(Second(dBeginTime)),2)
sEndTime = CStr(Year(dEndTime)) _
& "-" & Right("00" & CStr(Month(dEndTime)),2) _
& "-" & Right("00" & CStr(Day(dEndTime)),2) _
& " " & Right("00" & CStr(Hour(dEndTime)),2) _
& ":" & Right("00" & CStr(Minute(dEndTime)),2) _
& ":" & Right("00" & CStr(Second(dEndTime)),2)
谢谢斑竹的指导,小弟打算下个月在试验脚本,现在没有一个月的数据,都是通过改系统时间做的假数据,打算运行一个月产生真实数据在看下之前的脚本哪里有问题,同时测试斑竹的脚本,后续再附上测试结果
请填写推广理由:
分享
只看
楼主