criar imagens dinamicamente

[washingtondantas 0]

Primeiro Boas FesTas galera!!!

 

 

Bem pessoal estou com a seguinte duvida...

queria saber como criar imagens dinamicamente.

do mesmo modo que observamos quando entramos no batepapo da ("UOL")

ja andei observando alguns componentes mas nenhum resolveu o problema..

ja consigo criar arquivos PDF dinamicamente.

so falta agora as imagens

 

e eu queria saber se alguem ja fez isso ou se tem alguma pista para comentar aqui forum

 

Agradeço desde já

 

Fui!!!!!!!

 

[gastao 0]

que tipoi de imagens ?

[washingtondantas 0]

valeu por ler este artigoImagens gif ou jpg...falow.....

[WebASP 0]

valeu por ler este artigoImagens gif ou jpg...falow.....

aspjpegaspimageprocura pelos dois so otimos nunca usei mais sao otimos

[nostrinkes 0]

Espero que ajude

A proposito poderia postar o codigo pdf na parte de codigos do forum?

 

Veja o embasamento técnico do activePDF em http://www.asparena.eti.br/vbscript/default.asp?materia=421Esta funcionalidade necessita do activePDF Printer, do activePDF Toolkit e do activePDF Server.São passos simples para a inserção de uma imagem em um PDF:1. Converta a imagem em um documento PDF usando o activePDF Server e2. Configure a imagem como um "logo", imprima o logo e o texto juntos.Passo 1: Convertendo a imagem em um PDF<% Set APServer = Server.CreateObject("APServer.Object")' Criando o nome da ImagemImgPDFName = Server.MapPath("PDF" & Session.SessionID & "-I.PDF")' O código a seguir fpega o arquivo "active4.jpg" e: ' a. Converte-o com largura máxima de 200 unidades PDF (aproximadamente 72 unidades por polegada) e altura máxima de 200 unidades PDF ' b. Mantém a proporção do JPG para que não fique destorcido' c. Não faz autorotação' d. Mantém o DPI em 72' e. Utiliza o tamanha default do papelo ("LETTER / CARTA ")' f. Posiciona o gráfico a 4 polegadas acima do fim da pág9na e 2 polegadas da esquerdaMaxWidth = 200MaxHeight = 200PersistRatio = TrueAutoRotate = FalseDPI = 72PaperSize = ""OffSetX = 72 * 4OffSetY = 72 * 2r = APServer.ImageToPDF(Server.MapPath("active4.jpg"),ImgPDFName, MaxWidth, MaxHeight, PersistRatio, AutoRotate, DPI,PaperSize, OffSetX, OffSetY)%>Passo 2. Põe a imagem em um novo PDF e insere algum texto nele.<%Set APToolkit = Server.CreateObject("APToolkit.Object")' Abre o arquivoOutputPDFName = Server.MapPath("PDF" & Session.SessionID & "-O.PDF")r = APToolkit.OpenOutputFile(OutputPDFName)' Adiciona o logo no streamr = APToolkit.AddLogo(ImgPDFName,1)' Imprime o logoAPToolkit.PrintLogo' Configure a fonte a seu gostor = APToolkit.SetFont("Times-Roman",18)' Imprimindo seu textoAPToolkit.PrintText 1, 720,"ASPArena - ASP e Tecnologias Afins - www.asparena.eti.br"' Fecha o arquivoAPToolkit.CloseOutputFile%><A HREF="<%="PDF" & Session.SessionID & "-O.PDF"%>">Clique para ver seu documento PDF</A>