SoloCodigo
CLR: .Net / Mono / Boo / Otros CLR => VB .NET => Mensaje iniciado por: ishinji_01 en Viernes 20 de Abril de 2007, 23:48
-
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