Ir para conteúdo

POWERED BY:

Arquivado

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

webcore

codigo de upload

Recommended Posts

CODE
Set Upload = Server.CreateObject("Persits.Upload")
Count = Upload.Save("E:\Aplicacao\gerencia\imgs")

cod_categoria = Request.Form("cod_categoria")
cod_produto = Request.Form("cod_produto")
nome_produto = Request.Form("nome_produto")
desc_produto = Request.Form("desc_produto")
preco_produto = Request.Form("preco_produto")
foto_pqna = Request.Form("foto_pqna")
foto_gde = Request.Form("foto_gde")
%>

<%
sql = "INSERT INTO produtos (cod_categoria, cod_produto, nome_produto, desc_produto, preco_produto, foto_pqna, foto_gde) VALUES ('"&cod_categoria&"', '"&cod_produto&"', '"&nome_produto&"', '"&desc_produto&"', '"&preco_produto&"', '"&foto_pqna&"', '"&foto_gde&"'")

Conn.Execute(sql)

Response.Write Count & " arquivo(s) Carregados para o diretório de imagens"
%>

<a href="Administracao.asp">Ir Para Página de Administração</a>

Tipo de erro:
Erro de compilação do Microsoft VBScript (0x800A0401)
Fim da instrução esperado
/gerencia/produto_inserindo.asp, line 45, column 258
sql = "INSERT INTO produtos (cod_categoria, cod_produto, nome_produto, desc_produto, preco_produto, foto_pqna, foto_gde) VALUES ('"&cod_categoria&"', '"&cod_produto&"', '"&nome_produto&"', '"&desc_produto&"', '"&preco_produto&"', "&foto_pqna&", "&foto_gde&"")
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------^

Compartilhar este post


Link para o post
Compartilhar em outros sites

possivelmente na descrição você adicionou um apostofre. Utilize o replace para trocar um por 2 apostofre

Compartilhar este post


Link para o post
Compartilhar em outros sites

Desculpe a ignorância Jonathandj, não entendo muito bem. Qual descrição? Pode me dar um exemplo?

Estava olhando aqui no forum, tem bastante scripts de upload, mas a maioria nao grava no banco.

Compartilhar este post


Link para o post
Compartilhar em outros sites

desc_produto = replace(Request.Form("desc_produto"),"'","''")

 

faça isso, caso não funcione faça o seguinte:

sql = "INSERT INTO produtos (cod_categoria, cod_produto, nome_produto, desc_produto, preco_produto, foto_pqna, foto_gde) VALUES ('"&cod_categoria&"', '"&cod_produto&"', '"&nome_produto&"', '"&desc_produto&"', '"&preco_produto&"', '"&foto_pqna&"', '"&foto_gde&"'")
response.write sql : response.end
Conn.Execute(sql)

isso irá mostrar a query que está sendo montada ai você posta o que aparecer no browser pra vermos onde está o problema

 

mais uma coisa, você colocou no titulo do topico algo referente a upload, onde está o upload? se você faz upload não pode usar request.form

Compartilhar este post


Link para o post
Compartilhar em outros sites

seria

campo = Request.Upload("campo")

 

fiz o seguinte:

caminho = "E:\Aplicacao\imgs\"
Set  ObjUpload = Server.CreateObject("Persits.Upload.1")
contador = ObjUpload.Save(caminho)
%>
Foram enviados <%=contador %>  Arquivos.
ele gravou as imagens dentro do dir.

O problema é que preciso UPAR 2 arquivos: foto_pqna e foto_gde e mais 5 variaveis referentes aos produtos das imagens no banco de dados

Compartilhar este post


Link para o post
Compartilhar em outros sites

Oi pessoal, segui esse tuto abaixo, quando clico em CAdastrar ele demora um certo tempo para chamar a pagina Upload_form.asp, ele grava as imagens no diretorio certo, mas nao cadastra minhas outras variaveis na base de dados... Ah, meu FSO esta instalado.

Algem sabe o que pode estar havendo?

 

- Passo a passo de como enviar mais de 1 arquivo ao mesmo tempo.

http://forum.imasters.com.br/index.php?s=&...st&p=417368

 

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe na seqüência de caracteres na expressão de consulta ''?????A??'.

 

CODE
theSQL = "INSERT INTO produtos (cod_categoria, cod_produto, nome_produto, preco_produto, desc_produto, imagem, imagem_gde) VALUES ('"

theSQL = theSQL & cod_categoria

theSQL = theSQL & "', '"

theSQL = theSQL& cod_produto

theSQL = theSQL & "', '"

theSQL = theSQL& nome_produto

theSQL = theSQL & "', '"

theSQL = theSQL& preco_produto

theSQL = theSQL & "', '"

theSQL = theSQL& desc_produto

theSQL = theSQL & "', '"

theSQL = theSQL& imagem

theSQL = theSQL & "', '"

theSQL = theSQL& imagem_gde

theSQL = theSQL & "')"

Conn.Execute(theSQL) linha 100

 

response write do theSQL

 

INSERT INTO produtos (cod_categoria, cod_produto, nome_produto, preco_produto, desc_produto, imagem, imagem_gde) VALUES ('80', '999', 'nome p', '45', 'descricao', '?????A??

Compartilhar este post


Link para o post
Compartilhar em outros sites

theSQL = theSQL& imagem tirei essa linha

theSQL = theSQL & "', '"

theSQL = theSQL& imagem_gde e tirei essa linha

 

gravou normal...

 

eu tenho de colocar o caminho da imagem + nome da imagem para que fiquem armazenadas no banco?

 

hhaa nao imagino... ta quase dando certo

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.