ADO创建非连接的记录集

[worldy]

有没有那位高手知道在CB6中，创建没有连接到数据库的记录集？VB、VC中都可以创建，但CB似乎对ADO封装的面目全非，不知道怎么创建，请高手指点指点。

[sczyq]

TADODataSet 就是

[worldy]

引用 1 楼 sczyq 的回复:

TADODataSet 就是

void __fastcall TForm2::FormMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { // TRecordset TADODataSet* rs=new TADODataSet(this); // TADORecordset *rs=new ADORecordset(this); TField* fld=new TField(this); fld->FieldName="Field1"; fld->SetFieldType(3); // fld->Size=4; rs->Fields->Add(fld); fld=new TField(this); fld->FieldName="Field2"; fld->SetFieldType(202); //fld->Size =20; rs->Fields->Add(fld); fld=new TField(this); fld->FieldName="Field3"; fld->SetFieldType(202); //fld->Size=20; rs->Fields->Add(fld); //rs->CursorLocation=adUseClient; rs->Connection=NULL; rs->CommandText=""; rs->Open(); //到此处都是失败，在VB中其Connection属性为Nothing就可以 // ADODataSet* rs=new ADODataSet; DataSource1->DataSet=rs; }

[sczyq]

TADODataSet* rs=new TADODataSet(this); TFieldDef *AFieldDef = rs->FieldDefs->AddFieldDef(); AFieldDef->DataType = ftInteger; AFieldDef->Name = "Field1"; AFieldDef = rs->FieldDefs->AddFieldDef(); AFieldDef->DataType = ftString; AFieldDef->Name = "Field2"; AFieldDef->Size = 20; AFieldDef = rs->FieldDefs->AddFieldDef(); AFieldDef->DataType = ftString; AFieldDef->Name = "Field3"; AFieldDef->Size = 20; rs->CreateDataSet(); // 这里就已经Open了

[guoguo码农921]

VC如何用ADO创建非连接的记录集呢，求教啊