如何动态打印报表？
请各位高手帮忙！ 一个DATAGRID表，用ADO控件绑定，动态查询数据库中的数据。现在DATA ENVIRONMENT DESIGN 中用COMMAND连接到DATAREPORT 现在要实现动态打印DATAGRID 中查询的数据到DATAREPORT中！现在无法实现 请高手帮忙！ 问题点数：100、回复次数：6Top
1 楼nebular（星云）回复于 2002-05-23 18:53:58 得分 40
set datareport1.datasource=DATAENVIRONMENT1
datareport1.datamember="Command1"
在报表中设置好控件的DataField，让其与字段名相同就行了。
参见我的贴子
http://www.csdn.net/Expert/TopicView1.asp?id=654745Top
2 楼nebular（星云）回复于 2002-05-23 18:54:11 得分 0
set datareport1.datasource=DATAENVIRONMENT1
datareport1.datamember="Command1"
在报表中设置好控件的DataField，让其与字段名相同就行了。
参见我的贴子
http://www.csdn.net/Expert/TopicView1.asp?id=654745Top
3 楼zhchg（zhchg）回复于 2002-05-23 19:06:41 得分 15
设计好报表后，将报表(rpt)的Datasource和Datamember属性清空，
然后在打印时：
set rpt.datasource=adodc.recordset
rpt.show
即可Top
4 楼shuchang0626（舒畅）回复于 2002-05-23 22:16:47 得分 15
Set DataEnvironment1.rsCommand1.DataSource = rst
Set DataReport1.DataSource = DataEnvironment1
DataReport1.ShowTop
5 楼lzhzxl（云中人）回复于 2002-05-24 11:50:54 得分 15
Unload DataEnvironment1
Set DataEnvironment1.rsCommand1.DataSource = rst
Set DataReport1.DataSource = DataEnvironment1
DataReport1.Show
注:Unload DataEnvironment1语句用于刷新报表数据源
Top
6 楼wuzhu（wuzhu）回复于 2002-05-24 12:11:00 得分 15
将 datareport 的数据源设置成 adodb.recordset 就可以了With dtaRpt
Set dtaRpt.DataSource = TestRs
.Sections("section1").Controls.Item("Text1").DataField = TestRs.Fields(0).Name
.Sections("section1").Controls.Item("Text2").DataField = TestRs.Fields(1).Name
.Sections("section1").Controls.Item("Text3").DataField = TestRs.Fields(2).Name
.Sections("section1").Controls.Item("Text4").DataField = TestRs.Fields(3).Name
.Show
End With
Top
7 楼zjoe（阿冲）回复于 2002-05-31 14:54:47 得分 0
谢谢各位高手的帮助！Top
相关问题
关键词
得分解答快速导航
相关链接
广告也精彩
反馈
