Value in MS SQL Datenbank schreiben

[arcon]

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]

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]

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.

[DeddyH]

"Lesen von Adresse 000000000" deutet darauf hin, dass Du auf ein Objekt zugreifen willst, das Du gar nicht angelegt/instanziert hast.

[arcon]

Ich habe das Problem gelöst.

Folgenden Quellcode müsst Ihr in Delphi einfügen

Code:

procedure InsertThingsIntoDatabase;
var
  adoConn: TADOConnection;
  adoCmd: TADOCommand;
  begin
  try
    try
      adoConn := TADOConnection.Create(nil);
      adoConn.ConnectionString := 'Provider=Microsoft.SQLSERVER.CE.OLEDB.3.5;Data Source=//EureDatenbank//';

      adoConn.Open;

      adoCmd := TADOCommand.Create(nil);
      adoCmd.Connection := adoConn;
      adoCmd.CommandText := 'INSERT INTO //EurerTabellenname// (feld1, feld2) VALUES (:feld1, :feld2);';

      adoCmd.Prepared := true;

      adoCmd.Parameters[0].Value := 'Test';
      adoCmd.Parameters[1].Value := 'Test';
      
      

    except
            end;
  finally
    adoConn.Close;
    adoCmd.Free;
    adoConn.Free;
    end;
end;

Danke für die Unterstützung.