<<< 返回 access911.net 编程静态资料库索引页

如何在VBA程序中将窗体的 Recordset 对象赋值给变量。如何绑定窗体数据源到Recordset?

 

作者:cg1  摘自:access911.net  录入:cg1  时间:2002-11-19  浏览人次:2912


专题地址:http://access911.net/fixhtm/79FA.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:如何在VBA程序中将窗体的 Recordset 对象赋值给变量?《窗体》

 


有些朋友使用以下代码总是出错
Dim Rst As New ADODB.Recordset
Rst = Me.Recordset
Rst = Me.RecordsetClone

现在解释如下:

窗体的 Me.Recordset 是一个通用对象,因为平时使用了 Jet 的绑定,所以缺省的
Me.Recordset 是 DAO.Recordset 类型。
如果你直接用它来保存 ADODB.Recordset ,使用下面方法。
在 Form_Open 里面加入一下代码
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
With rs
    .ActiveConnection = CurrentProject.Connection
    .Source = "SELECT * FROM 你的表"
    .LockType = adLockOptimistic
    .CursorType = adOpenKeyset
    '如果要可更新数据集,请使用
    '.CursorLocation = adUseClient
    '.CursorType = adOpenDynamic
    .Open
End With
Set.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/79FA.htm

 


上一篇:如何用VBA打开控制面板中的选项?

下一篇:API 函数集锦

2017年2月22日生成静态资料