Provide login info for each datatable in crystal report
With TblInfo.ConnectionInfo
.ServerName = Utils.getConStr("Datasource")
.DatabaseName = Utils.getConStr("DataBase")
.UserID = Utils.getConStr("user")
.Password = Utils.getConStr("pwd")
End With
With pReport
.Database.Tables(0).SetDataSource(pDS.Tables(0))
.Database.Tables(0).ApplyLogOnInfo(TblInfo)
.RecordSelectionFormula = ""
For i As Integer = 0 To pReport.Subreports.Count - 1
If .Subreports(i).Database.Tables.Count > 0 Then
.Subreports(i).Database.Tables(0).ApplyLogOnInfo(TblInfo)
.Subreports(i).Database.Tables(0).SetDataSource(pDS.Tables(.Subreports(i).Database.Tables(0).Name))
End If
Next
End With