Abrir html con fpdf
Publicado por al058030 (1 intervención) el 07/02/2011 17:31:39
Hola, lo que quiero es que a partir de una pagina html se me genere un pdf con ASP, y lo que consigo es que se abra el pdf y me muestre el contenido del html, pero ...., me lo muestra todo incluido etiquetas, alguien sabe si se puede hacer?.
<%@language="vbscript"%>
<!--#include file="fpdf.asp"-->
<%
Dim cadena
%>
<html>
<head><title>Generar PDF con ASP</title> </head>
<body>
<%
cadena = "Archivo"
'conectamos con el FSO
set confile = createObject("scripting.filesystemobject")
'Abro el fichero para lectura
set fich = confile.OpenTextFile(server.MapPath("prueba.htm"))
'leemos el contenido del fichero
cadena = fich.readAll()
'cerramos el fichero
fich.close()
Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF()
pdf.SetPath("fpdf/")
pdf.SetFont "Arial","",12
pdf.Open()
pdf.AddPage()
pdf.multicell 42,10, cadena
pdf.Output()
pdf.Close()
%>
</body>
</html>
<%@language="vbscript"%>
<!--#include file="fpdf.asp"-->
<%
Dim cadena
%>
<html>
<head><title>Generar PDF con ASP</title> </head>
<body>
<%
cadena = "Archivo"
'conectamos con el FSO
set confile = createObject("scripting.filesystemobject")
'Abro el fichero para lectura
set fich = confile.OpenTextFile(server.MapPath("prueba.htm"))
'leemos el contenido del fichero
cadena = fich.readAll()
'cerramos el fichero
fich.close()
Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF()
pdf.SetPath("fpdf/")
pdf.SetFont "Arial","",12
pdf.Open()
pdf.AddPage()
pdf.multicell 42,10, cadena
pdf.Output()
pdf.Close()
%>
</body>
</html>
Valora esta pregunta
0