如何在VC里打开一个未连接的数据库的记录集(在线等待!!!)

[hxzb7215191]

我想新建一个在不使用数据库连接的情况下用 ADO 记录集
像这个例子讲的一样的.

http://support.microsoft.com/default.aspx?scid=kb;zh-cn;313330

这个例子是使用的VB代码.

我使用VC写的时候,就是这个记录集的Opent函数两个值不知道如何设置.

请教高人指点.

[蒋晟]

哪两个？缺省的参数可以用vtMissing填充

[hxzb7215191]

我想新建一个没有梆定数据库连接的一个这样的空的记录集.

然后手动的向记录集中增加内容.

这个在VC里要如何做呢?

这个我只要微软主页上找到一个在VB下新建的例子代码.

但是在VC中,就不知道如何去打开这个记录集.

找了好久都没有找到,不知道哪位朋友做过这样的东西.

[hxzb7215191]

_RecordsetPtr m_pRecordset;
m_pRecordset.CreateInstance(__uuidof(Recordset));
m_pRecordset->CursorLocation=adUseClient;

//加入行
try{
variant_t vNull;
vNull.vt=VT_ERROR;
vNull.scode=DISP_E_PARAMNOTFOUND;
m_pRecordset->Open(vtMissing,vtMissing,adOpenStatic, adLockBatchOptimistic,adCmdUnknown);
m_pRecordset->Fields->Append(_bstr_t("id"),adVarChar, 40, adFldIsNullable);
}
catch (_com_error e) {

}

[hxzb7215191]

改了还是出错误,这是为什么?

[张佩]

关注

[kyh1234567]

帮你顶一下
UP

[hxzb7215191]

我干脆把那个VB的代码帖出来吧.

它这个是新建了一个空的无连接的ADO记录集.

然后手动的把一些数据加入,再把这个记录集与一个DataGride梆定.


' Create a Recordset
Dim rst As ADODB.Recordset

Private Sub Command1_Click()
Set rst = New ADODB.Recordset
rst.CursorLocation = adUseClient

' Add columns to the Recordset
rst.Fields.Append "Key", adInteger
rst.Fields.Append "Field1", adVarChar, 40, adFldIsNullable
rst.Fields.Append "Field2", adDate

' Open the Recordset
rst.Open , , adOpenStatic, adLockBatchOptimistic

' Add data to the Recordset
rst.AddNew Array("Key", "Field1", "Field2"), _
Array(1, "string1", Date)
rst.AddNew Array("Key", "Field1", "Field2"), _
Array(2, "string2", #1/1/2000#)

' Populate the Data in the DataGrid
Set DataGrid1.DataSource = rst

End Sub

[hxzb7215191]

我改了之后的那个代码还是报错,出了一个"在一个已关闭的或无效连接的对象参照上操作不被允许"

[yanwenyuan0102]

UP

[hxzb7215191]

搞定.

谢谢 jiangsheng(蒋晟.MSMVP2004Jan)

代码是这样的:
//
_RecordsetPtr m_pRecordset;
m_pRecordset.CreateInstance(__uuidof(Recordset));
m_pRecordset->CursorLocation=adUseClient;


try{
//加入列
m_pRecordset->Fields->Append(_bstr_t("id"),adVarChar, 40, adFldIsNullable);

//打开
m_pRecordset->Open(vtMissing,vtMissing,adOpenStatic, adLockBatchOptimistic,adCmdUnknown);
//插入行
m_pRecordset->AddNew();///添加新记录
m_pRecordset->PutCollect("id",_variant_t(info));
m_pRecordset->Update();///保存到库中
}
catch (_com_error e) {
m_report->HandleError(e);
}