Bei
ADO sind die
ConnectionStrings der Dreh- und Angelpunkt.
Delphi-Quellcode:
const
// DB_PROVIDER = 'Microsoft.Jet.OLEDB.3.51'; // Access 97
DB_PROVIDER = '
Microsoft.Jet.OLEDB.4.0';
// Access 2000
function MDBGetConnectionString(
const MDBFile:
string):
string;
begin
Result := Format('
Provider=%s;Data Source=%s',[DB_PROVIDER,MDBFile]);
end;
ADOConnection1.ConnectionString := MDBGetConnectionString('
C:\AccessTestDB.mdb');
ADOConnection1.Open;
AdoTable1.TableName := '
Stammdaten';
AdoTable1.Open;