In etwas so:
Delphi-Quellcode:
var Access, RecordSet: OleVariant;
begin
Access := CreateOleObject( '
ADODB.Connection');
access.Provider := '
Microsoft.Jet.OLEDB.4.0';
//Access 2000
access.ConnectionString := '
Data Source=<Pfad_zur_Datenbank>';
access.open;
RecordSet := CreateOleObject( '
ADODB.Recordset');
RecordSet.ActiveConnection :=
Access;
RecordSet.Open := '
<TableName>';
end;
Link zue einem (VB)-
Tutorial welches man einfach in ein Delphi-
COM-Beispiel umwandeln kann.