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

Question

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

Answer 1

假设你用的command名为;cmddtatenvironment1.rscmd.filter="姓名='王'"
datareport.show

Answer 2

别用那个控件了，引用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

Answer 3

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

Answer 4

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

Answer 5

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

Answer 6

问：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

Answer 7

MarGo    你的信誉值为 97

Answer 8

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

Answer 9

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