Miniatura com Persits.Jpeg

[luiscarlos5046 3]

Olá Galera!

 

Eu tenho um script que gera a miniatura das imagens direto em tela.

<%
Set Jpeg = Server.CreateObject("Persits.Jpeg")
path = server.MapPath(request("path"))
Jpeg.Open path
Jpeg.Quality = 50
Jpeg.Width = request("width")
Jpeg.Height = Jpeg.OriginalHeight * Jpeg.Width / Jpeg.OriginalWidth
Jpeg.Sharpen 1, 120
Jpeg.SendBinary
Set Jpeg = Nothing
%>

 

O parâmetro do path é passado através do link da imagem:

thumb.asp?path=galeria/foto-1.jpg&WIDTH=130

 

Nesse caso acima, eu defino somente a largura da imagem e a altura será proporcional... até ai tudo bem.

 

Agora precisava gravar em uma pasta diferente o mesmo arquivo em miniatura.

Se eu adicionar o "Jpeg.Save path" no método usado acima, a imagem original será substituida pela miniatura.

Não consegui de forma nenhuma definir uma subpasta com esse código, já pesquisei em todos os lugares, mas sempre dão exemplos de códigos já com o nome das imagens já definidas no script.

Após eu conseguir salvar a imagem em uma pasta diferente, eu farei uma função pra checar se já existe a miniatura ou não... se não existir ele cria senão só exibe na tela.

 

<%
Set Jpeg = Server.CreateObject("Persits.Jpeg")
path = server.MapPath(request("path"))
Jpeg.Open path
Jpeg.Quality = 50
Jpeg.Width = request("width")
Jpeg.Height = Jpeg.OriginalHeight * Jpeg.Width / Jpeg.OriginalWidth
Jpeg.Sharpen 1, 120
Jpeg.Save server.MapPath("galeria/mini/")& path
Jpeg.SendBinary
Set Jpeg = Nothing
%>

 

O maior problema está na linha abaixo. Definir um caminho diferente pra salvar a miniatura.

Jpeg.Save server.MapPath("galeria/mini/")& path

[Vinicius Ianni 189]

Dá um response.write na linha:

Jpeg.Save server.MapPath("galeria/mini/")& path

 

para ver o que sai.

[xanburzum 169]

tem algumas galerias em JQuery que faz isso...

[luiscarlos5046 3]

Vinicius, não sai nada.

 

mas belza ai pessoal. Esse negócio tá dano muito trabalho.

 

Vou mudar esse sistema e acho melhor gerar as miniaturas na hora do cadastro das imagens

e colocar pra carregar direto as miniaturas pra exibição.

 

Dessa forma eu achei como fazer, mas da forma que eu gostaria, não sei não...

 

Luis Carlos