iamebadi
سه شنبه 12 شهریور 1392, 14:25 عصر
با سلام
من يك ريپورت با فست ريپورت طراحي كردم و ريپورت رو هم به يك sp كه چند پارامتر مي گيره وصل كردم.از داخل خود فست ريپورت كه اجرا مي كنم هيچ مشكلي نداره و ريپورت اجرا ميشه.اما وقتي از داخل برنامه مي خوام ريپورت رو صدا بزنم توي متد Show خطاي زير رو ميده.
DragDrop registration did not succeed
اين هم كد برنامه
Protected Sub form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles form1.Load
Dim ReportName As String = Session("ReportName")
Dim sp_param_var_array() As String = Session("ReportParameter")
Dim sp_param_value_array() As Object = Session("ReportValues")
Dim Array_len As Integer
Dim i As Integer
Array_len = sp_param_var_array.Length()
Dim MyReport As New FastReport.Report
Dim ds As New DataSet
MyReport.Load(Server.MapPath("~") & "/Report/" & ReportName)
MyReport.RegisterData(ds)
MyReport.Dictionary.Connections(0).ConnectionStrin g = clsConfig.ReadConfigConnectionStrings("~")
For i = 0 To (Array_len) - 1
MyReport.SetParameterValue(sp_param_var_array(i), sp_param_value_array(i))
Next
WebReport1.Report = MyReport
WebReport1.Report.Show(True)
End Sub
ممنون از اساتيدي كه راهنمايي كنند
من يك ريپورت با فست ريپورت طراحي كردم و ريپورت رو هم به يك sp كه چند پارامتر مي گيره وصل كردم.از داخل خود فست ريپورت كه اجرا مي كنم هيچ مشكلي نداره و ريپورت اجرا ميشه.اما وقتي از داخل برنامه مي خوام ريپورت رو صدا بزنم توي متد Show خطاي زير رو ميده.
DragDrop registration did not succeed
اين هم كد برنامه
Protected Sub form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles form1.Load
Dim ReportName As String = Session("ReportName")
Dim sp_param_var_array() As String = Session("ReportParameter")
Dim sp_param_value_array() As Object = Session("ReportValues")
Dim Array_len As Integer
Dim i As Integer
Array_len = sp_param_var_array.Length()
Dim MyReport As New FastReport.Report
Dim ds As New DataSet
MyReport.Load(Server.MapPath("~") & "/Report/" & ReportName)
MyReport.RegisterData(ds)
MyReport.Dictionary.Connections(0).ConnectionStrin g = clsConfig.ReadConfigConnectionStrings("~")
For i = 0 To (Array_len) - 1
MyReport.SetParameterValue(sp_param_var_array(i), sp_param_value_array(i))
Next
WebReport1.Report = MyReport
WebReport1.Report.Show(True)
End Sub
ممنون از اساتيدي كه راهنمايي كنند