ASPJpeg
Fabricante: Persits Software, Inc (www.persits.com/)
Documentação: http://www.aspjpeg.com/
Exemplo de implementação:
<%
Set Jpeg = Server.CreateObject("Persits.Jpeg")
'Abre a imagem que está gravada na pastado site
Jpeg.Open "D:\www\vhosts\mco2\usuario\imagens\foto_1.jpg"
'Reduz o tamanho em 50%
Jpeg.Width = Jpeg.OriginalWidth / 2
Jpeg.Height = Jpeg.OriginalHeight / 2
'Cria o thumbnail e grava na mesma pasta, porém com outro nome
Jpeg.Save "D:\www\vhosts\mco2\usuario\imagens\foto_1_p.jpg"
Response.Write jpeg.SendBinary
Set Jpeg = Nothing
%>
|
ATENÇÃO A RG3 NÃO DA SUPORTE A PROGRAMAÇÃO
OS COMPONENTES ESTÃO INSTALADOS E FUNCIONANDO NO SERVIDOR
BASTA PROGRAMAR CORRETAMENTE E UTILIZAR O PRODUTO
|