ABCpdf é um componente que permite criar documentos PDF puros ou ler e modificar documentos PDF já existentes. Os documentos ainda podem ser salvos ou enviados diretamente para um navegador.
![]() |
<% ' Cria uma instância do controle Set AbcPdf = Server.CreateObject("ABCpdf6.Doc") ' Fonte do Texto AbcPdf.Font = AbcPdf.AddFont("Helvetica") ' Tamanho do Texto AbcPdf.FontSize = "32" ' Cor do Texto AbcPdf.Color = "255 0 0" ' Adiciona o Texto no arquivo PDF. AbcPdf.AddText "Hello World!" ' Salva o arquivo PDF AbcPdf.Save Server.MapPath("hello.pdf") ' Tira os objetos da memória Set AbcPdf = Nothing Response.Write "Arquivo criado com sucesso." %> |
![]() |
<% ' Cria uma instância do controle Set AbcPdf = Server.CreateObject("ABCpdf6.Doc") ' Cria um retângulo com a área ocupada pelo objeto. ' Left / Bottom / Width / Height AbcPdf.Rect.SetRect "40", "72", "520", "640" ' URL a ser adicionada no arquivo PDF theURL = "http://www.google.com/" theID = AbcPdf.AddImageUrl(theURL, True, 0, False) For i = 1 To 3 If AbcPdf.GetInfo(theID, "Truncated") <> "1" Then Exit For AbcPdf.Page = AbcPdf.AddPage() theID = AbcPdf.AddImageToChain(theID) Next AbcPdf.PageNumber = 1 ' Salva o arquivo PDF AbcPdf.Save Server.MapPath("importa_url.pdf") ' Tira os objetos da memória Set AbcPdf = Nothing Response.Write "Arquivo criado com sucesso." %> |