Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

thiagobellusse

[Resolvido] Envio de imagem para o Banco Access

Recommended Posts

Boa tarde pessol, estou com um pequeno problema, espero que me ajudem.

Estou enviando uma imagem para o banco Access(Upload sem Componentes).

Até ai tudo normal, o meu problema esta sendo o seguinte:

Envio a imagem nas dimensões 200px por 300px (exemplo), gostaria de saber uma forma onde a partir desta única imagem criar outra no tamanho 75px por 75px(exemplo), sem ter enviar duas imagens, uma grande e outra pequena. Sendo assim, eu faria o upload de apenas uma e ela se duplicase no banco, criando uma imagem em tamanho menor.

Compartilhar este post


Link para o post
Compartilhar em outros sites

voce cria a miniatura com um componente de imagem

 

este tipo de coisa é bem simples ate

 

verifica no seu servidor qual voce tem dsponivel

Compartilhar este post


Link para o post
Compartilhar em outros sites

Bom dia Mario, vou dar uma verificada, mas acredito que meu servidor não tenha este componente.

Caso não tenha, o que poderia estar fazendo?

Obrigado.

 

voce cria a miniatura com um componente de imagem

 

este tipo de coisa é bem simples ate

 

verifica no seu servidor qual voce tem dsponivel

Compartilhar este post


Link para o post
Compartilhar em outros sites

veja qual tem que depois o codigo é simples e tem diversos exemplos aqui mesmo no forum

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olá Mário. Consegui fazer a duplicação, o servidor possui o componente ImageSize.

Logo usei esse código:

 

<%
' Cria uma instância do controle
Set ImageSize = Server.CreateObject("ImgSize.Check")
' Carrega a imagem
ImageSize.FileName = Server.MapPath("imagem.jpg")

If (ImageSize.Error = "") Then
  Response.Write "Largura: " & ImageSize.Width & "<br />"
  Response.Write "Altura: " & ImageSize.Height & "<br />"
Else
  Response.Write "Erro: " & ImageSize.Error
End If
' Tira o objeto da memória
Set ImageSize = Nothing
%>

No final deu tudo certo.

Agradeço sua atenção.

Obrigado.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Otimo

 

Parabens por ter conseguido

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.