Problemas no INSERT INTO

[Diego Melo 0]

MINHA PROGRAMAÇÃO PARA O CADASTRO DE UMA AGENDA ESTÁ DANDO ERROS, SEGUE O CÓDIGO:

 

Dim conexaodb

pag = request("pag")

action = request("action")

%>

<%

IF action = "" Then

SQL = "SELECT * FROM tbagenda ORDER BY id DESC"

Call abreconexao

Set RS = conexaodb.execute(SQL)

 

ELSEIF action = "adicionar" then

vdata = request("txtdata")

vcidade = request("txtcidade")

vlocal = request("txtlocal")

 

vdata = replace(vdata,"'",""")

vcidade = replace(vcidade,"'",""")

vlocal = replace(vlocal,"'",""")

 

 

SQL = "INSERT INTO tbagenda (data, cidade, local) VALUES (" & vdata & ", '" &vcidade & "', '" & vlocal & "');"

Call abreconexao

conexaodb.execute(SQL)

%>

<script>alert('CADASTRADO com sucesso!');location.href='principal.asp?ir=pg_agenda.asp&pag=2';</script>

 

ALGUÉM ME AJUDA POR FAVOOOR???

[andersonleme 1]

cora o erro ai ta no seu if

você setou

SQL = "SELECT * FROM tbagenda ORDER BY id DESC"

Call abreconexao

Set RS = conexaodb.execute(SQL)

em um if

e executou o insert em outro

[Diego Melo 0]

cara, desculpa encomodar, mas eu sou muito leigo ainda em asp ahushuas

queria saber se tem como você mostrar como ficaria então, pq tp, to usando essa mesma programação pra cadastro de estudos, e artigos, só deu errado no da agenda :\

abraaçooos! vlw desde jaá

[dark0 0]

procure sempre postar o erro que está mostrando na tela.

 

Sem ele, teríamos que ler linha a linha do código pra tentar encontrar o erro.. E muitas vezes, não é colado o codigo todo aqui.. e o erro pode estar em uma pagina de include.. ou algo do genero.

 

no começo do seu codigo não tem <%, tag de abertura ASP. Talvez você apenas não tenha colocado aqui.. mas como não tem uma descrição de erro..

pois, olhando pra programação.. a principio não encontrei nenhum erro visivel.. pode haver erro logico.. tipo.. formato do campo no banco de dados.. e a forma como a cláusula insert into está enviando..

 

Enfim.. poste o erro para podermos tentar ajudar..

 

Abraços

[Diego Melo 0]

segue o erro :

 

Microsoft JET Database Engine erro '80040e14'

 

Erro de sintaxe na instrução INSERT INTO.

 

/site/sistema/pg_agenda.asp, line 42

 

ta faltando o <% pq não copiei ele, copiei só essa parte msm hehe, vlw abrz, aguardo resposta

 

alguém ai tem uma idéia do que seja?

[@fabiosantosrj 0]

o campo data nao está entre aspas no insert. além disso nao tem end if.

[Diego Melo 0]

o erro continua, e o end if tem sim, mas ta mais pra baixo, colei só a parte onde está aparecendo o erro, na linha do insert into.

[@fabiosantosrj 0]

faça assim:

sql = "INSERT INTO tbagenda (data, cidade, local) VALUES ('" & vdata & "', '" &vcidade & "', '" & vlocal & "');"

response.write sql

response.end

 

veja o que sai na tela e se está correto o script, cole no banco de dados e execute para ver se roda.

 

no banco de dados, o campo data é do tipo date ou varchar?

[Diego Melo 0]

é do tipo data e hora

[xanburzum 169]

Verifique a ortografia. pode ser um nome de coluna Invalido 'sua_coluna'. A coluna a qual você se refere na Base de Dados não foi encontrada. e também veja se os tipos de dados estão corretos

[Mário Monteiro 179]

Local é palavra reservada coloque entre colchetes para corrigir

[Diego Melo 0]

Local é palavra reservada coloque entre colchetes para corrigir

não entendi.

coloquei local como linha unica no banco de dados, e txt na pagina

[xanburzum 169]

Verifique se os nomes das colunas estão corretos e que também os tipos de dados estão corretos