Office中国论坛/Access中国论坛

标题: 如何使用ADO的记录集作为报表的数据源 [打印本页]

作者: mchyzh    时间: 2008-9-17 20:41
标题: 如何使用ADO的记录集作为报表的数据源
想把一个ADO记录集作为报表的数据源,用以下方法尝试失败。
请指点迷津
Private Sub Report_Open(Cancel As Integer)
Dim rst As New ADODB.Recordset
rst.CursorLocation = adUseClient
rst.Open "SELECT 表1.* FROM 表1", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
Set Me.Recordset = rst
End Sub
作者: ui    时间: 2008-9-17 21:07
只能用dao的方式,不能使用adodb吧
作者: df    时间: 2008-9-18 17:53
Dim NAME As String
Dim dh As String
Dim dbs As Database
Dim rs As DAO.Recordset
Set dbs = CurrentDb()
NAME = "SELECT * from  表1]"

Me.RecordSource = NAME
Me.OrderByOn = True
作者: rcylbx    时间: 2008-9-18 20:57
关注中




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3