在哪里有下载?我的Email:[email protected]
解决方案 »
- 如何把汉字变为双字节16进制
- 浏览器高手关注:如何获得Web Browser中页面框架(frame iframe)内的元素。
- line input读取文本文件到数组的问题(在线)
- DBF数据导入问题!!!!!!!!!(急,在线等,欢迎高手拆招)
- 哪个api可以设置一个窗体为另一个的所有者(也就是show方法的ownerform参数效果)?
- 请教用VB安装SQL SERVER的数据库的问题
- VB的strconv函数在英文windows系统中无法正常运行,请指教!
- 如何将软件汉化??????
- vba 如何在数据区内删除所有空单元格,后面单元格右移动
- 如何在AddNew后立即取得ID号?高分急,在线等候
- vb编写的DLL、OCX 在pb,delphi,BCB等其它的环境中可是使用吗?
- access数据库中的ole对象类型的字段值如何显示在richtextbox控件上?谢谢!
E-MAIL:[email protected]
谢谢
例:CrystalReport1.SelectionFormula
= "{XXX表.YYY}='"& text1.text &"'"
其中XXX表为你数据库中要查询的表,YYY字段名,text1.text为用户输入的值
把所有的查询条件变量在报表中都设置成公式,报表时,把用户输入的条件传递进去就行了,公式变量的传递方法在报表工具自己的帮助里都有;
方法二:
把报表和一个事先做好的数据库表帮定,每次生成的ADO记录集先存到那个表里,然后再调用报表就可以了。
yourreport.DiscardSavedData
?????
意思就是不用报表缓冲区中的数据,而用当前新的数据
源码如下各位大哥帮我看看 TT
Dim ado_con As New ADODB.Connection
Dim ado_red As New ADODB.Recordset
Private Sub Command1_Click()
ado_con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=通讯录.mdb;Persist Security Info=False"
ado_red.Open "select * from 通讯录", ado_con, adOpenDynamic, adLockBatchOptimistic
Report.DiscardSavedData
Report.Database.SetDataSource ado_red
CRViewer1.ReportSource = Report 'reviewer1为报表
CRViewer1.ViewReport '这里我用refresh方法也报错
ado_red.Close
ado_con.Close
End Sub
我也是用ADO,查询后把数据记录集赋值给报表就行了
datareport.datasource=recordset
================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多,功能完备!★ 浏览帖子速度极快![建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。
★ 可以直接发贴、回复帖子★ 采用XML接口,可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录!
★ 支持在线检测程序升级情况,可及时获得程序更新的信息。★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]