Frage zu ADO und Delphi 7 PE...

[Markus]

Hallo,

ich möchte mittels ADO auf eine Access-Datenbank zugreifen. Hab dazu folgenden Code erstellt:

Delphi-Quellcode:

uses
  ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
   oConn, oRs: variant;
   sQuery: String;
begin
   oConn := CreateOleObject('ADODB.Connection');
   oRs := CreateOleObject('ADODB.Recordset');
   oConn.Open('Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Engine Type=5;Data Source=D:\datenbank.mdb');
   sQuery := 'SELECT * FROM Tabelle1';
   oRs.Open(sQuery, oConn, adOpenStatic, adLockReadOnly, adCmdText);
end;

Leider klappt das nicht, denn adOpenStatic, adLockReadOnly, adCmdText sind nicht definiert. Wie kann ich dieses Problem beheben?

[Bernhard Geyer]

Kann man in PE Typlibraries importieren?
Falls ja entsprechende "Microsoft ActiveX Data Objects"-Library importieren (oder von jemand mit einer besseren Delphi-Version das Importergebnis geben lassen).

[Markus]

Wie kann ich prüfen, ob ich das importieren kann? Ich kann halt ActiveX importieren, aber da steht nichts von MDAC. Habe Win XP SP2.

[Bernhard Geyer]

Du brauchst den Menüpunkt "Projekt/Typbibliothek importieren".
Und in der Liste z.B. den Eintrag "Microsoft ActiveX Data Objects 2.5 Library" auswählen.

Diese Komponenten sind keine ActiveX (Visuellen) Komponenten.

[Markus]

Sehr gut, damit geht es. Vielen Dank.

[Jens Schumann]

Zitat:

Zitat von Markus

Sehr gut, damit geht es. Vielen Dank.

Du hast doch D2005 Personal. Wie hast Du das gemacht.
Ich habe unter D2005 Personal den Menüpunkt Typebibliothek importieren nicht.

Ich bin den Umweg über das SDK gegangen:
Erstzweise kann man sich das Plattform SDK von Microsoft installieren.
Darin findet man dann die Headerdatei "adoint.h". Aus dieser Datei
kann man dann die Werte für die Konstanten holen.

adOpenStatic = 3
adLockReadOnly = 1
adCmdText = 1

[Markus]

Ne, hab wieder Delphi 7 Personal. Bin mit der 2005 nicht klargekommen...