Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Umwandlung datum
Autor: karli
Datum: 07.04.04 20:18
Ich erhalte aus einer SQL-Datenbank ein Datum in der Form: JJJJMMTT als Longinteger und muß dieses datum in die Form. TT.MM.JJ als Datumsfeld in Accces bringen.i Ich habe dazu die Funktion geschrieben: Public Function Umwand_datum(Datalt As Long) As Date Dim Datum1 As Date If Datalt > 0 Then Datum1 = DateSerial(Left(Datalt, 4), Mid(Datalt, 5, 2), Right(Datalt, 2)) sjahr = Left(Datalt, 4) smonat = Mid(Datalt, 5, 2) stag = Right(Datalt, 2) Umwand_datum = Datum1 End If End Function Leider kommt sehr oft , daß das Datum leer ist - sprich in Datalt 0 ist. Daran bin ich bisher gescheitert , es kommt falscher Typ. Wer kann mir helfen. Im voraus herzliche Dank. karli

Umwandlung datum	530	karli	07.04.04 20:18
Re: Umwandlung datum	313	Tommyknocker	07.04.04 21:02
Re: Umwandlung datum	310	Sanguaire	08.04.04 14:49

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen