Ir para conteúdo
Fórum Script Brasil
  • 0

Asp Jpeg


Guest Juliana

Pergunta

olá pessoal estou usando o componente aspjpeg para alterar o tamanho da imagem original e criar a uma imagem tumb, meu problema é que quando altero o tamanho da imagem original, ela fica perfeita, porém a imagem do tumb fica zuada na resolução,

será que alguém pode verificar meu código e me informar porque isso ocorre

meu cód

'''''''''''''alterando tamanho Original ........................

Set Jpeg = Server.CreateObject("Persits.Jpeg")

Jpeg.Open caminhoabre

Jpeg.Open caminhoabre

Jpeg.Interpolation = 1

Jpeg.Sharpen 1, 250

Jpeg.ResolutionX = jpeg.OriginalResolutionX

Jpeg.ResolutionY = jpeg.OriginalResolutionY

Jpeg.Sharpen 1, 150

L=214

If jpeg.OriginalWidth > jpeg.OriginalHeight Then

jpeg.Width = L

jpeg.Height = jpeg.OriginalHeight * L / jpeg.OriginalWidth

Elseif jpeg.OriginalWidth = jpeg.OriginalHeight then

jpeg.Height = L

jpeg.Width=L

else

jpeg.Height = L

jpeg.Width = jpeg.OriginalWidth * L / jpeg.OriginalHeight

End If

Jpeg.Save caminhoabre

set Jpeg = nothing

'Criando tamb da imagem

Set Jpeg = Server.CreateObject("Persits.Jpeg")

Jpeg.Open Caminho1 & "\Teste" & rs1("caminhoImagem")

Jpeg.Interpolation = 1

Jpeg.Sharpen 1, 250

Jpeg.ResolutionX = jpeg.OriginalResolutionX

Jpeg.ResolutionY = jpeg.OriginalResolutionY

Jpeg.Sharpen 1, 150

L=137

If jpeg.OriginalWidth > jpeg.OriginalHeight Then

jpeg.Width = L

jpeg.Height = jpeg.OriginalHeight * L / jpeg.OriginalWidth

Elseif jpeg.OriginalWidth = jpeg.OriginalHeight then

jpeg.Height = L

jpeg.Width=L

else

jpeg.Height = L

jpeg.Width = jpeg.OriginalWidth * L / jpeg.OriginalHeight

End If

Jpeg.Save caminho

set Jpeg = nothing

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

isso deve estar acontecendo pois você esta mexendo na resolução.

Jpeg.ResolutionX = jpeg.OriginalResolutionX

Jpeg.ResolutionY = jpeg.OriginalResolutionY

uso este componente p/ redimencionar sem problemas.

se quer diminuir o tamanho da imagem pode usar por ex.

Jpeg.Quality = 80

faz um teste e ve se é isso.

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,6k
×
×
  • Criar Novo...