Esse componente permite redimensionar imagens.
Crie uma paginas com os seguintes comandos asp.
<% 'Declara as variáveis a serem utilizadas no script Dim AspJpeg, imagem 'Instancia o componente na memória SET AspJpeg = Server.CreateObject("Persits.Jpeg") 'Define o caminho da imagem a ser redimensionada imagem = "\inetpub\vhosts\nome_do_seu_dominio_completo\httpdocs\imagem.jpg" 'Carrega a imagem AspJpeg.Open imagem 'Define o novo tamanho da imagem que neste caso, definimos que ela será 50% menor que o normal. AspJpeg.Width = AspJpeg.OriginalWidth / 2 AspJpeg.Height = AspJpeg.OriginalHeight / 2 'Esse método é opcional, usado para melhorar o visual da imagem. AspJpeg.Sharpen 1, 150 'Cria um Thumbnail e o grava no caminho abaixo. AspJpeg.Save "\inetpub\vhosts\nome_do_seu_dominio_completo\httpdocs\imagem_redimensionada.jpg" 'Para enviar o imagen redimensionada para o browser do visitante, utilize o método SendBinary . Response.Write AspJpeg.SendBinary 'Remove as referências do componente da memória SET AspJpeg = Nothing %>
Esse exemplo mostra como você pode utilizar esse
componente para redimensionar imagens e gravar uma imagen
redimensionada
para mostrar no browser do visitante do seu site.O diretório
onde voce esta gravando a imagem redimensionada deve
ter permissão de "Leitura/Escrita" que deve ser concedido
através do painel de controle .
