Hallo zusammen,
ich möchte aus zwei mit "GUICtrlCreateDate" erstellten Daten (z.b. 01.03.2008 ,01.05.2008 ) die
Tages Differenz ermitteln.
Dazu bietet sich die Funktion "_DateDiff" an.
Allerdings müssen bei "_DateDiff" die Daten in dem Format YYYY/MM/DD angegeben werden.
Gibt es eine einfache Möglichkeit das Datum zu Konvertieren?
Die Schwierigkeit hierbei ist, dass "GUICtrlCreateDate" Je nach Betriebssystemsprache das Datum in einem anderen Format anzeigt.
Ich hoffe Ihr könnt mir helfen.
Gruß
Die zu konvertierenden Daten mit StringSplit() nach den Punkten trennen und neu ordnen. 
edit:
$date1 = "01.03.2008"
$date2 = "01.05.2008"
$split1 = StringSplit($date1, ".")
$day = $split1[1]
$month = $split1[2]
$year = $split1[3]
$split2 = StringSplit($date2, ".")
$day2 = $split2[1]
$month2 = $split2[2]
$year2 = $split2[3]
$date = '01.03.2008' ; YYYY/MM/DD
$new = StringRegExpReplace($date, "(\d{2})\.(\d{2})\.(\d{4})","$3/$2/$1")
MsgBox(0,"",$new)
Mega
Coole Idee, Xeno, ich hatte es bisher auch immer gesplittet und dann mühsam wieder zusammengeklebt 
.
peethebee
Danke für die Lösungen, bloß ist die Ausgabe von "GUICtrlCreateDate" abhängig von der Betriebssystemsprache.
Deutsch TT.MM.YYYY
Englisch TT/MM/YYYY
Aber das lässt sich wohl nur mit ner IF Schleife lösen. Oder habt ihr da noch einen Tip?
Ja, es gibt einen Umweg ;).
Wandle das Datum 2008/12/31 in einen lokalen String um (gibt eine _DateXXX-Funktion dafür) und zerhacke das dann, um Trennzeichen und Reihenfolge herauszufinden. Solchen Code gibt es in Galenda soweit ich mich erinnere. War zumindest mal mein Plan, müsste auch umgesetzt worden sein :D.
Viel Erfolg,
peethebee
p.s. Falls du es schaffst, wäre eine Rückmeldung und vielleicht eine für alle nutzbare Funktion schön. Danke :).
Dazu brauchst Du doch nur das Beispiel von Xeno etwas abändern:
[autoit]
$date = '01/03/2008' ; YYYY/MM/DD
$new = StringRegExpReplace($date, "(\d{2}).(\d{2}).(\d{4})","$3/$2/$1")
MsgBox(0,"",$new)
Das reicht aber nicht, Oscar, weil es viele Datumsformate gibt und weil man eben keine Datenbank hat, welches in welcher Sprache verwendet wird :(.
peethebee
Hi,
wieso soll das nicht reichen? Du musst ja zumindest wissen YYYY irgendwas MM irgendwas DD
$date = '01032008' ; YYYY/MM/DD
$new = StringRegExpReplace($date, "(\d{2})(\d{2})(\d{4})","$3/$2/$1")
MsgBox(0,"",$new)
Mega
Es gibt z.B. YYYY/MM/DD und YYYY/DD/MM 
peethebee
Ich weiß ja nicht, ob es noch andere Formate gibt und wie die letztendlich aussehen, aber das Pattern unterstützt zumindest Deutsch und Englisch.
Beispiel:
#include <GUIConstantsEx.au3>
#include <DateTimeConstants.au3>
Example1()
Func Example1()
Local $date, $msg
GUICreate("My GUI get date", 200, 200, 800, 200)
$date = GUICtrlCreateDate("", 10, 10, 100, 20, $DTS_SHORTDATEFORMAT)
GUISetState()
Do
$msg = GUIGetMsg()
Until $msg = $GUI_EVENT_CLOSE
$date = GUICtrlRead($date)
$new = StringRegExpReplace($date, "(\d{2}).(\d{2}).(\d{4})","$3/$2/$1")
MsgBox(0,"",$new)
GUIDelete()
EndFunc
Wenn weitere Formate gewünscht sind, dann bitte mal posten, wie das dort aussieht.
@Pee : Das ist klar. Man muss aber schon wissen was einen erwartet, dann kann man darauf reagieren.
Valik würde sagen, wer Schrott übergibt, der bekommt auch Schrott zurück.
Woran willst du diesen Unterschied YYYY/MM/DD und YYYY/DD/MM festmachen wenn es der 2008 01 01 ist? Das MUSST du wissen, oder sicher ermittlen können.
Mega
Hallo!
Daher der Test, indem ich mit unterscheidbarem Datum (31.12.2008) in Gegenrichtung teste, was rauskommt. Dann kann ich das Format sicher erkennen, erstens Trennzeichen (das, was nicht Zahl ist) und zweiten Reihenfolge (StringInStr und Position vergleichen) :). Kompliziert, aber müsste gehen ;).
peethebee
Hi,
habe ich nicht verstanden. Ich meinte ja auch nur, ob nun
010208
20080102
020108
01022008
usw.
Man muss halt wissen was kommt
Mega
Damit auch gekürzte Jahreszahlen erkannt werden:
[autoit]
StringRegExpReplace ($datum, "(\d{2}).(\d{2}).(\d{2,4})", "$3/$2/$1")
Hi,
das ist eine never-ending story. Das ginge z.B. nicht mehr wenn
[autoit]$date = '01032008' ; YYYY/MM/DD
;~ $new = StringRegExpReplace($date, "(\d{2})(\d{2})(\d{4})","$3/$2/$1")
$new = StringRegExpReplace ($date, "(\d{2}).(\d{2}).(\d{2,4})", "$3/$2/$1")
MsgBox(0,"",$new)
Mega
Dann eben:
(\d{2})\.?(\d{2})\.?(\d{2,4})oder vom DateTimePicker das Datum mit _GUICtrlDTP_GetSystemTime holen
Hi,
das klingt doch gut und sollte immer klappen!
Mega