diminuir uma foto proporcionalmente

[Cesão 1]

como faço pra diminuir uma foto proporcionalmente usando Dundas ou SoftAtisans??qdo falo em diminuir proporcionalmente eh tipo nos flogs.. qdo você manda uma foto enorme e eles diminuem sem distorcer...como faço isso?

[Elbrinner 0]

Estive olhando aqui e parece q esses componentes nao faz o q você quer pelo menos nao achei nada em relaçao a isso. você pode usar o aspjpg q faz isso e muito mais.exemplo:<% 'Criando o thumbnail: Set Jpeg = Server.CreateObject("Persits.Jpeg") 'Caminho da Imagem Path = "e:\home\xyz\web\teste" & "\teste.jpg" 'Busca a Imagem Jpeg.Open Path 'Especifica o tamanho da imagem, nesse caso ela ficará 50% menor Jpeg.Width = Jpeg.OriginalWidth / 2 Jpeg.Height = Jpeg.OriginalHeight / 2 'Esse método é opcional, usado para melhorar o visual da imagem Jpeg.Sharpen 1, 150 'Cria um thumbnail e o grava no caminho abaixo Jpeg.Save "e:\home\xyz\web\teste" & "\teste_mini.jpg" 'Para enviar o thumbnail para o browser do cliente utilize o método SendBinary: Response.Write jpeg.SendBinary %>

[Salgado 4]

Defina uma das dimensões como base e faça um calculo de proporção usando o valor original dessa dimensão, depois é só reverter usando o mesmo "fator" para ambas dimensões.

[Cesão 1]

o problema eh o seguinte.. nao posso pedir p diminuir 50%... pq assim.. eu quero que todas fiquem no maximo com 300px de largura.. mas nem todas tem a mesma altura...e queria poder mandar fotos com 500px de largura e ele mesmo deixasse com no maximo 300px de largura e diminuisse a altura proporcionalmente...alguem pode me passar um codigo de como fazer isso?

[rafa-martin 2]

pq não usa upload sem componentes? se quiser usar ou não você pode definir o tamanho na foto na hora de mostrar ela na tela. exemplo:<img src="caminho" width="100" height="80">pronto, toda vez que enviar a foto terá esse tamanho.

[Eduardo VR 0]

Amigo, muito simples, salve isso em uma página chamada resize.asp<%Response.Expires = 0Sub ResizeX (intXSize) Dim intYSize intYSize = (intXSize / Jpeg.OriginalWidth) * Jpeg.OriginalHeight Jpeg.Width = intXSize Jpeg.Height = intYSizeend subSet Jpeg = Server.CreateObject("Persits.Jpeg")Jpeg.Open( Request("path") )ResizeX(110)'Jpeg.Width = 70'Jpeg.Height = 70Jpeg.SendBinary'Esse método é opcional, usado para melhorar o visual da imagemJpeg.Sharpen 1, 150Set Jpeg = Nothing%> e na pagina que pretende chamar a foto, insira isso: <img src="resize.asp?path=enderecofisico\fotos\image.jpg">

[Cesão 1]

valeu eduardo.. vou tentar usar isso que você mandou ai!!

[Davidmg 0]

Aproveitando o tópico, gostaria de saber se tem algum componente que diminui a imagem em Kb...

[Cesão 1]

Eduardo... esse código que você mandou tem que ser usado com algum componente?? ou nao eh necessário?pq usei ocodigo que você me passou e nao funcionou em localhost

[Amigo_zz 0]

Eduardo... esse código que você mandou tem que ser usado com algum componente?? ou nao eh necessário?pq usei ocodigo que você me passou e nao funcionou em localhost

Tenho aqui um componente free que parece funcionar, embora nunca o testei.Se alguem quiser, envie email para ruicosta@inovador.neté so registar uma dll

[Cesão 1]

alguem sabe de alguma forma de fazer isso sem ter que registrar dll?alguma forma de fazer isso no Dundas ou no SoftArtisans? ou mesmo em ASP puro?Se alguem souber, me ajuda aiiii!! hehee

[Salgado 4]

Redimensionar com ASP puro eu desconheço, já li sobre uma classe "canvas" que serviria para gerar imagens, mas nunca testei.