Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi MS-SQL: DBX3->DBX4, Datum falsch (0.0=19000101) gelöst (https://www.delphipraxis.net/150346-ms-sql-dbx3-dbx4-datum-falsch-0-0%3D19000101-geloest.html)

hoika 14. Apr 2010 13:48

Datenbank: MS-SQL • Version: 2008 • Zugriff über: DBX

MS-SQL: DBX3->DBX4, Datum falsch (0.0=19000101) gelöst
 
Hallo #,

ich habe hier eine D7-Anwendung, die das Datum als TDateTime -> ParamByName().AsFloat abspeichert,
also 0.0 ist 30.12.1899.

Jetzt habe ich hier DBX4 (D2007).

Beim Speichern wird das Datum jetzt falsch gespeichert,
nämlich + 2 Tage in die Zukunft.

Auf einer Seite habe ich gelsen, das der Server das Datum als Differenz zu 1.1.1900 speichert.

TDateTime ist aber ab 30.12.1899.

Haben die in DBX3 -2 Tage gerechnet und in der DBX4 verschlimmbessert, oder was ist hier los ??


.AsDateTime erzeugt übrigens eine Exception ...


Was ist denn nu kaputt ???


Heiko

mkinzler 14. Apr 2010 13:51

Re: MS-SQL: DBX3->DBX4, Datum falsch (0.0=19000101)
 
Warum speicherst du das als Float?

hoika 14. Apr 2010 14:05

Re: MS-SQL: DBX3->DBX4, Datum falsch (0.0=19000101)
 
Hallo,

ParamByName('XX').AsDateTime:= EncodeDate('bäa'(;

erzeugt beim ExecSQL die Meldung "Fehlender Wert für Parameter XX".


Heiko

mkinzler 14. Apr 2010 14:10

Re: MS-SQL: DBX3->DBX4, Datum falsch (0.0=19000101)
 
-Was für ein Typ hat das Feld in der Datenbank?
Delphi-Quellcode:
ParamByName('XX').ParamByName('XX').Value := EncodeDate('bäa'(;

hoika 14. Apr 2010 14:19

Re: MS-SQL: DBX3->DBX4, Datum falsch (0.0=19000101)
 
Hallo,

Typ ist "datetime null"


Heiko

hoika 14. Apr 2010 14:44

Re: MS-SQL: DBX3->DBX4, Datum falsch (0.0=19000101) gelös
 
Hallo,

hat sich erledigt.

AsDateTime wird ab DBX4 und D2007 nicht mehr unterstützt.

Lösung:
AsSQLTimeStamp benutze. Es gibt auch eine DateTimeToSQLTimeStamp-Funktion.


Heiko


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:46 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz