ADODB RecordSet作为Access Report RecordSource

Siv*_*esh 7 ms-access vba adodb recordset access-vba

我在Access 2003中有一个简单的表单,一个查询和一个报表.我必须使用VBA操作记录集中的查询结果,然后将其作为RecordSource传递给报表.

如果我将记录集声明为RecordSet并使用其Name属性作为报告的RecordSource,那么它正在工作.但是,因为我需要编辑记录集,所以尽管如下使用ADODB RecordSet会更容易.

记录集Dim rs As ADODB.RecordSet在全局模块中声明.其余的代码是;

Dim db As Database
Set db = CurrentDb
Dim con As ADODB.Connection
Set con = CurrentProject.Connection
Set rs = New ADODB.Recordset
Set rs.ActiveConnection = con
rs.Source = "Select * from XXX"
rs.LockType = adLockOptimistic
rs.CursorType = adOpenKeyset
rs.Open

'manipulate rs here....'
Run Code Online (Sandbox Code Playgroud)

我曾经将报告的RecordSource作为myReport.RecordSource = rs.Name传递.但是ADODB没有Name属性.

如何将此记录集作为其RecordSource传递给报表?

谢谢

Fio*_*ala 5

您无法将报表绑定到mdb中的ADO记录集,只能在adp中绑定:http://support.microsoft.com/? id = 287437