为什么在水晶报表中出现重复记录,而在查询分析器中又是正确的?

leayh 2005-01-03 02:00:39
事先用设计器做好了rpt文件,在VB6里调用,调用语句如下所示。我只想要第一个客户有前5条订单记录,可事实上在报表中打印出来的每一张订单都重复了5条。查询语句在查询分析器中测试是正确的,可为什么到报表里就不对呢(注:报表用到了客户.姓名进行分组)?

Dim crApp As New CRAXDRT.Application
Dim crRpt As New CRAXDRT.Report
Dim Con As New ADODB.Connection
Dim Rst As New ADODB.Recordset
Dim strSql As String

Private Sub Form_Load()
strSql = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\xtreme.mdb" & ";Persist Security Info=False"
Con.Open strSql
strSql = "SELECT top 5 客户.*, 订单.* FROM 客户 INNER JOIN 订单 ON 客户.[客户 ID] = 订单.[客户 ID] order by 客户.[客户 ID], 订单.[订单 ID]"
Rst.Open strSql, Con, adOpenStatic, adLockReadOnly, adCmdText
Set crRpt = crApp.OpenReport(App.Path & "\order.rpt")
crRpt.DiscardSavedData
crRpt.Database.SetDataSource Rst, 3, 1
crRpt.Database.SetDataSource Rst, 3, 2
CRV.ReportSource = crRpt
CRV.DisplayBackgroundEdge = False
CRV.DisplayGroupTree = False
CRV.Refresh
CRV.ViewReport
End Sub
...全文
110 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
leayh 2005-01-21
  • 打赏
  • 举报
回复
没办了吗?还是结贴算了,太久了。谢谢各位。
friendjin 2005-01-20
  • 打赏
  • 举报
回复
好象不支持动态多表的(在设计器里)
starfiret 2005-01-06
  • 打赏
  • 举报
回复
客户和订单表涉及到的字段(客户.*/订单.*)内容不要放在报表设计器的Detail(明细)里面!
一般放在页标头里就不会重复了~
leayh 2005-01-06
  • 打赏
  • 举报
回复
Up
leayh 2005-01-03
  • 打赏
  • 举报
回复
把这一句去掉也不行。
myhgyp 2005-01-03
  • 打赏
  • 举报
回复
看代码是没什么问题,是不是crRpt.DiscardSavedData在作怪
leayh 2005-01-03
  • 打赏
  • 举报
回复
我希望它显示的是:
City Cyclists 20,045.27 1 41.90
City Cyclists 20,045.27 1,033 3,520.30
City Cyclists 20,045.27 1,041 764.85
City Cyclists 20,045.27 1,092 42.00
City Cyclists 20,045.27 1,143 62.33
Total: 4,431.38

可实际上报表中显示的是:
City Cyclists 20,045.27 1 41.90
City Cyclists 20,045.27 1 41.90
City Cyclists 20,045.27 1 41.90
City Cyclists 20,045.27 1 41.90
City Cyclists 20,045.27 1 41.90
City Cyclists 20,045.27 1,033 3,520.30
City Cyclists 20,045.27 1,033 3,520.30
City Cyclists 20,045.27 1,033 3,520.30
City Cyclists 20,045.27 1,033 3,520.30
City Cyclists 20,045.27 1,033 3,520.30
City Cyclists 20,045.27 1,041 764.85
City Cyclists 20,045.27 1,041 764.85
City Cyclists 20,045.27 1,041 764.85
City Cyclists 20,045.27 1,041 764.85
City Cyclists 20,045.27 1,041 764.85
City Cyclists 20,045.27 1,092 42.00
City Cyclists 20,045.27 1,092 42.00
City Cyclists 20,045.27 1,092 42.00
City Cyclists 20,045.27 1,092 42.00
City Cyclists 20,045.27 1,092 42.00
City Cyclists 20,045.27 1,143 62.33
City Cyclists 20,045.27 1,143 62.33
City Cyclists 20,045.27 1,143 62.33
City Cyclists 20,045.27 1,143 62.33
City Cyclists 20,045.27 1,143 62.33

Total: 22,156.90

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧