Ir para conteúdo

POWERED BY:

Arquivado

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

zeke_

Erro de sintaxe na instrução INSERT INTO

Recommended Posts

Pessoal, eu ja vi um ou dois topicos com o mesmo problema aqui no forum, porém nao resolveram meu problema, por isso venho pedir ajuda de vocês.

 

Tipo de erro:

Microsoft JET Database Engine (0x80040E14)

Erro de sintaxe na instrução INSERT INTO.

/i_adiciona_final.asp, line 20

 

<%Dim rsFirstName, rsLastName, rsEndereco, rsCep, rsEmail1, rsEmail2, rsTel, rsFax, rsCelular, url_paginaurl_pagina = "adicionar.asp"rsFirstName = Request.Form("FirstName")rsLastName = Request.Form("LastName")rsEndereco = Request.Form("Endereco")rsCep = Request.Form("cep")rsEmail1 = Request.Form("e-mail1")rsEmail2 = Request.Form("e=mail2")rsTel = Request.Form("tel")rsFax = Request.Form("fax")	rsCelular = Request.Form("celular")Dim insAgenda, insValuesSet ObjConexao= Server.CreateObject("ADODB.Connection")ObjConexao.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Path &"agenda.mdb;"insAgenda = "INSERT INTO agenda (FirstName,LastName,Endereco,cep,e-mail1,e-mail2,tel,fax,celular)"insValues = "VALUES('" &rsFirstname & "','" & rsLastName & "','" & rsEndereco & "','" & rsCep & "','" & rsEmail1 & "','" & rsEmail2 & "','" & rsTel & "','" & rsFax &"','" & rsCelular & "')"Set rs = ObjConexao.Execute (insAgenda) & (insValues)%>

Pelo o que eu vi, ta tudo correto, mas o erro continua persistindo...

 

Espero ajuda.

 

Atenciosamente

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tente fazer assim:

Set rs = ObjConexao.Execute (insAgenda) & " " & (insValues)
fiz o que me indicou, porém o resultado continua o mesmo...Ainda estou com o problema

Compartilhar este post


Link para o post
Compartilhar em outros sites

faz assim:Dim insAgendaSet ObjConexao= Server.CreateObject("ADODB.Connection")ObjConexao.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Path &"agenda.mdb;"insAgenda = "INSERT INTO agenda (FirstName,LastName,Endereco,cep,e-mail1,e-mail2,tel,fax,celular) VALUES('" &rsFirstname & "','" & rsLastName & "','" & rsEndereco & "','" & rsCep & "','" & rsEmail1 & "','" & rsEmail2 & "','" & rsTel & "','" & rsFax &"','" & rsCelular & "')"Set rs = ObjConexao.Execute (insAgenda)

Compartilhar este post


Link para o post
Compartilhar em outros sites

faz assim:Dim insAgendaSet ObjConexao= Server.CreateObject("ADODB.Connection")ObjConexao.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Path &"agenda.mdb;"insAgenda = "INSERT INTO agenda (FirstName,LastName,Endereco,cep,e-mail1,e-mail2,tel,fax,celular) VALUES('" &rsFirstname & "','" & rsLastName & "','" & rsEndereco & "','" & rsCep & "','" & rsEmail1 & "','" & rsEmail2 & "','" & rsTel & "','" & rsFax &"','" & rsCelular & "')"Set rs = ObjConexao.Execute (insAgenda)

Nossa, parece até brincadeira minha, mas não é nao...O problema continua o mesmo.!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Faz isso

 

Dim insAgendaSet ObjConexao= Server.CreateObject("ADODB.Connection")ObjConexao.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Path &"agenda.mdb;"insAgenda = "INSERT INTO agenda (FirstName,LastName,Endereco,cep,e-mail1,e-mail2,tel,fax,celular) VALUES('" &rsFirstname & "','" & rsLastName & "','" & rsEndereco & "','" & rsCep & "','" & rsEmail1 & "','" & rsEmail2 & "','" & rsTel & "','" & rsFax &"','" & rsCelular & "')"response.write insAgenda'Set rs = ObjConexao.Execute (insAgenda)

e posta aki o resultado..

Compartilhar este post


Link para o post
Compartilhar em outros sites

Faz isso

Dim insAgendaSet ObjConexao= Server.CreateObject("ADODB.Connection")ObjConexao.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Path &"agenda.mdb;"insAgenda = "INSERT INTO agenda (FirstName,LastName,Endereco,cep,e-mail1,e-mail2,tel,fax,celular) VALUES('" &rsFirstname & "','" & rsLastName & "','" & rsEndereco & "','" & rsCep & "','" & rsEmail1 & "','" & rsEmail2 & "','" & rsTel & "','" & rsFax &"','" & rsCelular & "')"response.write insAgenda'Set rs = ObjConexao.Execute (insAgenda)
e posta aki o resultado..
Caro Cezar,A Resposta do Response.Write(insAgenda)foi a seguinte:INSERT INTO agenda(firstname, lastname, endereco, cep, e-mail1, e-mail2, tel, fax, celular) VALUES ('Edilson','Moura','RUA JOSE DOMINGOS','zeke_@terra.com.br','onedilson@msn.com','674411232','674411232','6799781809')

Compartilhar este post


Link para o post
Compartilhar em outros sites

Cara, pelo q observei na sua resposta, a string do INSERT está errada pq está faltando um campo. Veja bem, você está passando 9 campos e 8 variáveis, está faltando o CEP.Diogo

Compartilhar este post


Link para o post
Compartilhar em outros sites

Na verdade ele esta passando 9 variáveis sim... Acho que o que pode estar dando erro é que ele esta tentando inserir numeros com apóstrofes ' ' . Tenta tira-las pra ver se o erro continua.

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.