|
<%
'Instancio el objeto de PDF
Set Pdf = Server.CreateObject("Persits.Pdf")
'Instancio la variabla Doc como nuevo documento
Set Doc = Pdf.CreateDocument
'Abro el docuento test.txt que se encuentra
en el mismo lugar donde ejecuto el script
Doc.ImportFromUrl Server.MapPath("test.txt")
'Creo el archivo txtTOpdf.pdf que contendra
el contenido del archivo de texto pero en formato
pdf
Filename = Doc.Save( Server.MapPath("txtTOpdf.pdf"),
False )
%> |
|