Persits.Pdf

[Ted k' 126]

Esse script pega a página do terra e converte, bloqueia para não modificar e não copiar e ainda gera paginação!

 

<!--METADATA TYPE="TypeLib" UUID="{414FEE4B-2879-4090-957E-423567FFCFC6}"-->
<%
' Início - Mostrar Contrato : Gerar PDF '
	Dim Pdf, Doc, Page
	Set Pdf = Server.CreateObject("Persits.Pdf")
	Set Doc = Pdf.CreateDocument

		Doc.ImportFromUrl "http://www.terra.com.br"
		Doc.Encrypt "7658tedk4784584754747584484584854484545", "", 40, PdfFull And (Not PDFModify) And (Not PDFCopy)

		For Each Page In Doc.Pages
			Page.Canvas.DrawText "Pág."&Page.Index&"/"&Doc.Pages.Count&"", "x=15, y=20", Doc.Fonts("Arial")
		Next

	Doc.SaveHttp("attachment; filename=Contrato.pdf")
' Final - Mostrar Contrato : Gerar PDF '
%>

Para obter mais informações do Persits.Pdf, acesse o site aqui com manual e confira as informações, algumas delas disponibilizei aqui como por exemplo:

Bloquear pdf para Impressão = pdfPrint, olha outros exemplo aqui abaixo:

 

pdfFull = &HFFFFFFFC (all significant bits)
pdfPrint = &H04 (Bit 3)
pdfModify = &H08 (Bit 4)
pdfCopy = &H10 (Bit 5)
pdfAnnotations = &H20 (Bit 6)
pdfForm = &H0100 (Bit 9)
pdfExtract = &H0200 (Bit 10)
pdfAssemble = &H0400 (Bit 11)
pdfPrintHigh = &H0800 (Bit 12)

A METADATA server para identificar os parâmentros de bloqueio:

[rd111072 1]

O que devo mudar no script para converter a url que eu quiser?

[Ted k' 126]

Doc.ImportFromUrl "http://www.terra.com.br"'>http://www.terra.com.br"

no lugar de http://www.terra.com.br coloca a sua URL

[Dony 0]

NOSSAAAAA CARACASSSSS VOCE ACABOU DE SALVAR MINHA VIDAAAAAAAA!!! PUTZ.... PASSA SUA AGENCIA E CONTA QUE VOU DEPOSITAR UMA CERVEJA GELADAS, K K K

 

Desculpe pelas maiusculas e negrito, mas valeu mesmo cara... era exatamente isso que eu estava precisando para montar um contrato para clientes, mas estava fazendo o ASPPDF gerar linha a linha, tava quase ficando doido! http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

[Dony 0]

pq tudo meu á mais dificil. Olha o erro que tá dando:

 

Persits.PdfManager.1 error '800a0049'

 

Error obtaining a registration key from system registry: The system cannot find the file specified.

 

/gerapdf.asp, line 6

 

pq tudo meu á mais dificil. Olha o erro que tá dando:

 

Persits.PdfManager.1 error '800a0049'

 

Error obtaining a registration key from system registry: The system cannot find the file specified.

 

/gerapdf.asp, line 6

[Mário Monteiro 179]

Ta dizendo que o componente nao está registrado e ja expirou

 

Tem que obter a licença do mesmo ou entao usar um servidor que tenha o mesmo

[Ted k' 126]

isso mesmo, verifique junto ao servidor se está tudo ok com o componente e caso estiver usando local, tem que adquirir uma licença dele!

[Dony 0]

Pois é.... vou ver com o pessoal da hospedagem!

 

Valeu gente, posto depois o resultado final!

[Mário Monteiro 179]

Tranquilo

 

Qualquer coisa retorne

[Dony 0]

Certinho demais....

Era problema de registro....

 

valeu gente!

[Ted k' 126]

pronto, resolvido, qualquer coisa manda!!

[Mário Monteiro 179]

que bom que ta resolvido