Failed to open a row set

[maryam_jamshid]

من یه برنامه نوشتم که گزارشگیری میکنه زمانی که تاریخ رو بهش میده و اون تاریخ وجود داره خطای "Failed to open a row set" میده،نمیدونم برای چیه؟
کدها رو در پایین نوشتم.


Dim myrpt As New gozareshbarasasetarekh
Dim obj As New showreport
ConnectionInfo.ServerName = "lu"
ConnectionInfo.UserID = "moshavere"
ConnectionInfo.UserID = "p"
ConnectionInfo.Password = "654"

CrTables = myrpt.Database.Tables
For Each CrTable In CrTables
crtableLogoninfo = CrTable.LogOnInfo
crtableLogoninfo.ConnectionInfo = ConnectionInfo
CrTable.ApplyLogOnInfo(crtableLogoninfo)
Next
Dim ds1 As New DataSet
Dim txt1 As CrystalDecisions.CrystalReports.Engine.TextObject
txt1 = myrpt.ReportDefinition.ReportObjects("txt1")
txt1.Text = txtdate.Text
Dim txt2 As CrystalDecisions.CrystalReports.Engine.TextObject
txt2 = myrpt.ReportDefinition.ReportObjects("txt2")
txt2.Text = tarekh.Text
obj.CrystalReportViewer1.ReportSource = myrpt
myrpt.SetParameterValue("tarekh", tarekh.Text)
obj.CrystalReportViewer1.ReportSource = myrpt
obj.ShowDialog()

[el_abdollahi]

Dim ds1 As New DataSet
این دستور برای چیه؟؟

[sm]

1- ابتدا مطمئن شوید که فیلدهای گزارشتون تغییر نکرده . توی کریستال از منوی Databse گزینه Verify Database رو انجام بدین.
2- توی برنامه جایی که نام سرور و جدول و user و pass رو مشخص کردین نیز مطمئن شوید که اطلاعات با سرور مطابقت دارد.
3- در ارسال پارامتر نیز دقت نمایید که نام را درست وارد کرده باشید.

موفق باشید