quiero cambiar la cadena de conexion de mi reporte pero no se deja, me tope este codigo pero no funciona no marca ningun error pero el reporte sigue tomando la conexion vieja.
saludos y de antemano gracias
Dim Connection As New ConnectionInfo
With Connection
.ServerName = "RptServer"
.DatabaseName = "RptBase"
.UserID = "sa"
.Password = "55"
End With
Private Sub RepConnInfo(ByVal myConnectionInfo As ConnectionInfo, ByVal myReportDocument As ReportDocument)
Dim myTables As Tables = myReportDocument.Database.Tables
For Each myTable As CrystalDecisions.CrystalReports.Engine.Table In myTables
Dim myTableLogonInfo As New TableLogOnInfo
myTableLogonInfo.ConnectionInfo = myConnectionInfo
myTable.ApplyLogOnInfo(myTableLogonInfo)
Next
End Sub
