bcb中，怎么用数组获取SQL语句执行的结果？

Posted 2023-03-15

用的是ADO控件。
执行一条select语句得到的结果又很多个字段，我只要其中两个字段，A和B，并且我要逐条读取，把结果都存在数组或者链表里面，怎么搞？
bcb 就是c++ builder，
我用的是c++！

AnsiString mysql;
AnsiString arr[200][2];
int i=0;
mysql="select A,B from 表名 where 条件";
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add(mysql);
ADOQuery1->Open();
while(!ADOQuery->Eof)

Arr[i][0]=ADOQuery1->FieldByName("A")->AsString;
Arr[i][1]=ADOQuery1->FieldByName("B")->AsString;
i++;
参考技术A '你说的是VB？

dim a() as string
dim i as interge
Dim Hzrs As New ADODB.Recordset
Dim cnn As New ADODB.Connection
Dim sql As string

cnn.Open "Provider=MSDAORA.1;Password=dzcs;User ID=dzcs;Data Source=ORCL_72.11"
Sql = "select a,b from TDzSelinfo"
Hzrs.Open Sql, cnn, adOpenStatic, adLockOptimistic
if Hzrs.RecordCount>0 then redim a(Hzrs.RecordCount,1)
i=0
while not Hzrs.EOF
    a(i,0)=Hzrs!A
    a(i,1)=Hzrs!B
wend

追问

是C++ ，不是VB