xuehuiyiwang 发表于 2008-5-27 16:35:28

怎么在VBscript里进行时区转换

要实现的功能是这样:获取本地的时间与时区值,并将时间转换成目标时区(比如西四去)的时间。

谢谢先。

xuehuiyiwang 发表于 2008-5-27 17:39:03

我自己想的大概会有这么几步:
1. 获得系统时间。
2. 将系统时间转换为国际标准时间(UTC)。
3. 根据时差,计算出目标时区此时的国际标准时间(UTC)。
4. 将目标时区的国际标准时间(UTC)转换为当地系统时间。

所以,具体就是2,3,4,步怎么实现?或者还有其它的方式吗?

gy21st 发表于 2008-5-27 18:15:13

用WMI直接取得UTC时间。
这段代码仅供参考

strComputer = "."
Set objWMIService = GetObject( _
    "winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery( _
    "Select * from Win32_UTCTime")
For Each objItem in colItems
    Msgbox "Year: " & objItem.Year
    Msgbox "Month: " & objItem.Month
    Msgbox "Day: " & objItem.Day
    Msgbox "Hour: " & objItem.Hour
    Msgbox "Minute: " & objItem.Minute
    Msgbox "Second: " & objItem.Second
Next

xuehuiyiwang 发表于 2008-5-28 15:01:04

谢谢。后来换了一种方式,直接从服务器页面上取出当天的日期了。

walker1020 发表于 2008-10-12 19:56:00

如果知道目标时区与本地时区的时差,那么可以 使用DateAdd 函数来得到目标时区的时间。
页: [1]
查看完整版本: 怎么在VBscript里进行时区转换