Gerar Thumbnails

[naofuieu 0]

Como se gera um thumbnails de uma imagem por ASP?

[[rush_jeff_rulez] 0]

você pode gera-lo usando o ASP.Jpeg assim:

 

ASP

[*]<%

 

[*]Set rs = Server.CreateObject("adodb.recordset")

 

[*]SQL = "SELECT * FROM fotos WHERE (((fotos.Cod_Anuncio)='"&bscuser&"'))"

 

[*]set rs = Conexao.execute(SQL)

 

[*]

 

[*] ' se rs não estiver vazio EOF = END OF FILE   :)

 

[*] If NOT rs.EOF Then

 

[*]

 

[*] path="e:home\fotos\"&rs("Nome_1")&"" 'diretorio onde a foto esta salva

 

[*]

 

[*]Response.Expires = 0

 

[*]

 

[*]Set Jpeg = Server.CreateObject("Persits.Jpeg")

 

[*]

 

[*]Jpeg.Open path 'abre a imagem original

 

[*]

 

[*]nwid="60" 'deifine a largura do thubmnail

 

[*]

 

[*]Jpeg.Width = nwid

 

[*]Jpeg.Height = Jpeg.OriginalHeight * Jpeg.Width / Jpeg.OriginalWidth 'ajusta a altura do thumbnail de acordo com a largura

 

[*]

 

[*]Jpeg.SendBinary 'envia o thumbnail pro navegador

 

[*]%> 

 

Nesse exemplo eu peguei o nome da foto no BD ... e depois chamei a imagem no diretorio onde ela esta salva ... iniciei o componete ASP JPEG .. e redimensionei ela para um thumbnail !!!

 

Deu pra sacar marromenos !?

:)

[naofuieu 0]

Só que o AspJpeg é shareware. Eu queria uma solução free, pq o site ainda está em projeto

[[rush_jeff_rulez] 0]

Pois eh .... pois eh .... pois eh

 

Tem q ver cara tem servers q tem o ASP.jpeg instalado .... e equanto estiver em projeto você pode usar os 30 dias ... mas ai vai de acordo com sua necessidade.

 

Qualquer coisa tamoae !!!

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif