Ir para conteúdo

POWERED BY:

Arquivado

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

[rush_jeff_rulez]

ASPJpeg e BD

Recommended Posts

eae galera !!!!!fmz totallll !?????Assim, fiz um sistema de upload de imagens e tudo mais ... no script do upload ele grava no bd o endereço da imagem e o nome dela. ai na pagina q exibe a imagem q foi enviada estou usando ASPjpeg .... soh q se eu mando ele buscar o nome da imagem no bd ele nao encontra ... diz q o arquivo nao foi encontrado.o source da pagina q exibe a imagem

<%ConnString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\dados\teste.mdb;"Set Conexao = Server.CreateObject("ADODB.Connection")Conexao.Open ConnStringstringSQL="select nome from fotos"set registros = conexao.execute(stringSQL) cmnh = "e:\cadastro\fotos\"nome = "&nome&"'Criando o thumbnail:Set Jpeg = Server.CreateObject("Persits.Jpeg")'Caminho da ImagemPath = cmnh & nome'Busca a ImagemJpeg.Open Path'Especifica o tamanho da imagem, nesse caso ela ficará 50% menorJpeg.Width = Jpeg.OriginalWidth / 2Jpeg.Height = Jpeg.OriginalHeight / 2'Esse método é opcional, usado para melhorar o visual da imagemJpeg.Sharpen 1, 150'Cria um thumbnail e o grava no caminho abaixoJpeg.Save "e:\cadastro\fotos" & "\Imagem1_mini.jpg"'Para enviar o thumbnail para o browser do cliente utilize o método SendBinary:Response.Write jpeg.SendBinary %>

Se alguem ai tiver uma luz !!!!Valeu !!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

oi

 

isso aqui pegaria o NOME da imagem no banco?

ASP

 = 

 

Coloque assim:

 

<%

ConnString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\dados\teste.mdb;"

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open ConnString

 

stringSQL="select nome from fotos"

set registros = conexao.execute(stringSQL)

 

cmnh = "e:\cadastro\fotos\"

nome = registros("nome")

 

'Criando o thumbnail:

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

 

'Caminho da Imagem

Path = cmnh & nome

'Busca a Imagem

Jpeg.Open Path

 

'Especifica o tamanho da imagem, nesse caso ela ficará 50% menor

Jpeg.Width = Jpeg.OriginalWidth / 2

Jpeg.Height = Jpeg.OriginalHeight / 2

 

'Esse método é opcional, usado para melhorar o visual da imagem

Jpeg.Sharpen 1, 150

 

'Cria um thumbnail e o grava no caminho abaixo

Jpeg.Save "e:\cadastro\fotos" & "\Imagem1_mini.jpg"

 

'Para enviar o thumbnail para o browser do cliente utilize o método SendBinary:

Response.Write jpeg.SendBinary

%>

poste o resultado

 

abraço

Compartilhar este post


Link para o post
Compartilhar em outros sites

DARK

 

Meu q vacilo !!!! :o ....funcionou q foi uma beleza !!!! valeu mesmo cara

Agora jah dar pra ir pra próximo etapa, relacionar nome imagem com id !!! http://forum.imasters.com.br/public/style_emoticons/default/grin.gif

 

Valeu man, obrigado mesmo !!!

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

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.