給你寫個轉換的函式：

"把UNIX時間戳轉換為標準時間

"引數：intTime:要轉換的UNIX時間戳；intTimeZone：該時間戳對應的時區

"返回值：intTime所代表的標準時間

"示例：FromUnixTime("1211511060", +8)，返回值2008-5-23 10:51:0

Function FromUnixTime(intTime, intTimeZone)

If IsEmpty(intTime) Or Not IsNumeric(intTime) Then

FromUnixTime = Now()

Exit Function

End If

If IsEmpty(intTime) Or Not IsNumeric(intTimeZone) Then intTimeZone = 0

FromUnixTime = DateAdd("s", intTime, "1970-1-1 0:0:0")

FromUnixTime = DateAdd("h", intTimeZone, FromUnixTime)

End Function