Search the Community

The script shows the offset from GMT-UTC in standard format through string manipulation. #include <Date.au3> ConsoleWrite (_TimeZoneInfo() & @CRLF) Func _TimeZoneInfo() $aInfo = _Date_Time_GetTimeZoneInformation() ConsoleWrite("bias: " & $aInfo[1] & @CRLF) $hours = $aInfo[1] / 60 If $hours = "0" Then $hours = "+00:00" Else If StringInStr($hours, "-") Then $hours = StringReplace($hours, "-", "+") Else $hours = "-" & $hours EndIf If Not StringInStr($hours, ".") Then $hours = $hours & ":00" $hours = StringReplace($hours, ".5", ":30") $hours = StringReplace($hours, ".75", ":45") If StringLen($hours) = 5 Then $hours = StringLeft($hours, 1) & "0" & StringRight($hours, 4) EndIf Return ($aInfo[2] & " (GMT" & $hours & ")") EndFunc ;==>_TimeZoneInfo

Hello to retrieve the "MILLISECONDS" as well I modified some lines from "DATE.AU3". It's working fine, except that the function seems to return the UTC time stamp of the file checked? _NowCalc is returning local time (DST is active right now), so a direct "Age Check" against _NowCalc() is not possible. What's the best / safest approach to convert either UTC to "current local time incuding DST" or vice versa? _Date_Time_GetTimeZoneInformation() ??? #include-once #include <Date.au3> $File="C:\temp\TimeTest.txt" $f=FileOpen($File,2+8) FileWriteLine($f,_NowCalc()) FileClose($f) _NowCalc() $Content=FileRead($File) ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $Content = ' & $Content & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console $TS=FileGetTSstringLastModifiedWithMS($File) ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $TS = ' & $TS & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console Func FileGetTSstringLastModifiedWithMS($_FullFilePathName) $h = _WinAPI_CreateFile($_FullFilePathName, 2, 2) $aTS = _Date_Time_GetFileTime($h) _WinAPI_CloseHandle($h) $aDate = _Date_Time_FileTimeToArray($aTS[2]) If IsArray($aDate) and UBound($aDate) > 6 Then Return StringFormat("%04d/%02d/%02d %02d:%02d:%02d.%03d", $aDate[2], $aDate[0], $aDate[1], $aDate[3], $aDate[4], $aDate[5], $aDate[6]) Else SetError(1) Return EndIf EndFunc ;==>FileGetTSstringLastModifiedWithMS _FileGetTime() is not an option, as I need the milliseconds as well, as files may show up within the same second. <edit> It would be preferred to have a robust solution to use "local time", taking care of DST</edit> Regards, Rudi.