Ir para conteúdo

POWERED BY:

Arquivado

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

Dveio

aspimage

Por , em ASP Clássico

Recommended Posts

Dveio    0

Dveio
Postado

;) <% path = "C:\Documents and Settings\fotos\sfoto.jpg"tamanho = request("tamanho") response.contenttype = "image/jpeg" Set Image = Server.CreateObject("AspImage.Image") image.LoadImage (path) image.ImageFormat = 1 image.DPI = 72 image.JPEGQuality = 50 'image.Blur 2 image.BrightenImage 30 if tamanho = "G" then image.resizeR 410, 300 else image.resizeR 205, 175 end if response.binarywrite image.image set rs = nothing set image = nothing%>Se alguem souber algo mais sobre o Componente POSTA AIDveio

Compartilhar este post

Link para o post
Compartilhar em outros sites

gastao    0

gastao
Postado 

<html><head><title>Welcome</title></head><body bgcolor=white><center><p><br></p><p><br></p><%  Set Image = Server.CreateObject("AspImage.Image")  Image.MaxX = 400  Image.MaxY = 400 image.AddImage"d:\sites\wwwroot\aspimage\euecamille.gif", 0, 0image.AddImageTransparent "d:\sites\wwwroot\aspimage\teste.gif", 50, 50, vbblack  Image.FileName = "d:\sites\wwwroot\images\txtz2.jpg"  Image.SaveImage  Response.Write "<img src=""/images/txtz2.jpg""><br>"  Set Image = nothing%></center></body></html>

marca d'agua ...

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

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

  Aceito