求助：如何实现检索结果生成dataReport报表。解决送50高分

[lskynet]

用adodc控件与数据库捆绑，DataEnvironment1和dataReport做的报表，如何实现数据库安一定的条件查询检索后生成的报表。（如：检索 “姓名＝王” 的记录）

[lskynet]

如何用一个报表显示出数据库的内容，并且在检索后显示检索的内容（其中报表绑定了数据库）

[lanty]

你只要把DATAREPORT中的TEXT控件的DATAFIELD设置的和表中字段名称一样,然后把DATAREPORT的DATASOURCE设为你的检索记录集就可以了.

[lskynet]

If DataEnvironment1.rsCommand1.State = adStateOpen Then
DataEnvironment1.rsCommand1.Close
End If
我用了上面的语句，但是我要点击两次预览报表，报表才有变化？
谢谢

[lskynet]

如何实现点击一次，实现报表的更新？

[MarGo]

If DataEnvironment1.rsCommand1.State = adStateOpen Then
DataEnvironment1.rsCommand1.Close
End If
DataEnvironment1.rsCommand1.open

[MarGo]

顺便问一下，我好久没来这里了，为什么我的信誉分少了？？？？

[lskynet]

求助

[cieon_123]

假设你用的command名为;cmd

dtatenvironment1.rscmd.filter="姓名='王'"
datareport.show

[shuchang0626]

别用那个控件了，引用ado
dim rst as new adodb.recordset
dim cnn as new adodb.connection
dim sql as string
sql="……"
rst.Open sql, cnn, adOpenKeyset, adLockPessimistic
Set DataEnvironment1.rsCommand1.DataSource = rst
Set DataReport1.DataSource = DataEnvironment1
DataReport1.Show

[lskynet]

问：shuchang0626（舒畅）
dim rst as new adodb.recordset
dim cnn as new adodb.connection
dim sql as string
sql="select * from 地址库 where 地址=天津"
rst.Open sql, cnn, adOpenKeyset, adLockPessimistic
Set DataEnvironment1.rsCommand1.DataSource = rst
Set DataReport1.DataSource = DataEnvironment1
DataReport1.Show
在运行后，系统报错“实时错误 3709 — 连接无法用于此操作，在上下文中它可能已关闭或无效”
报错语句：rst.Open sql, cnn, adOpenKeyset, adLockPessimistic

[lskynet]

MarGo 你的信誉值为 97

[lskynet]

我在检索后，在datagrid中显示出了要查询的内容，重要的是如何将显示出来的内容生成报表

[MarGo]

cnn 对象你打开了吗|||？？？
cnn.connectionstring =""
CNN.OPEN

[lskynet]

领分