[轉]ASP常用函數:TimeZone

功能:獲取服務器所在時區

復制代碼 代碼如下:
<% 
Function TimeZone() 
    Set oShell = CreateObject("WScript.Shell") 
    atb = "HKEY_LOCAL_MACHINE\System\CurrentControlSet\" & _ 
         "Control\TimeZoneInformation\ActiveTimeBias" 
    TimeZone = - oShell.RegRead(atb) / 60 
End Function 
%>