怎么在VBscript里进行时区转换
要实现的功能是这样:获取本地的时间与时区值,并将时间转换成目标时区(比如西四去)的时间。谢谢先。 我自己想的大概会有这么几步:
1. 获得系统时间。
2. 将系统时间转换为国际标准时间(UTC)。
3. 根据时差,计算出目标时区此时的国际标准时间(UTC)。
4. 将目标时区的国际标准时间(UTC)转换为当地系统时间。
所以,具体就是2,3,4,步怎么实现?或者还有其它的方式吗? 用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 谢谢。后来换了一种方式,直接从服务器页面上取出当天的日期了。 如果知道目标时区与本地时区的时差,那么可以 使用DateAdd 函数来得到目标时区的时间。
页:
[1]