Wert in Datenbank schreiben

[Stocki1990]

Servus Omata!

Danke für die rasche Antwort.
- Nun geht's

Anbei noch für dich der Delphi-Code
meiner Connection-Einstellungen:

Delphi-Quellcode:

function tform1.DatenverbindungHerstellen(): boolean;
var
   Provider, DataProvider, DataSource: string;

begin
   Provider := 'MSDataShape.1';
   DataProvider := 'Microsoft.Jet.OLEDB.4.0';
   DataSource := extractfilepath(application.ExeName) + 'vokabel.mdb';

   if fileexists(DataSource) then begin
      if ADOConnection1.Connected then ADOConnection1.Close;
      ADOConnection1.ConnectionString := 'Provider=' + Provider + ';Data Provider=' + DataProvider + ';Data Source=' + DataSource;
      try
        ADOConnection1.Connected := true;
        result := true;
      except
        result := false;
      end;

   end else begin
       result := false;

   end;

end;

Danke nochmals für die rasche unkomplizierte Hilfe
Grüße
Christoph