如何使用ADO的记录集作为报表的数据源

mchyzh

想把一个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

只能用dao的方式,不能使用adodb吧

df

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

关注中