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