Jump to content
Fórum Script Brasil
  • 0

Codigo Banir Com Erro


mestre fyoda

Question

Microsoft JET Database Engine error '80040e14'

Syntax error (comma) in query expression 'id = 15, 16'.

/teste123/sistema em asp/banir_salvar.asp, line 12

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

<%

id = Request("ban")

'Desmarca todos os registros do banco

Set verificar = Server.CreateObject("ADODB.Recordset")

sql = "Select * from usuarios where id = "& id &" "

verificar.open sql, conex, 3,3

If verificar.EOF Then

Response.Write "O usurio no existe!!!"

ElseIf verificar("nivel") = 1 Then ' tire as aspas caso seja valor numrico no BD

Response.Write "O man, no pode excluir usurios de nvel 1..."

Else

while not verificar.eof

verificar("banido") = false

verificar.update

verificar.movenext

wend

'Verifica o que foi selecionado

for each ban in request("ban")

'Marca o campo banido como true de acordo com o id selecionado

Set salvar = Server.CreateObject("ADODB.Recordset")

sql = "Select * from usuarios where id ="&ban

salvar.open sql, conex, 3,3

salvar("banido") = true

salvar.update

next

'Redireciona o usuário para a página anterior

response.Redirect("admin_banir.asp")

end if

%>

Link to comment
Share on other sites

4 answers to this question

Recommended Posts

  • 0

Vixi, que código mais loco é esse cara??? hehehehe

Seguinte, note:

for each ban in request("ban")

Request("ban") não é uma coleção, portanto não dá pra dar For Each nele!!! Mesmo que se use isso, só vai passar uma vez, porque você só usa 1 querystring ban não é??

Então ele tá tentando apagar ops ids: 15, 16... só q você tem q passar só uma vez...

Troque aquela linha por estas:

quebra = Split(request("ban"), ",")

For Each ban In Quebra

ban = Trim(ban)

... ' segue o código

Mais pra falar a verdade nem sei se vai funcionar, porque tá uma bagunça que só esse código hein! heehehhe

Link to comment
Share on other sites

  • 0
erro :

Microsoft JET Database Engine error '80040e14'

Syntax error (missing operator) in query expression 'id ='.

/teste123/sistema em asp/banir_salvar.asp, line 10

Tente colocar a variavel do id na variavel do banco de dados:

id = RecSet("id")

Caso tenha mais alguma dúvida, posta ae!!! wink.gif

[]'s

Victor

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152.2k
    • Total Posts
      651.8k
×
×
  • Create New...