平面图采光分析:我现在在用vb的datareport做报表,我想打印MSFlexGrid中的内容,到底怎么样才能进行模糊查询的打印呢?

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/01 20:10:28
我的查询语句没有问题,是我的打印连接有问题吗?请大家帮忙看一下:

If DataEnvironment2.Connection1.State <> adStateClosed Then
DataEnvironment2.Connection1.Close
End If
DataEnvironment2.Connection1.Open "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & dat & "\dbzx.mdb"
DataEnvironment2.rsCommand1.Open Data1.RecordSource, DataEnvironment2.Connection1, adOpenStatic, adLockOptimistic
Set DataReport8.DataSource = DataEnvironment2
DataReport8.DataMember = "Command1"
DataReport8.Refresh
DataReport8.Show
End If

If Optzil2.Value = True Then
If DataEnvironment2.Connection1.State <> adStateClosed Then
DataEnvironment2.Connection1.Close
End If
DataEnvironment2.Connection1.Open "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & dat & "\dbzx.mdb"
DataEnvironment2.rsCommand2.Open Data1.RecordSource, DataEnvironment2.Connection1, adOpenStatic, adLockOptimistic
Set DataReport3.DataSource = DataEnvironment2
DataReport3.DataMember = "Command2"
DataReport3.Refresh
DataReport3.Show
End If
End Sub

不知道