I have develop an application in Vb2010 and am using SAP Crystal Reports for Visual Studio 13.0.4 to print my report. The problem is i have my database with is MS SQL Sever 2008 R2 sitting on a different computer and the application connect to this database remotely. when i print the report out i have this error failed to load report. when i print it on the same computer in which i have my database on it works fine. But on a different computer it doesn't work well.
THis the code
THis the code
Code:
Public Sub loadReport(ByVal reportPath As String, ByVal parameter As String, ByVal stringTosearch As String, ByVal CrystalReportViewerName As CrystalDecisions.Windows.Forms.CrystalReportViewer)
Dim cryRpt As New ReportDocument
Dim crParameterFieldDefinitions As ParameterFieldDefinitions
Dim crParameterFieldDefinition As ParameterFieldDefinition
Dim crParameterValues As New ParameterValues
Dim crParameterDiscreteValue As New ParameterDiscreteValue
Dim crtableLogoninfos As New TableLogOnInfos
Dim crtableLogoninfo As New TableLogOnInfo
Dim crConnectionInfo As New ConnectionInfo
Dim CrTables As Tables
Dim CrTable As Table
cryRpt.Load(reportPath)
With crConnectionInfo
.ServerName = "Workstation-PC"
.DatabaseName = "StudentManagement_DB"
.UserID = "ben"
.Password = "123123a"
End With
CrTables = cryRpt.Database.Tables
For Each CrTable In CrTables
crtableLogoninfo = CrTable.LogOnInfo
crtableLogoninfo.ConnectionInfo = crConnectionInfo
CrTable.ApplyLogOnInfo(crtableLogoninfo)
Next
crParameterDiscreteValue.Value = stringTosearch 'TextBox2.Text
crParameterFieldDefinitions = cryRpt.DataDefinition.ParameterFields()
crParameterFieldDefinition = crParameterFieldDefinitions.Item(parameter)
crParameterValues = crParameterFieldDefinition.CurrentValues
crParameterValues.Clear()
crParameterValues.Add(crParameterDiscreteValue)
crParameterFieldDefinition.ApplyCurrentValues(crParameterValues)
CrystalReportViewerName.ReportSource = cryRpt
CrystalReportViewerName.Refresh()
End Sub