السلام عليكــم ورحمـة الله وبركاتــه ،،
لدى تقرير كريستال ريبورت 10 متصل بـ stored procedures يحتوى على 2 parameter تاريخين اريد ان امرر الباراميتر من نموذج فيجوال بيسك 2005
هذا هو الكود الذى استخدمه
On Error Resume Next
Dim f As New frmprnt
Dim txtfromdate As String
Dim txttodate As String
Dim ExeternalReport As New ReportDocument
ExeternalReport.Load(Application.StartupPath & "\item_card_valu.rpt")
txtfromdate = Format(Me.DateTimePicker1.Value, "yyy, MM, dd, 00, 00, 000")
txttodate = Format(Me.DateTimePicker2.Value, "yyy, MM, dd, 00, 00, 00")
GETSERVERNAMEANDDATABASENAME(ExeternalReport, "Easy", "", "")
ExeternalReport.SetParameterValue("@FROM_DATE", txtfromdate)
ExeternalReport.SetParameterValue("@TO_DATE", txttodate)
f.CrystalReportViewer1.ReportSource = ExeternalReport
f.CrystalReportViewer1.Zoom(95%)
f.CrystalReportViewer1.RefreshReport()
f.Show()
تظهر لى رسالة خطا ارفقتها
ارجو المساعدة........
