收录日期:2019/05/20 13:07:47 时间:2016/05/24 00:10:45 标签:VB.NET
下面一段帮助的意思是不是就表示可以不在设计项目时建立dataset而在程序中动态返回?
Dim dsdataSet As New DataSet()
Dim oRpt As New rptClient()   '已建立的报表rptClient
请读者自行填充数据集dsdataSet(我的问题就在这里,这里的自行填充是不是就是只要返回一个dataset就可

以了呢?????) 
'使用“报表引擎”对象模型将填充的数据集,传递给报表
oRpt.SetDataSource(dsdataSet.Tables(0))
' 将带有数据的报表对象绑定到 Windows 窗体查看器,rptVew(CrystalReportViewer控件)
rptVew.ReportSource = oRpt

如果这样的话 为什么我下面的代码会产生怎么多问题呢?
1)、在本机调试的时候:
中断调试的时候发现返回的dataset数据集中的直是取对的,但是显示在报表上的内容却总是所有的记录,仿佛

dataset根本没有跟orpt绑定!
2)、移到其他机子上调试的时候:
我在单位调试可以用的报表 拿到家里就不能用了 出现不能浏览报表的错误(我用web窗体设计的) 在运行前

我已经把数据库验证了一下 现在rpt文件连的服务器是最新的(即我的家里机子的名字) 为什么还是不行?

代码如下:(BsData是一个类在用了其中的一个函数ReportData用来返回一个dataset在把这个dataset 

PROFORMA_INVOICE是一张已经建好的报表 )

Dim bd As New BsData()
bd.strWhereFieldName(0) = "a.S_xshth"
bd.strWhereFieldValue(0) = "b.S_xshth"
bd.blnWhereField(0) = True
bd.strWhereFieldName(1) = "a.S_xshth"
bd.strWhereFieldValue(1) = Session("KeyNum")
bd.blnWhereField(1) = False
bd.intField = 2
dim MyDs as New Dataset()
'这里我定义了一个dataset在项目设计的时候我没有做dataset.xsd,我的意图是随便定义一个dataset用来放r

eportdata返回的数据集,以便给orpt绑定数据
MyDs = bd.ReportData("", "S_xshtmain", "S_xshtproduct", "")
bd = Nothing
Dim oRpt As New PROFORMA_INVOICE()    '定义一个PROFORMA_INVOICE实力oRpt
oRpt.SetDataSource(MyDs.Table(0))
' 水晶报表绑定
crlview.ReportSource = oRpt
' 设定水晶报表的ReportSource
oRpt = Nothing

如何使动态按键变灰 傻傻地问:sql 的like查询与全文检索(全文索引)查询的区别? JFreeChart 画曲线图 月份乱码问题 各位高手,如何获取禁用了的网卡物理地址 大家好,我想把下面js代码换为asp代码,可不知道怎么换,请帮我将下面的代码换为asp代码,谢谢大家了. 用ant编译,报找不到符号。 一个简单的s3c2410键盘驱动问题 cdialogbar 大小刷新问题 关于C++代码问题 pb5.0通过串口回应EBOOT发送的bootme问题 yctin 朋友在吗? 请求高手指点 找茬,还是求素数的问题 请教如何使用flash/flex切换输入法?或者打开软键盘? 如何在MFC内嵌excel,用EXCEL指针 本机测试gif动画图片上传后就变成静止的了? wince shortcut 怎么总是打不开? 如何在delphi中调用QuickTime播放mp4文件? 急求!如何在jsp页面中 嵌入网页并修改dom的属性? 我要显示空格 摄像头/摄像机 的选择 如何修改库的逻辑文件名? 关于WPF中的依耐属性 (30分) 循环变量没有做额外的运算,怎么可能会大于循环条件值??? 进来就有分 C++ Treeview 的问题 不同用户表之间更新数据 用js 去除数字后面的百分号 新学关于需求管理工具DOORs8.3,下载的试用版,可没有license,不知道那能找到? 异地恋我应该注意些什么呢?女友说想我想得哭了,我觉得有一点压力,怎么安慰她比较好呢? 检测USB设备