Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Value in MS SQL Datenbank schreiben (https://www.delphipraxis.net/152002-value-ms-sql-datenbank-schreiben.html)

arcon 8. Jun 2010 14:16

Value in MS SQL Datenbank schreiben
 
Hallo miteinander,

Ich bin absoluter Neuling in Sachen Delphi und würde gerne folgendes Problem beheben:
Ich habe eine Variable auf meiner Form, die ständig Ihren Wert ändert. Diesen Wert der Variable würde ich gerne in eine Datenbank schreiben. Leider klappt das nicht so ganz, wie ich mir das vorstelle.

mein bisheriger Lösungsansatz:
ich habe eine ADOConnection inkl. ADODataSet und ADOSource eingefügt und zusätzlich eine ADOCommand-Komponente. In dieser ADOCommand-Komponente habe ich unter dem Befehl "SQL" folgenden Code eingefügt:

Insert into Test(test1,test2,test3)
value ('1','12.02.2010',VARIABLE)

leidern klappt das noch nicht so ganz, dass die Variable, die auf meiner Form angezeigt wird, auch in die Datenbank übernommen wird. Kann es sein, dass ich die Deklaration als globale Variable vergessen habe ? (aber eigentlich sollte man doch keine globalen variablen verwenden .. aber ein anderer ausweg würde mir spontan nicht einfallen !)

würde mir jemand seine hilfe anbieten ?!?

gruß arcon

DeddyH 8. Jun 2010 14:29

AW: Value in MS SQL Datenbank schreiben
 
Hallo und Willkommen in der DP :dp:,

zunächst solltest Du das Statement parametrisieren.
SQL-Code:
Insert into Test(test1,test2,test3)
values(:param1,:params2,:param3)
Und wie führst Du es aus?

arcon 8. Jun 2010 14:39

AW: Value in MS SQL Datenbank schreiben
 
hallo deddyH

Momentan führ ich es so aus, dass ich auf einen Button drücke
und im Quelltext der Befehl ADOCommand.Execute ausgeführt.
Dabei ist das Problem, dass er mir das nur einmal in die Datenbank schreibt.
ich würde es aber gerne bei jeder Änderung in die Datenbank geschrieben haben.
und sobald ich wieder auf den Button drücke, muss damit aufgehört werden.

ist das zu realisieren ?

man müsste evtl. zuerst mal abfragen, ob sich der alte wert geändert hat ..
und wenn er sich geändert hat, muss dieser in die datenbank geschrieben werden.
sollte er sich nicht geändert haben, wird der wert wieder auf änderung überprüft
aber ich befürchte, dass das in einer dauerschleife enden wird .. ist meine annahme korrekt ?

gruß martin

DeddyH 8. Jun 2010 15:36

AW: Value in MS SQL Datenbank schreiben
 
Wo wird der Wert der Variablen denn geändert? An der Stelle musst Du dann halt das ADOCommand ausführen.

DP-Maintenance 8. Jun 2010 18:46

Dieses Thema wurde am "08. Jun 2010, 19:46 Uhr" von "Christian Seehase" aus dem Forum "Sonstige Fragen zu Delphi" in das Forum "Datenbanken" verschoben.

arcon 9. Jun 2010 09:32

AW: Value in MS SQL Datenbank schreiben
 
Hallo,

ich würde gerne folgende Sache machen.

Ich habe mir eine ADO-Connection aufgebaut. Dazu gehört eine TADODataSet-, TADODataSource- und eine TADOCommand-Komponente.

In dieser TADOCommand-Komponente habe ich unter dem Befehl Command.Text folgenden SQL Befehl eingefügt:

SQL-Code:
Insert into test(test,tewst2,Ctest3)
               Values(
                 ''11'',
                 ''10.10.2010 00:00:00'',
                 ''A_My_Continent'',
                )
Meine Tabelle lautet test und die 3 Spalten lauten Ebenfalls test, tewst2 und test 3.
die 3 Werte möchte ich erstmal so, wie oben einfügen und NICHT über Parameterübergaben, um erstmal die Funktionsweise zu verstehen.

in Delphi hab ich mir einen Button erzeugt. wenn ich auf diesen klicke, soll er mir den oben genannten SQL befehl ausführen.

dazu habe ich folgenden code in delphi eingefügt:

Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
var
Adocommand1:TADOcommand;
begin

     Adocommand1.Execute;

end;
nun zu meinem problem... so wie ich es eben beschrieben habe, macht das programm díe ausführung nicht.

woran könnte das liegen ?

wäre für tipps dankbar.

gruß arcon

mkinzler 9. Jun 2010 09:35

AW: Value in MS SQL Datenbank schreiben
 
Du musst ggf die Transaktion noch commiten

arcon 9. Jun 2010 09:57

AW: Value in MS SQL Datenbank schreiben
 
okay .. ich habe folgenden code in den SQL-Teil eingefügt

SQL-Code:
Use test;
go
begin transaction;
go
Insert into test(test,tewst2,test3)
               Values(
                 ''11'',
                 ''10.10.2010 00:00:00'',
                 ''A_My_Continent'',
                )
commit transaction;
Go
bin auf ausführen gegangen und dann bringt er mir folgende fehlermeldung :

Im Projekt Stand_100609.exe ist eine Exception der Klasse EAccessViolation mit der Meldung "Zugriffsv erletzung bei Adresse 0059C3De in Modul "Stand_100609.exe, Lesen von Adresse 000000000 aufgetreten.
Ich habe ausserdem mal versucht, den Delphi-Quellcode auszukommentieren, um zu schauen, ob der fehler dann immer noch vorhanden ist .. und siehe da, er ist es nicht mehr .. also muss es an dem delphi-quellcode liegen ..

was heißt diese fehlermeldung ?
kann mir jemand da weiterhelfen ?

ist die commit aktion so richtig ? @ mkinzler

danke für deine Hilfe

Christian Seehase 9. Jun 2010 10:14

AW: Value in MS SQL Datenbank schreiben
 
Moin arcon,

ich denke, ich habe den Fehler gefunden:

Hier

Code:
''A_My_Continent'',
muss das Komma am Ende weg, danach kommt nämlich die Klammer von VALUES

arcon 9. Jun 2010 10:41

AW: Value in MS SQL Datenbank schreiben
 
Hallo,

ich habe gerade mal deinen Hinweis abgeändert, muss aber jedoch feststellen, dass dies nicht der Fehler ist bzw. ein fehler ist, aber nicht der , der die fehlermeldung verursacht.


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:01 Uhr.
Seite 1 von 2  1 2      

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