Erro De Update

jucacabala · Julho 16, 2005

pelo amor de deus qual o erro nesse codigo?

<!--#include file="conexao.inc" -->

<%
	if Request.form("nome")="" then
	response.redirect "index.asp"
	end if

	if session("id")="" then
	response.redirect "restrito.asp"
	end if
%>
	<%
	DIM conexaodb, rs, str
	Dim id, nome, sobrenome, email, nascimento, igreja, endereco, numero, complemento, cep, bairro, cidade, estado, ddd, telefone, celular, senha

	senha = Trim(Request.form("senha"))
	nome = Trim(Request.form("nome"))
	sobrenome = Trim(Request.form("sobrenome"))
	email = Trim(Request.form("email"))
	nascimento = Trim(Request.form("nascimento"))
	igreja = Trim(Request.form("igreja"))
	endereco = Trim(Request.form("endereco"))
	numero = Trim(Request.form("numero"))
	complemento = Trim(Request.form("complemento"))
	bairro = Trim(Request.form("bairro"))
	cep = Trim(Request.form("cep"))
	cidade = Trim(Request.form("cidade"))
	estado = Trim(Request.form("estado"))
	ddd = Trim(Request.form("ddd"))
	telefone = Trim(Request.form("telefone"))
	celular = Trim(Request.form("celular"))
	id = Trim(Request.form("id"))	

	str = "UPDATE cadastro SET "
	str = str & "senha='" & senha & "',"
	str = str & "nome='" & nome & "',"
	str = str & "sobrenome='" & sobrenome & "',"
	str = str & "email='" & email & "',"
	str = str & "nascimento=#" & nascimento & "#,"
	str = str & "igreja='" & igreja & "',"
	str = str & "endereco='" & endereco & "',"
	str = str & "numero=" & numero & ","
	str = str & "complemento='" & complemento & "',"
	str = str & "bairro='" & bairro & "',"
	str = str & "cep='" & cep & "',"
	str = str & "cidade='" & cidade & "',"
	str = str & "estado='" & estado & "',"
	str = str & "ddd='" & ddd & "',"
	str = str & "telefone='" & telefone & "',"
	str = str & "celular='" & celular & "',"
	str = str & "WHERE id=" &id

	call abreconexao
	Set rs = conexaodb.Execute(str)
%>

esta dando o erro

Tipo de erro:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe na instrução UPDATE.

koal40 · Julho 16, 2005

os campos texto e memorando ficam entre aspas simples e duplas já os outros campos ficam entre aspas duplas, ve se está certo, mas uq é isso:

str = str & "nascimento=#" & nascimento & "#,"

jucacabala · Julho 16, 2005

isso é um campo tipo data

koal40 · Julho 16, 2005

nunca vi esse codigo... hehe, tenta ir tirando partes do cogido, para achar o erro

jucacabala · Julho 17, 2005

campo data é assim mesmo que se escreve

já revirei o codigo todo

mas não acho onde possa estar o erro

já que em todos meus updates uso este mesmo codigo e dá certo

se alguém descobrir onde posso estar errando

eu agradeço

abraços

Julyana

koal40 · Julho 17, 2005

noss...

qual a linha do erro?

JCMPJ · Julho 17, 2005

hummm

Veja esta linha :

str = str & "celular='" & celular & "',"

jucacabala · Julho 18, 2005

mas o que tem de errado nesta linha?

todos os outros campos são texto

e somente nascimento que é tipo data e o numero é tipo numero

a linha de erro é a 54 "Set rs = conexaodb.Execute(str)

"

JCMPJ · Julho 18, 2005

Bom:

a linha de erro é a 54 "Set rs = conexaodb.Execute(str)

Funciona assim, o erro aparece na linha 54 porque a instrução em SQL que você está querendo executar contém um erro.

Esta mensagen:

Tipo de erro:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe na instrução UPDATE.

Basicamente informa que a instrução não foi escrita da forma correta.

jucacabala · Julho 18, 2005

ai é que tá

eu não consigo achar o erro na instrução

na linha

str = str & "celular='" & celular & "',"

eu já tirei a , que estava a mais

so que mesmo assim o erro persiste!

aiaiaia

fora isto me parece que o script esta certo

ou não estou conseguindo achar o erro nele

o que faço agora?

JCMPJ · Julho 18, 2005

Uma dica

Se você tirar esta linha:

str = str & "celular='" & celular & "',"

O erro vai para a linha anterior. Tipo o erro vai ficar sempre no trecho que antecede a claúsula WHERE.

jucacabala · Julho 18, 2005

tá meu codigo ficou assim

so que mesmo assim esta dando o tal erro no update

<!--#include file="conexao.inc" -->

<%
	if Request.form("nome")="" then
	response.redirect "index.asp"
	end if

	if session("id")="" then
	response.redirect "restrito.asp"
	end if
%>
	<%
	DIM conexaodb, rs, str
	Dim id, nome, sobrenome, email, nascimento, igreja, endereco, numero, complemento, cep, bairro, cidade, estado, ddd, telefone, celular, senha

	senha = Trim(Request.form("senha"))
	nome = Trim(Request.form("nome"))
	sobrenome = Trim(Request.form("sobrenome"))
	email = Trim(Request.form("email"))
	nascimento = Trim(Request.form("nascimento"))
	igreja = Trim(Request.form("igreja"))
	endereco = Trim(Request.form("endereco"))
	numero = Trim(Request.form("numero"))
	complemento = Trim(Request.form("complemento"))
	bairro = Trim(Request.form("bairro"))
	cep = Trim(Request.form("cep"))
	cidade = Trim(Request.form("cidade"))
	estado = Trim(Request.form("estado"))
	ddd = Trim(Request.form("ddd"))
	telefone = Trim(Request.form("telefone"))
	celular = Trim(Request.form("celular"))
	id = Trim(Request.form("id"))	

	str = "UPDATE cadastro SET "
	str = str & "senha='" & senha & "',"
	str = str & "nome='" & nome & "',"
	str = str & "sobrenome='" & sobrenome & "',"
	str = str & "email='" & email & "',"
	str = str & "nascimento=#" & nascimento & "#,"
	str = str & "igreja='" & igreja & "',"
	str = str & "endereco='" & endereco & "',"
	str = str & "numero=" & numero & ","
	str = str & "complemento='" & complemento & "',"
	str = str & "bairro='" & bairro & "',"
	str = str & "cep='" & cep & "',"
	str = str & "cidade='" & cidade & "',"
	str = str & "estado='" & estado & "',"
	str = str & "ddd='" & ddd & "',"
	str = str & "telefone='" & telefone & "',"
	str = str & "celular='" & celular & "' "
	str = str & "WHERE id=" &id

	call abreconexao
	Set rs = conexaodb.Execute(str)

%>

jucacabala · Julho 18, 2005

olha o que deu

UPDATE cadastro SET senha='1234',nome='Nancy',sobrenome='C. Rodrigues Lima',email='nancy.lima@uol.com.br',nascimento=#27/09/1975#,igreja='Metodista em Vila Nivi',endereco='',numero=,complemento='',bairro='',cep='',cidade='',estado='',ddd='',telefone='',celular='' WHERE id=31

cyberalexxx · Julho 18, 2005

poste como a instrução SQL esta ficando:

<%
if Request.form("nome")="" then
response.redirect "index.asp"
end if
if session("id")="" then
response.redirect "restrito.asp"
end if
%>
<%
DIM conexaodb, rs, str
Dim id, nome, sobrenome, email, nascimento, igreja, endereco, numero, complemento, cep, bairro, cidade, estado, ddd, telefone, celular, senha
senha = Trim(Request.form("senha"))
nome = Trim(Request.form("nome"))
sobrenome = Trim(Request.form("sobrenome"))
email = Trim(Request.form("email"))
nascimento = Trim(Request.form("nascimento"))
igreja = Trim(Request.form("igreja"))
endereco = Trim(Request.form("endereco"))
numero = Trim(Request.form("numero"))
complemento = Trim(Request.form("complemento"))
bairro = Trim(Request.form("bairro"))
cep = Trim(Request.form("cep"))
cidade = Trim(Request.form("cidade"))
estado = Trim(Request.form("estado"))
ddd = Trim(Request.form("ddd"))
telefone = Trim(Request.form("telefone"))
celular = Trim(Request.form("celular"))
id = Trim(Request.form("id"))
str = "UPDATE cadastro SET "
str = str & "senha='" & senha & "',"
str = str & "nome='" & nome & "',"
str = str & "sobrenome='" & sobrenome & "',"
str = str & "email='" & email & "',"
str = str & "nascimento=#" & nascimento & "#,"
str = str & "igreja='" & igreja & "',"
str = str & "endereco='" & endereco & "',"
str = str & "numero=" & numero & ","
str = str & "complemento='" & complemento & "',"
str = str & "bairro='" & bairro & "',"
str = str & "cep='" & cep & "',"
str = str & "cidade='" & cidade & "',"
str = str & "estado='" & estado & "',"
str = str & "ddd='" & ddd & "',"
str = str & "telefone='" & telefone & "',"
str = str & "celular='" & celular & "' "
str = str & "WHERE id=" &id
call abreconexao
response.write str : response.end
Set rs = conexaodb.Execute(str)
%>

cyberalexxx · Julho 18, 2005

UPDATE cadastro SET senha='1234',nome='Nancy',sobrenome='C. Rodrigues Lima',email='nancy.lima@uol.com.br',nascimento=#27/09/1975#,igreja='Metodista em Vila Nivi',endereco='',numero=,complemento='',bairro='',cep='',cidade='',estado='',ddd='',telefone='',celular='' WHERE id=31

acho q o erro esta ai, o campo esta em branco.

jucacabala · Julho 18, 2005

ta resolvido

o JCMPJ desvendou

o campo numero etava sem valor e no banco ele não pode ser nulo

pode fechar

cyberalexxx · Julho 18, 2005

ta resolvido
o JCMPJ desvendou
o campo numero etava sem valor e no banco ele não pode ser nulo
pode fechar

Fechado!!!

Entrar

Erro De Update

Pergunta

Link para o comentário

Compartilhar em outros sites

16 respostass a esta questão

Posts Recomendados

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Estatísticas dos Fóruns