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