标题:[求助]关于CrystalReport问题,请教!
只看楼主
mkb21
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2007-9-22
 问题点数:0 回复次数:4 
[求助]关于CrystalReport问题,请教!
小弟刚学CrystalReport,对此一无所知,希望大哥教导,我做了一个DataGrid的表,当选中某一记录时,就将该记录的所有字段值传给了一个变量数组myPrinTxt(),并在新窗口中的CrystalReportView控件中显示,已做好了rpt文件,文件中设置了参数字段,分别为myPrint(),我该怎么传值过去?求Sub原码,万分感谢!

搜索更多相关主题的帖子: 记录 大哥 
2007-09-28 12:11
bygg
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:乖乖的心中
等 级:版主
威 望:241
帖 子:13555
专家分:3076
注 册:2006-10-23
得分:0 
先创建一个dataset,里面加一个table,table里面的字段就和你上面图片里显示的字段一样.
然后,在你选择的时候,根据ID查询出来一条数据,再分别把查询出来的数据放入table中相应的字段中,再把这个dataset的数据加载到CrystalReportView就行了

飘过~~
2007-09-29 11:41
mkb21
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2007-9-22
得分:0 

怎么将dataset的数据加载到CrystalReportView呢?是不是

MyId=me.DataGrid1.Item(hti.row,0) '从DataGrid1的点击中获得id号
Dim MyDS As New Dataset1()
Dim MyTable = "Customer"

MyDA.Fill(MyDS, MyTable)
MyCommand.CommandText = "Select * from " & MyTable & " Where id=" & MyId
MyDA.SelectCommand = MyCommand

me.CrystalReportView1.SetDataSource(MyDS)

我试过,还是不行,求代码!

[此贴子已经被作者于2007-9-29 21:39:56编辑过]


\\\\// ~\'~ ^
2007-09-29 21:33
bygg
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:乖乖的心中
等 级:版主
威 望:241
帖 子:13555
专家分:3076
注 册:2006-10-23
得分:0 
不是的,
你得新建一个DataSet(如名字叫:dsShow),这样才可以添加到报表专家那里,也才能拖到页面上显示,然后把你上面的MyDS里面的东西全部赋给新建的那个dsShow,再me.CrystalReportView1.SetDataSource(dsShow)

飘过~~
2007-09-30 09:52
mkb21
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2007-9-22
得分:0 
搞掂,谢谢!真诚的感谢!

\\\\// ~\'~ ^
2007-09-30 12:48



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-173588-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.230122 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved