ADOConnection - Nur schreibender Zugriff?

[Hallo_Thomas]

Hallo,

ich versuche nur schreibend auf eine Datenbank zuzugreifen. Ziel ist es, einen neuen Datensatz hinzuzufügen. Ich erhalte mit TADOConnection jedesmal den diese Fehlermeldung

"Erste Zufalls-Exception bei $7C812AFB. Exception-Klasse EOleException mit Meldung 'Fehler bei einem aus mehreren Schritten bestehenden OLE DB-Vorgang. Prüfen Sie die einzelnen OLE DB-Statuswerte, falls vorhanden. Daten wurden nicht verarbeitet'. Prozess DatenbankSchreiben.exe (3060)"

Diese Fehler tritt mit der Zugriffsberechtigung Write auf, mit der Zugriffsberechtigung Share Deny None wird der Datensatz in die Datenbank ohne Fehlermeldung eingetragen.

Danke für eure Hilfe!

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
begin
 ADOConnection1.Connected:=True;
 ADOTable1.Active:=True;
 ADOTable1.Insert;
 ADOTable1.Edit;
 ADOTable1['Feld1']:='5';
 ADOTable1.Post;
 ADOTable1.Active:=False;
 ADOConnection1.Connected:=False;
 close;
end;

[pmoegenb]

Hallo hallo_thomas,
es dürfte daran liegen, dass Du bei ADOTable1 nacheinander Edit und Insert ausführst.

Entweder bearbeiten ADOTable1.Edit oder Hinzufügen ADOTable1.Insert.

[Hallo_Thomas]

Danke für die Antwort, ich habe

ADOTable1.Edit aus dem Code entfernt, die Fehlermeldung bleibt die selbe?

Gruß Thomas

[mkinzler]

Ist die Table auch offen?

[shmia]

Nimm doch mal folgenden Code, dann sieht du im Fenstertitel wie weit du kommst

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
begin
 ADOConnection1.Connected:=True;
 Caption := 'Connected';
 ADOTable1.Open;
 Caption := 'Tabelle geöffnet';
 ADOTable1.Append;    // Append ist "schlanker" als Insert
 ADOTable1['Feld1']:='5';
 // gibt es vielleicht noch weitere Felder,
 // die du nicht befüllt hast?
 ADOTable1.Post;
 Caption := 'Datensatz geschrieben';
 ADOTable1.Close;
 ADOConnection1.Connected:=False;
 Caption := 'Fertig';
 close;
end;

[Hallo_Thomas]

Irgendwie will nix, weder der ADOTable1.Open,

noch der ADOTable1.Append Befehl. Die Fehlermeldung bleibt die gleiche

Gruss Thomas

[mkinzler]

Wenn das .Open nicht funktioniert, kann auch der rest nicht funktionieren.
Wie sieht die Fehlermeldung beim open aus?

[Hallo_Thomas]

Die Fehlermeldung ist die gleiche, alles wie im ersten Post beschrieben.

Gruss Thomas

[mkinzler]

Dann scheint ja ewas mit den Connection paramtern nicht zu stimmen

[rollstuhlfahrer]

Access hat manchmal nen Haken, wo dann gar nichts mehr will. Wie sieht denn dein ConnectionString der Verbindung aus?

Bernhard