ActiveReports 2做报表，如何能动态将查询结果(recordset对象)报表？

[mayong]

ActiveReports 2做报表，如何能动态将查询结果(recordset对象)报表？

[zlpanzy]

DataEn.Commands("Command").Parameters(0).Type = adVarChar
DataEn.Commands("Command").Parameters(0) = 参数变量
RepTj_Gztj.Show

[y1g1y1]

set ActiveReport1.DataControl1.RecordSet =yourRecordset

即可.

[mayong]

报表里没Recordset属性啊，还是不对哦

[SuperZhou]

设置报表的Recordset的属性就可以了

[xunxm]

可以的，你可以这样。
Private Sub cmdPrint_Click()
Dim rs as ADODB.Recordset
.....
set arpList.DtataCorntrol1.RecordSet = rs
arpList.Show
End Sub

[seawind00]

在Activereport报表的Detail中加入DAO（DAODataControl1）控件，窗体加一打印command1,然后加入代码：
Private Sub Command1_Click()
DAODataControl1.DatabaseName=app.path & "/...../abc.mdb"
DAODataControl1.RecordSource="select * from table"
activereport1.show
End Sub

[kulama2004]

为什么我用上面的方法什么都显示不出来？
在form1中做查询，得到一个recordset
然后调用一个activereport来显示记录集报表
在activereport中添加一个ado的datacontrol
然后
Set ActiveReport1.DataControl1.Recordset = Form1.Adodc1.Recordset
ActiveReport1.Show
为什么什么都显示不出来？