ADODB.Recordset auslesen, wie?

Hallo,

ich habe nun ein ADODB.Recordset, in dem das Ergebnis meiner Abfrage gespeichert ist. Aber wie kann ich nun auf einzelne Zellen zugreifen? Ich kann zwar durchgehen:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

var

   oConn, oRs: variant;

   sQuery: String;

   i,j: integer;

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);

   for i := 0 to oRs.RecordCount - 1 do begin

      for j := 0 to oRs.Fields.Count - 1 do begin

        //Hier möchte ich auf die Zelle [i][j] zugreifen, aber wie?

      end;

   end;

end;

ADODB.Recordset auslesen, wie?

ADODB.Recordset auslesen, wie?

Forumregeln