Spaltet einen String, der Datum und Zeit enthält, in 2 separate Arrays
#include <Date.au3>
_DateTimeSplit ( $sDate, ByRef $aDatePart, ByRef $aTimePart )
$sDate | Eines dieser Formate: "YYYY/MM/DD[ hh:mm[:ss]]" "YYYY/MM/DD[Thh:mm[:ss]]" "YYYY-MM-DD[ hh:mm[:ss]]" "YYYY-MM-DD[Thh:mm[:ss]]" "YYYY.MM.DD[ hh:mm[:ss]]" "YYYY.MM.DD[Thh:mm[:ss]]" |
$aDatePart | Array für das Datum $aDatePart[0] Anzahl der zurückgegebenen Werte. |
$aTimePart | Array für die Zeit $iTimePart[0] Anzahl der zurückgegebenen Werte. |
Erfolg: | Datum und Zeit in 2 separaten Arrays. |
Fehler: | 0 und setzt das @error Flag auf ungleich null |
@error: | 1 - ungültig eingegebenes Datum 2 - ungültige Eingabezeit |
Die Ungültigkeit bezieht sich nur auf die Formatierung. Um die Werte zu überprüfen, ist _DateIsValid() zu verwenden.
_DateAdd, _DateDiff, _DayValueToDate, _DateIsValid
#include <Date.au3>
#include <MsgBoxConstants.au3>
Local $aMyDate, $aMyTime
_DateTimeSplit("2005/01/01 14:30", $aMyDate, $aMyTime)
If @error Then
MsgBox($MB_SYSTEMMODAL + $MB_ICONERROR, "Ergebnis", "Fehler")
Else
Local $sMsg = "Jahr = " & @TAB & @TAB & $aMyDate[1] & @CRLF
$sMsg &= "Monat = " & @TAB & $aMyDate[2] & @CRLF
$sMsg &= "Tag = " & @TAB & @TAB & $aMyDate[3] & @CRLF
$sMsg &= "Stunde = " & @TAB & $aMyTime[1] & @CRLF
$sMsg &= "Minute = " & @TAB & $aMyTime[2] & @CRLF
If $aMyTime[0] = 3 Then $sMsg &= "Sekunde = " & @TAB & $aMyTime[3] & @CRLF
MsgBox($MB_SYSTEMMODAL, "Ergebnis", $sMsg)
EndIf