Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

lucimeire

Converter HTML para PDF usando VB e ASP

Recommended Posts

Pessoal, estou tentando programar aqui em VB uma solução que converta HTML para o formato PDF.

Estou usando o API itextSharp (acho q eh isso msm...), mas nao to conseguindo o que eu quero.

Já achei na net varias soluções que fazem isso, porem são em C#, e como nao tenho muita familiaridade

com VB, nao to conseguindo converter os codigos.

 

Alguem tem alguma solução ai???

 

Desde já agradeço...

Compartilhar este post


Link para o post
Compartilhar em outros sites

usa o componente ASPPDF

Compartilhar este post


Link para o post
Compartilhar em outros sites

Eu consegui o codigo em VB em um tutorial ai na net, mas ta dando um erro

q nao to conseguindo saber o q eh...

 

já add essas bibliotecas

Imports iTextSharp.text

Imports iTextSharp.text.pdf

Imports System

Imports System.IO

Imports iTextSharp

Imports iTextSharp.text.html

 

 

o meu codigo eh esse:

 

Protected Sub btnGeraPff_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnGeraPdf.Click

 

 

'Get the HTML from GridView1

Dim sw As New IO.StringWriter()

Dim htw As New HtmlTextWriter(sw)

'GridView1.RenderControl(htw)

Dim html As String = "<html><body>" + Literal1.Text.ToString() + "</body></html>")

 

'Set up the response

Response.Clear()

Response.ContentType = "application/pdf"

 

'Create pdf document

Dim document As New iTextSharp.text.Document(PageSize.A4, 80, 50, 30, 65)

 

'Create pdf writer, output directly to OutputStream

Dim writer As iTextSharp.text.pdf.PdfWriter = PdfWriter.GetInstance(document, Response.OutputStream)

document.Open()

'Create tempfile to hold the HTML:

Dim tempFile As String = Path.GetTempFileName()

Using tempwriter As New IO.StreamWriter(tempFile, False)

tempwriter.Write(html) <- Erro aki

End Using

 

'Parse the HTML into the document

HtmlParser.Parse(document, tempFile) <- Erro aki

 

'Cleanup

document.Close()

writer.Close()

 

'Delete the tempfile:

File.Delete(tempFile)

 

writer = Nothing

document = Nothing

Response.[End]()

 

End Sub

 

O erro q ta dando é no primeiro: iTextSharp.text.html' is a namespace and cannot be used as an expression.

e o segundo eh : Name 'HtmlParser' is not declared.

 

Me ajudem, por favor!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Como já foi mencionado você pode converter usando o componente ASPPDF.

 

Exemplo:

<%
Set Pdf = Server.CreateObject("Persits.Pdf")
Set Doc = Pdf.CreateDocument

Doc.ImportFromUrl "http://localhost/site/arquivo.html", "TopMargin=25, BottomMargin=25, LeftMargin=25, RightMargin=25"

Doc.Save "C:\wwwroot\inetpub\site\arquivo.pdf"

Response.Redirect("http://localhost/site/arquivo.pdf")
%> 

Magnoweb B)

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.