vbs懂的高手来，前几天时间是对的，现在的时间相差8小时，不知道怎么回事？ 求指导！可惜没分。。。

Set SWDT = CreateObject("WbemScripting.SWbemDateTime")Set WMI = GetObject("winmgmts:{impersonationLevel=impersonate}!尀尀.尀root尀cimv2")Set colLoggedEvents = WMI.ExecQuery("Select * from Win32_NTLogEvent Where Logfile = ✀System✀ And EventCode = ✀6005✀ Or EventCode = ✀6006✀")set fso=createobject("scripting.filesystemobject")set fw=fso.createtextfile("a.txt",2)For Each objEvent In colLoggedEvents Flag = Flag + 1 If Flag = 1 Then SWDT.Value = objEvent.TimeWritten Wscript.Echo "上次开机时间: " & SWDT.GetVarDate(True) fw.writeline("本次开机时间:"&SWDT.GetVarDate(ture)) ElseIf Flag = 2 Then SWDT.Value = objEvent.TimeWritten Wscript.Echo "上次开机时间: " & SWDT.GetVarDate(True) fw.writeline("上次关机时间:"&SWDT.GetVarDate(ture)) ElseIf Flag = 3 Then SWDT.Value = objEvent.TimeWritten Wscript.Echo "上次开机时间: " & SWDT.GetVarDate(True) fw.writeline("上次开机时间:"&SWDT.GetVarDate(ture)) Exit For End IfNext