ADOConnection manuell einrichten

[Avax2k]

hallo ich hoffe ich werde nicht gleich ausgelacht oder verspottet...

eine Globale AdoConnection so einrichten

Delphi-Quellcode:

AdoConnection.Close;
AdoConnection.Provider := 'Microsoft.Jet.OLEDB.4.0'
AdoConnection.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+extractfilepath(application.exename)+'Datenbank.mdb';
AdoConnection.Connected := TRUE;
AdoConnection.Open;
....

//dann alle DataSets oder Queries auf enabled setzen
AdoDataset1.Active := TRUE;
...

wenn niemandem damit geholfen wird kann der Beitrag auch gelöscht werden