O AspImage é um componente ASP que permite criar e modificar imagens no formato JPG, GIF, BMP e PNG automaticamente.
![]() |
<% ' Cria uma instância do controle Set AspImage = Server.CreateObject("AspImage.Image") ' Carrega a imagem AspImage.LoadImage( Server.MapPath("imagem.jpg") ) ' Propriedades da imagem AspImage.ImageFormat = 1 AspImage.JPEGQuality = 100 ' Redimensiona a imagem AspImage.ResizeR 200, 80 ' Salva a imagem AspImage.FileName = Server.MapPath("imagem_thumbnail.jpg") AspImage.SaveImage ' Tira o objeto da memória Set AspImage = Nothing Response.Write "<img src=""imagem_thumbnail.jpg"" />" %> |
![]() |
<% ' Cria uma instância do controle Set AspImage = Server.CreateObject("AspImage.Image") ' Texto a ser excrito strMessage = "AspImage - ServerObjects" ' Seta as propriedades do Texto AspImage.Bold = True AspImage.Italic = False AspImage.Underline = False AspImage.FontColor = vbBlue AspImage.FontName = "Tahoma" AspImage.FontSize = 30 AspImage.MaxX = AspImage.TextWidth(strMessage) AspImage.MaxY = AspImage.TextHeight(strMessage) ' Cria a imagem com o texto AspImage.TextOut strMessage, AspImage.X, AspImage.Y, False ' Salva a imagem AspImage.FileName = Server.MapPath("imagem_texto.jpg") AspImage.SaveImage ' Tira o objeto da memória Set AspImage = Nothing ' Exibe a imagem na tela Response.Write "<img src=""imagem_texto.jpg"" />" %> |