error de ruta
Publicado por indrema (11 intervenciones) el 17/10/2007 20:11:12
hola a todos...tengo un reporte sobre crystal 11 y le mando los parametros dede vb.net 2005, mi problema es k a veces me marca el error
load report file
y despues este otro :
invalid report file path
pero a veces lo marca no siempre no se a k se debe...algunas jala bien y todo otras me marca esos erres y el debug se pone en este codigo:
Dim myTables As Tables = RpDocFact.Database.Tables
mi codigo de conexion es este:
Private Sub SetDBLogonForReport(ByVal Myconne As ConnectionInfo, ByVal RpDocFact As ReportDocument)
'rptfactura.ReportSource = "C:\Crystal\Rptfacturacion.rpt"
RpDocFact.FileName = "C:\Crystal\Rptfacturacion.rpt"
Dim myTables As Tables = RpDocFact.Database.Tables
For Each myTable As CrystalDecisions.CrystalReports.Engine.Table In myTables
Dim myTableLogonInfo As TableLogOnInfo = myTable.LogOnInfo
myTableLogonInfo.ConnectionInfo = Myconne
myTable.ApplyLogOnInfo(myTableLogonInfo)
Next
End Sub
el cual mando llamar desde aki
Private Sub ConfiguraCReports()
Dim myconn As ConnectionInfo = New ConnectionInfo
myconn.DatabaseName = "puntoventasql"
myconn.UserID = "sa"
myconn.Password = "sisaliser"
SetDBLogonForReport(myconn, reportDocument1)
End Sub
espero k me puedan ayudar y gracias de antemano.....saludos..bye
load report file
y despues este otro :
invalid report file path
pero a veces lo marca no siempre no se a k se debe...algunas jala bien y todo otras me marca esos erres y el debug se pone en este codigo:
Dim myTables As Tables = RpDocFact.Database.Tables
mi codigo de conexion es este:
Private Sub SetDBLogonForReport(ByVal Myconne As ConnectionInfo, ByVal RpDocFact As ReportDocument)
'rptfactura.ReportSource = "C:\Crystal\Rptfacturacion.rpt"
RpDocFact.FileName = "C:\Crystal\Rptfacturacion.rpt"
Dim myTables As Tables = RpDocFact.Database.Tables
For Each myTable As CrystalDecisions.CrystalReports.Engine.Table In myTables
Dim myTableLogonInfo As TableLogOnInfo = myTable.LogOnInfo
myTableLogonInfo.ConnectionInfo = Myconne
myTable.ApplyLogOnInfo(myTableLogonInfo)
Next
End Sub
el cual mando llamar desde aki
Private Sub ConfiguraCReports()
Dim myconn As ConnectionInfo = New ConnectionInfo
myconn.DatabaseName = "puntoventasql"
myconn.UserID = "sa"
myconn.Password = "sisaliser"
SetDBLogonForReport(myconn, reportDocument1)
End Sub
espero k me puedan ayudar y gracias de antemano.....saludos..bye
Valora esta pregunta


0