AspJpeg

[leo_rsouza 0]

Boa tarde pessoal ....

 

 

Tipo , estou usando o Aspjpeg em minha pagina para a redução das imagens

 

no src da image, eu passo o url "imagens.asp?height=70&img=teste.jpg"

 

No arquivo imagens.asp:

 

ASP

[*]

 

[*]<%

 

[*]img = Request.Form("img")

 

[*]imagem = Server.Mappath("imagens/" & img)

 

[*]

 

[*]' Create an instance of AspJpeg object

 

[*]DIM DIR

 

[*]SET DIR = Server.CreateObject("scripting.filesystemobject")

 

[*]

 

[*]DIM jpeg

 

[*]IF DIR.FileExists(imagem)

 

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

 

[*] jpeg.Open( imagem)

 

[*] ' Set new width

 

[*] jpeg.Height = Request("Height")

 

[*]

 

[*] ' Set new height, preserve original width/height ratio

 

[*] jpeg.Width = jpeg.OriginalWidth * jpeg.Height / jpeg.OriginalHeight

 

[*]

 

[*] ' Send thumbnail data to client browser

 

[*] jpeg.SendBinary

 

[*]ELSE

 

[*] 'EXIBIR AQUI UMA IMAGEM DO TIPO "SEM IMAGEM"

 

[*]END IF

 

[*]%> 

 

Só que não aparece a imagem

já dei um response.write no caminho e ele esta ok ....

o q pode estar havendo ??

 

vlws

[Marcelo Barcellos 0]

Não tá entrando na condição do "ELSE" não ?Coloca um response.write "Sem imagem" lá !!!