Ir para conteúdo

POWERED BY:

Arquivado

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

Frango

Erro no Upload de Imagens

Recommended Posts

O conteu do input type=file esta dentro da variavel thumbnail, como você pode ver abaixo

 

<%    Dim Count  Dim vfoto  Set Upload = Server.CreateObject("Persits.Upload.1")  Upload.OverwriteFiles = False  Count = upload.Save("E:\[O.C.M.]\Azeitona Preta\2005\jpg")  For Each File in Upload.Files  strURLfoto = File.Path  strNomeFoto = Mid(strURLfoto, InStrRev(strURLfoto, "\", Len(strURLfoto))+1, Len(strURLfoto)-InStrRev(strURLfoto, "\", Len(strURLfoto)))  Next    cliente = Upload.Form("txt_cliente")  titulo = Upload.Form("txt_titulo")  chamada = Upload.Form("txt_chamada")  categoria = Upload.Form("txt_categoria")  descricao = Upload.Form("txt_descricao")  site = Upload.Form("txt_site")  title = Upload.Form("txt_title")  ano = Upload.Form("txt_ano")  thumbnail = Upload.Form("txt_thumb")    set conn = Server.CreateObject("ADODB.Connection")  set rs = Server.CreateObject("ADODB.Recordset")    x = Server.Mappath("bd/bd.mdb")  obj = "driver={Microsoft Access Driver (*.mdb)};DBQ=" & x  conn.Open obj    cadastra = "insert into portfolio (cliente, titulo, chamada, categoria, descricao, site, title, ano, thumb_projetos) values ('"&cliente&"','"&titulo&"','"&chamada&"',"&categoria&",'"&descricao&"','"&site&"','"&title&"','"&ano&"','"&thumbnail&"')"  'Response.Write "Sua SQL é: "& Cadastra'Conn.Close'Set Conn = Nothing'Response.END  set rs = conn.execute (cadastra)    conn.close  Set rs = nothing    response.redirect("extranet.asp")%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

O Input File file não manda valores. O que você quer está na variavel strNomeFoto. Faz um teste e veja se a SQL aparece de forma correta.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Valew Salgado funcionou perfeitamente!Agora estou com uma outra dúvida aki com o Alterar.....mas vou abrir um outro topico ... pq naum tem nada a ver com esse aki ok.Me ajuda lá to abrindo agora :D

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.