tengo el siguiente codigo
Código:
Try
Dim cRep As New ClassReportes
Dim dsInforme As New DataSet
Dim ds As New DataSet
ds = cRep.getReporte1()
If ds.Tables(0).Rows.Count <> 0 Then
'Dim idIniciativa As String = CStr(tablaIniciativa.Rows(0)(tablaIniciativa.ID_INICIATIVAColumn.Caption))
'idIniciativa = IIf(idIniciativa <> String.Empty, idIniciativa, "-1")
'Dim NombreIniciativa As String = tablaIniciativa.Rows(0)(tablaIniciativa.NOMBRE_INICIATIVAColumn.Caption)
'NombreIniciativa = IIf(NombreIniciativa <> String.Empty, NombreIniciativa, "Anónimo")
'adaptadorActividad.Fill(tablaActividad, CInt(idIniciativa))
'dsInforme.Tables.Add(CType(dt, DataTable))
Dim tmpReporte As New ReportDocument()
'Dim path As String = Server.MapPath("../")
'tmpReporte.Load(path & "\informes\informe_reporte_info.rpt")
tmpReporte.Load(Server.MapPath("..\..\informes\informe_reporte_info.rpt"))
tmpReporte.SetDataSource(ds)
Response.Buffer = False
Response.ClearContent()
Response.ClearHeaders()
Try
tmpReporte.ExportToHttpResponse(ExportFormatType.PortableDocFormat, Response, True, "Gestion")
Catch ex As Exception
End Try
End If
Catch ex As Exception
End Try
pero al llegar a la linea
tmpReporte.ExportToHttpResponse(ExportFormatType.P ortableDocFormat, Response, True, "Gestion")
lanza una excepcion, a que se puede deber.
Gracias
