亚洲免费乱码视频,日韩 欧美 国产 动漫 一区,97在线观看免费视频播国产,中文字幕亚洲图片

      1. <legend id="ppnor"></legend>

      2. 
        
        <sup id="ppnor"><input id="ppnor"></input></sup>
        <s id="ppnor"></s>

        用VBS獲取Unix時(shí)間戳的函數(shù)代碼

        字號:


            VBS中沒有類似C標(biāo)準(zhǔn)庫中的time函數(shù),怎么獲取Unix時(shí)間戳呢?乍一看很簡單:
            代碼如下:
            Function UnixTime()
            UnixTime = DateDiff("s", "01/01/1970 00:00:00", Now())
            End Function
            一個(gè)很想當(dāng)然的方法,僅僅注意到了“1970年1月1日0時(shí)0分0秒”,而忽略了“協(xié)調(diào)世界時(shí)”。
            協(xié)調(diào)世界時(shí),又稱世界標(biāo)準(zhǔn)時(shí)間或世界協(xié)調(diào)時(shí)間,簡稱UTC,從英文“Coordinated Universal Time”而來。在中國大陸的本地時(shí)間比UTC快8小時(shí),就會(huì)寫作UTC+8。如果是在本地時(shí)間比UTC時(shí)間慢的地區(qū),例如夏威夷的時(shí)間是比UTC時(shí)間慢10小時(shí),就會(huì)寫作UTC-10。
            而VBS中的Now()函數(shù)返回的時(shí)間是包括時(shí)區(qū)的,所以獲取Unix時(shí)間戳要做一些修正。
            代碼如下:
            Function UnixTime()
            Set objWMIService = _
            GetObject("winmgmts:\\.\root\cimv2")
            Set colItems = objWMIService.ExecQuery _
            ("Select * from Win32_OperatingSystem",,48)
            For Each objItem in colItems
            TimeZone = objItem.CurrentTimeZone
            Next
            UnixTime = DateDiff("s", "01/01/1970 00:00:00", Now())
            UnixTime = UnixTime - TimeZone * 60
            End Function
            這才是正確的寫法。