1188
社区成员
VB中调用水晶9如何让其自动刷新数据表中的数据？
Screen.MousePointer = vbHourglass
Set Report = CryApp.OpenReport(App.Path & "\rpt\tmp_persontab.rpt")
CRViewer91.ShowPreviousPage
CRViewer91.ReportSource = Report
CRViewer91.ViewReport
CRViewer91.Zoom 100
Screen.MousePointer = vbDefault
Set Report = CryApp.OpenReport(App.Path & "\rpt\tmp_persontab.rpt")
CRViewer91.ShowPreviousPage
CRViewer91.ReportSource = Report
CRViewer91.ViewReport
CRViewer91.Zoom 100
Screen.MousePointer = vbDefault
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
sangshuyezi 2004-08-26
我做的报表都可以显示为最新的数据。有一点不知道你是不是如此：
请将报表设计器中指定的数据表名，用sql语句（不要带where等后面的语名）替代。
在代码中的sql语句就可以更据条件写上where语句。记得from前的语句在报表和代码中的保持一致。
请将报表设计器中指定的数据表名，用sql语句（不要带where等后面的语名）替代。
在代码中的sql语句就可以更据条件写上where语句。记得from前的语句在报表和代码中的保持一致。
scxs 2004-08-26
我在报表设计器中指定了数据表，在代码中曾也加入过SQL语句，但始终不能更新最新数据，就是不希望按REFRESH按扭
sangshuyezi 2004-08-26
下面这段代码是采用ADO数据源的。
Dim rptApp As New CRAXDRT.Application
Dim rpt As New CRAXDRT.Report
Dim rs As ADODB.Recordset
Dim Conn As ADODB.Connection
Set Conn = New ADODB.Connection
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=databasename.mdb;Persist Security Info=False"
Set rs = New ADODB.Recordset
'SqlString是你的数据查询语句。
rs.Open SQLString, Conn, adOpenKeyset, adLockReadOnly, 1
Set rpt = rptApp.OpenReport(App.Path & "\rpt\tmp_persontab.rpt")
Call rpt.Database.Tables(1).SetDataSource(rs)
rpt.DiscardSavedData
CRViewer1.ReportSource = rpt
CRViewer1.ViewReport
报表出现后即是数据库中最新的数据，在查看时有数据，可以让用户按"refresh"按扭完成或重新找开报表。
让refresh按扭出现的属性是CRViewer1.EnableRefreshButton=true
Dim rptApp As New CRAXDRT.Application
Dim rpt As New CRAXDRT.Report
Dim rs As ADODB.Recordset
Dim Conn As ADODB.Connection
Set Conn = New ADODB.Connection
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=databasename.mdb;Persist Security Info=False"
Set rs = New ADODB.Recordset
'SqlString是你的数据查询语句。
rs.Open SQLString, Conn, adOpenKeyset, adLockReadOnly, 1
Set rpt = rptApp.OpenReport(App.Path & "\rpt\tmp_persontab.rpt")
Call rpt.Database.Tables(1).SetDataSource(rs)
rpt.DiscardSavedData
CRViewer1.ReportSource = rpt
CRViewer1.ViewReport
报表出现后即是数据库中最新的数据，在查看时有数据，可以让用户按"refresh"按扭完成或重新找开报表。
让refresh按扭出现的属性是CRViewer1.EnableRefreshButton=true
Visual Basic开发实战1200例(第2卷)(完整版).(清华出版.孙秀梅.巩建华).part2 实例134 删除表中多余的重复行数据 235 实例135 对数据库数据进行局部删除 236 3.24 视图 237 实例136 动态创建视图 237 实例137 通过视图更改数据 238 实例138 删除视图 240 3.25 触发器 241 实例139 创建...
使用水晶报表不刷新数据的问题 我使用vb调用水晶报表9.0时，打开预览时出现没有记录的报表，点击刷新按钮执行一次就可以把要查找的记录显示出现，经过不断的测试和查找问题得以解决，在填充记录集合前使用DiscardSavedData方式释放掉水晶报表应用...
水晶报表在VC 6.0中的使用 水晶报表在VC 6.0中的使用 1．创建VC工程添加报表控件 在VC集成环境中用AppWizard新建一个MFC单文档工程，其余选项都为默认。菜单中选择Project->Add To Project->Components and Controls...弹出组件、控件...
vb/vb.net原创文章精粹（4） [url=http://www.vbbaike.com/show.asp?id=101410]各位帮忙 找一个w70n5msg.dll 文件[/url] ...id=101409]ＶＢ中如何使用insert语句，插入一条纪录[/url] [url=http://www.vbbaike.com/show...
vb/vb.net开发精粹(4) 各位帮忙 找一个w70n5msg.dll 文件 ＶＢ中如何使用insert语句，插入一条纪录 分布式组件状态问题 在VB6.0中 使用SQLDMO.SQLServer 显示数据库名称出错啦, 请大家指点...在VB控制水晶报表中，用不固定的数据源，运行
vb/vb.net开发精粹(8) vb调用vc动态连接库问题!!(100分求) SQL查询问题??会的快来 已会C++, 再学习VB还是C#? 如何在用一个程序打开一个文件的同时,用另一程序获取该文件的文件名? VB中如何用ADO从ORACLE中复制一个表到ACCESS数据库
vb/vb.net原创文章精粹（3） id=101350]请教VB6.0+数据库的问题！请各位高手指教！[/url] [url=http://www.vbbaike.com/show.asp?id=101349]用VBA能否实现对WORD登陆密码的修改？[/url] [url=http://www.vbbaike.com/show.asp?...
NET中水晶报表的使用 =====================================================http://www.newasp.net/tech/net/12426.html 一、在使用自带的水晶报表时，请注册，否则只能使用30次水晶报表注册码注册号:6707437608密码:AAP5GKS0000GDE...
vb/vb.net开发精粹(2) 关于EXCEL转换成ACCESS库 关于vb生成exe后出现的问题，急！！！！ 一道不知拿不定主意的小题 是不是需要刷新一下窗口？ vb 连接sql2000 数据库 超慢的问题~ uridownloadtofile 函数问题 ...VB6.0如何调用打印纸格
vb/vb.net原创文章精粹（2） [url=http://www.vbbaike.com/show.asp?id=101290]关于EXCEL转换成ACCESS库[/url] ...id=101289]关于vb生成exe后出现的问题，急！！！！[/url] [url=http://www.vbbaike.com/show.asp?id=101...
vb/vb.net开发精粹(3) 请教VB6.0+数据库的问题！请各位高手指教！ 用VBA能否实现对WORD登陆密码的修改？ 这两个字符串 为什么无法链接到一起？？？？ 去掉一位数组中包含的另一个数组的值 串口接受的数据如何处理？？？？？？？？？？...
Visual Basic开发实战1200例(第2卷)(完整版).(清华出版.孙秀梅.巩建华).part1 实例134 删除表中多余的重复行数据 235 实例135 对数据库数据进行局部删除 236 3.24 视图 237 实例136 动态创建视图 237 实例137 通过视图更改数据 238 实例138 删除视图 240 3.25 触发器 241 实例139 创建...
VB串口通信技术资料：媒体/源码/论文/书籍/视频/控件/程序 VB串口通信技术资料：媒体/源码/论文/书籍/视频/控件/程序 联系QQ：149034219 获取地址：http://item.taobao.com/item.htm?id=17223194202 淘宝地址：http://shop34608724.taobao.com 一、总目录如下所示： ...
C#中的shallow copy 与deep copy（一） mvc4中UI层要实现报表功能，其数据是从service层抽上来，底层方法是用DB.toList实现，可是不知道为什么数据是延迟加载（放入rpt中的是一个指向数据库的查询，但不是结果），这样就没有办法放进rpt模板中。...
vb/vb.net开发技巧荟萃(六) 300元请人做一个自动点击领取的软件 300元请人做一个自动点击领取的软件 vb中如何将excel导入到sql server的数据库中 vb调用vc动态连接库问题!!(100分求) SQL查询问题??会的快来 已会C++, 再学习VB还是C#? ...
浙江师范大学实验室开放项目《应用水晶报表快速开发数据库管理系统》进度表 浙江师范大学实验室开放项目进度表 项目名称 应用水晶报表快速开发数据库管理系统所在实验室公共基础实验室实验类型□综合设计 □科学研究 □自拟课题 □计算机应用 □人文素质指导教师姓名丁革建曾棕根 职称...
ASP.net编程中遇到的错误及解决方法 6,错误现象：不允许从数据类型 varchar 到数据类型 money 的隐性转换（表 'sckf.dbo.非工程非产品静态信息表'，列 '合同额'）。请使用 CONVERT 函数来运行此查询。 解决方法：把money类型的字段改为decimal类型...
