Abrir un archivo pdf con asp.net

[natan78]

Saludos tengo una aplicaion web con asp.net y estoy esxportando unos reportes a archivos pdf con Xtrareports de Devexpress ya los puedo crear
pero solo se crea y no se muestra lo que quiero es abrir el archivo despues de crearlo como puedo hacer esto

[Wuilmer]

Saludos Natan78 talvez este código te sirve Chequealo:

Response.Clear()
Response.ContentType = "application/pdf"
Response.AddHeader("Content-disposition", "attachment; filename=" & "Nombre del Archivo que abriras")
Response.WriteFile(Nombre)
Response.Flush()
Response.Close()

Ahora te pido un favor dime como haces para crear un pdf desde asp.net
te lo agradecería mucho....! Mis correos
[email protected]
[email protected]

[Ras Elased]

hey...
este código es el que necesitaba...

gracias ... Wuilmer

[gfranco69]

Prueba esto el reporte a exportar a PDF es un Crystal con parametros:


Dim crReportDocument As ReportDocument = New ReportDocument()
crReportDocument.Load(Server.MapPath("App_Data\Rep orts\factura.rpt"))
Dim pFields As New ParameterFields()
Dim pFilial As New CrystalDecisions.Shared.ParameterField()
Dim pOficina As New CrystalDecisions.Shared.ParameterField()
Dim pFactura As New CrystalDecisions.Shared.ParameterField()
Dim disValFilial As New ParameterDiscreteValue()
Dim disValOficina As New ParameterDiscreteValue()
Dim disValFactura As New ParameterDiscreteValue()

pFilial.Name = "Filial"
pFilial.HasCurrentValue = True
disValFilial.Value = "1"
pFilial.CurrentValues.Add(disValFilial)
pFields.Add(pFilial)

pOficina.Name = "Oficina"
pOficina.HasCurrentValue = True
disValOficina.Value = "1"
pOficina.CurrentValues.Add(disValOficina)
pFields.Add(pOficina)

pFactura.Name = "Factura"
pFactura.HasCurrentValue = True
disValFactura.Value = CStr(Val(TreeView1.SelectedNode.Text))
pFactura.CurrentValues.Add(disValFactura)
pFields.Add(pFactura)

crReportDocument.SetParameterValue(0, pFilial.CurrentValues)
crReportDocument.SetParameterValue(1, pOficina.CurrentValues)
crReportDocument.SetParameterValue(2, pFactura.CurrentValues)

Dim exportPath As String = "C:\facturatestASP.pdf"
Dim crExportOptions As ExportOptions
Dim crDestOptions As New DiskFileDestinationOptions
crDestOptions.DiskFileName = exportPath
crExportOptions = crReportDocument.ExportOptions

crExportOptions.DestinationOptions = crDestOptions
crExportOptions.ExportDestinationType = ExportDestinationType.DiskFile
crExportOptions.ExportFormatType = ExportFormatType.PortableDocFormat

crReportDocument.Export()

Response.Clear()
Response.ContentType = "application/pdf"
Response.AddHeader("Content-disposition", "attachment; filename=" & "C:\facturatestASP.pdf")
Response.WriteFile("C:\facturatestASP.pdf")
Response.Flush()
Response.Close()