请大家帮我看看,哪里出错了,
以下是写的代码,利用RV查看Rpt报表
Dim myDS As New DataSet1 '这就是我们在设计模式上使用的DataSet
Dim oRpt As New Report1 '这是设计模式的report1,数据连接,服务器(xcyzyy)、用户(sa、sa) 、数据库database1
'(记录为3)
rs = New ADODB.Recordset '此时我已换数据库名为database2(记录为2条)
rs.CursorLocation = ADODB.CursorLocationEnum.adUseClient
rs.Open("select * from TB_data1", conn, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)
OleDbDataAdapter1.Fill(myDS.TB_data1, rs)
',此时我通过立即窗口测试,查到dataset已经成功填充(记录为2条),立即窗口测试方法如最下面一段
oRpt.SetDataSource(myDS)
Dim logOnInfo As New CrystalDecisions.Shared.TableLogOnInfo
logOnInfo = oRpt.Database.Tables("TB_data1").LogOnInfo
logOnInfo.ConnectionInfo.Password = SQL_password
oRpt.Database.Tables("TB_data1").ApplyLogOnInfo(logOnInfo)
Cpv1.ReportSource = oRpt
'此时报表窗口显示(记录为3条)
立即窗口测试如下:记录为2条
?myds.TB_data1.Rows
{System.Data.DataRowCollection}
Count: 2
IsReadOnly: False
IsSynchronized: False
Item: <cannot view indexed property>
SyncRoot: {System.Data.DataRowCollection}
请问我哪里出错了??