Ver Mensaje Individual
  #6 (permalink)  
Antiguo 04/12/2008, 02:31
papon
 
Fecha de Ingreso: noviembre-2008
Mensajes: 19
Antigüedad: 15 años, 5 meses
Puntos: 0
Respuesta: librería html to pdf converter

Muchas gracias compañero, intentaré llevarlo a la práctica a ver si sale algo decente, seguro que le sirve a más gente, un abrazo!

Cita:
Iniciado por mvazquez Ver Mensaje
Gracias..........

Lo que se me ocurre es que el contenido de tu .aspx lo metas en un panel y ese panel lo mandes imprimir pero como pdf .

Supongamos que tu aspx se llama Fusion.aspx y tu visor se llama VisorFusion.aspx
fmeVisorImagen es el nombre del panel que esta en VisorFusion.aspx,
este codigo se invoca desde Fusion.aspx
Código:
fmeVisorImagen.Attributes.Add("VisorFusion.aspx", " VisorFusion.aspx?Id=" + “Fusion.aspx”)

Haces un aspx que se llame, no se, VisorFision.aspx y luego cuando quieras imprimir mandas el contenido de tu aspx al VisorFusion.aspx y ahí……..
Este codigo en VisorFusion.aspx
Código:
strArrFile = FileName.Split(".")
strExtensionArchivo = strArrFile(strArrFile.Length - 1)

strArrDoc = FileName.Split("\")
strDocumento = strArrDoc(strArrDoc.Length - 1)

Select Case strExtensionArchivo
Case "pdf"
Response.Redirect("../AvisosAfiliatorios/Documentos/" & strDocumento)
      Case "doc"
      	strTipoArchivo = "Application/vnd.ms-word"
            VisualizarArchivo(FileName, strTipoArchivo)
      Case "xlsx"
            strTipoArchivo = "application/vnd.ms-excel"
            VisualizarArchivo(FileName, strTipoArchivo)
      Case "xls"
            strTipoArchivo = "application/vnd.ms-excel"
            VisualizarArchivo(FileName, strTipoArchivo)
      Case "txt"
      	Response.Redirect("../AvisosAfiliatorios/Documentos/" & strDocumento)
End Select

Private Sub VisualizarArchivo(ByVal NombreArchivo As String, ByVal TipoArchivo As String)
        Context.Response.ClearContent()
        Context.Response.ClearHeaders()
        Context.Response.ContentType = TipoArchivo
        Response.AddHeader("Content-Disposition", "inline;filename=..//AvisosAfiliatorios//Documentos//" & NombreArchivo)
        Context.Response.WriteFile(NombreArchivo)
        Context.Response.End()
End Sub

espero haberme dado a entender.......
Saludos.