水晶报表8.0 SetDataSource方法求教

[vclearner]

下面是水晶报表8.0安装后VB6示例Report Variables中的代码片段
我对SQL加个where 1=2条件后为什么报表出现的数据没有变化啊
SetDataSource动态改变数据源后为什么报表不发生变化，该如何做呢？
另外我想问一下工程中可以进行报表设计的dsr如何添加啊？

Dim m_Report As New CRReportVariables

Dim m_Connection As ADODB.Connection
Dim adoRS As ADODB.Recordset

Dim SQL As String
Dim strConnect As String

Set m_Connection = New ADODB.Connection
Set adoRS = New ADODB.Recordset

strConnect = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & App.Path & "\ReportVariables.mdb;Mode=Read"
m_Connection.Open strConnect
SQL = "Select * from tblSampleData"
adoRS.Open SQL, m_Connection, adOpenDynamic, adLockBatchOptimistic
m_Report.Database.SetDataSource adoRS
....

[vclearner]

我顶

[weizhuo]

仔细去分析一下那个ADO Connection Methods例子

[rocllllll]

(1)、数据不发生变化,是因为Crystal自己有Cache,上一次的数据他已保存,下次自动调出时,快,解决的办法,在保存是,去掉File里的Save data With Report,另外,在报表中添加一个IntTest字段(Int参数),每次到如数据时,使其自动加1导入进来,这样就会刷新(这个问题原先我们碰到过,后来这么解决的，关键!!!)
(2)、直接在工程中添加Crystal Report 8.5即可
(如工程中没有,则要在部件的设计器中先将Crystal Report 8.5加进来,在执行上部操作)
如有问题-->[e-mail]