Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#11

AW: Mit XE2 auf dBase-Datenbank lesend zugreifen

  Alt 23. Aug 2012, 16:57
Mit Delphi Bordmitteln geht das so:
Du nimmst eine ADOConnection und dann:
Delphi-Quellcode:
function BuildDBaseConnectionString(const directory:string):string;
begin

   (* evtl. auch so; es ist noch nicht klar ob das besser wäre

  // DSN unabhängige Connection
  Result := 'Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;' +
      'Dbq=' + path;
   *)


   Result := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+directory+
     ';Extended Properties=dBase 5.0;Persist Security Info=False';
end;
...
ADOConnection1.ConnectionString := BuildDBaseConnectionString('C:\dbaseordner\');
ADOConnection1.Connected := True;

ADOQuery1.SQL.TEXT := 'SELECT * FROM Adressen'; // öffnet Adressen.dbf
ADOQuery1.Open;
Solange du keine Memofelder oder Indices verwendet, funktioniert das astrein.
Andreas

Geändert von shmia (23. Aug 2012 um 17:00 Uhr)
  Mit Zitat antworten Zitat