停止更新，敏捷测试及TestOps解决体系，关注订阅号TestOps
如何在vbs中获得unix time时间
上一篇 /
下一篇 2012-07-23 09:51:42
/ 个人分类：自动化测试
最近在做自动化框架的时候遇到一个时间问题，为了和别的系统同步时间，需要使用
Unix time格式，而vbs没有提供这个功能，所以搜索了一下找到了下面的解决方法
51Testing软件测试网]b
p6@2k$W
]&l
T0I
在vbs里求unix时间可以这样做
Function unixtime8() '支持第八时区
unixtime8=DateDiff("s","1970-01-01 00:00:00",Now)-480*60
End Function
Ml~x#V0
.F)]}M {;q3q[8n0
Function UnixTime() '支持系统自动判断时区
Set bjWMIService =GetObject("winmgmts:\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_OperatingSystem",,48)
For Each objItem in colItems
TimeZone = objItem.CurrentTimeZone
Next
'MsgBox TimeZone 8时区的做法就是8*60=480
UnixTime = DateDiff("s", "01/01/1970 00:00:00", Now())
UnixTime = UnixTime - TimeZone * 60
End Function
收藏
举报
TAG:
