Office: Access-Datumswert zu Datum konvertieren

Hallo,

wenn ich über ADO aus ACCESS einen Datumswert abfrage, erhalte ich z.B. für den 16.03.2004 den Wert 38062.

Gibt es irgendwo eine Dokumentation, wie ich von diesem Wert auf ein "lesbares" Datum komme?

Unten stehender Code ist zu ungenau. Gerade um die Jahreswechsel kommt Müll raus.

(setq a (fix (/ iDatum 365.25))
b (- iDatum (* a 365.25))
c (1+ (fix (/ b 30.6001)))
d (+ (fix (- b (* (1- c) 30.6001))) 2))
(list (+ 1900 a) c d)

Vielen Dank für jeden Hinweis.

VG, Fred Tomke

:)

 

Hi,

mal eine fixe Idee. Versuche es doch mal mit Format([Wert]; "dd.mm.yyyy") oder halt Format(Me!Feld, "dd.mm.yyyy") in VBA.

HTH

 

Danke dafür.

Frage: Kann ich das Format auch in der SELECT-Anweisung eingeben oder muss das separat passieren?

Mein Problem: ich arbeite nicht mit VBA.

VG, Fred

 

obige antwort von jan fkt. problemlos

die 38602 sind ein DateSerial Wert - mit der Format Anweisung kannst Du diesen in ein "normales" Datum umwandeln

 

Hallo
Eine Formatanweisung stellt die Zahl nur als datum da.
In ein datum umwandeln geht mit
CDate(deinwert)

 

\@Klaus Werden Datums in Access nicht immer als Zahl gehandelt?

@Fred Du kannst dieses in eine Spaltenüberschrift schreiben:

Code:

Oder mit der Lösung von Klaus:

Code:

 

\@klaus: stimmt natürlich .. in ein "normales" Datum darstellen wäre korrekter

zum Select: (ich nehme an, Du willst das in eine SQL Anweisung packen)

Zur Übergabe von Datumswerten an SQL-Anweisungen muss entweder das:
•amerikanische Format mit der Reihenfolge Monat, Tag, Jahr
z.B.
strDatum = Format (Date,“mm-dd-yyyy“)
bzw.
Format (Date,“mm-dd-yy“)
oder das:
•ISO-Format mit der Reihenfolge Jahr, Monat, Tag
z.B.:
strDatum = Format (Date,“yyyy-mm-dd“) verwendet werden.
Hierbei muss der Datumswert am Anfang und Ende in Doppelkreuze (Raute) gesetzt werden:
strDatum = Format (Date,"\#yyyy\-mm\-dd\#")

wobei hier natürlich Date durch Dein Formularfeld, Deinen Wert o.ä. ersetzt werden muss

 

J_Eilers

Ja

Der format befehl stellt aber nur eine Zitat onlinehilfe

Das gilt auch für ein "richtiges datumsfeld"
sonst wäre es ja nicht möglich sich zum Beispiel

Format(Datum;"mm.jjjj") darzustellen, es handelt sich ja nicht mehr um ein güliges datum *Smilie

 

Stop! Jetzt muss ich erst mal sortieren:

- meine ACCESS-Tabelle hat ein Feld mit Datum, dem ich ich überdies auch ein Format tt.mm.jjjj,_ vergeben habe
- ich greife au AutoCAD über ActiveX über ADO auf diese Tabelle zu und frage bspw. mit SELECT TOP 1 TAB.* FROM TAB den ersten DS ab. Dabei erhalte ich einen RECORDSET bei dem im Datumsfeld eine Ganzzahl steht. Ich hätte lieber einen Text ("16.03.2004").

Frage: Kann ich (wenn ja, wie) bereits in der SELECT-Anweisung mitteilen, dass er alles was Datum ist, in ein Datum aus String wandelt?

Jetzt steht da von Jan, Format([Tabellenfeld]; "tt.mm.jjjj") kann ich in die Spaltenüberschrift schreiben. Ich habe die Befürchtung, ich stehe auf dem Schlauch, denn
1. suche ich gerade in meiner SELECT-Anweisung eine Spaltenüberschrift
oder wenn das so nicht gemeint war,
2. habe ich doch meiner Spalte in der Tabelle ein Format zugewiesen...

OK, selbst wenn ich die Ganzzahl gutheißen soll, dann muss ich mir jetzt was einfallen lassen, wie ich VBA in meine sonst VBA-lose Programmierung einbinde. Es sei denn, die benannten Funktionen CDate() und Format() sind auch als Properties oder Methods im Connection-Object oder Recordset-Object zu finden. Dann muss ich, wenn ich den Wert in einer Dialogbox (ebenfalls nicht VBA) darstellen möchte, erst umwandeln:
(setq strDatum (MACHMIRDATUM 38062)) In MACHMIRDATUM muss er irgendwie eine der beiden VBA-Funktionen ausführen...

REINI, hast Du mal bitte ein beispiel, wie das dann in der SQL-Anweisung aussehen soll - ich kann mr das einfach nicht vorstellen...

VG, Fred

 

Mit der Spaltenüberschrift meinte ich eine Spalte im Ausdrucksgenerator von Access. Reine SQL-Syntax wäre so etwas:

Code:

 

und es ward Licht.

Ja, aha, sowas geht auch?
Probiert und funktioniert.

Ich definiere aber immer mit AS ein neues Feld, in das das Konvertierungsergebnis eingefüllt wird, nicht wahr?

VG, Fred

 

Ja. Das "Ausdr1" wäre dann die Spaltenüberschrift.