erro

[AlexCT 0]

Estou tentando Deleta e alterar registro

 

mas nao esta fiuncionando

 

criei duas paginas poara isso e esta dandosos erros abaixo

 

ALTERAR

<%Dim nome,senha,numeronome = replace(request.form("uid"), "'", "''")senha = replace(request.form("pwd"), "'", "''")numero = replace(request.form("id"), "'", "''")Set DB = Server.CreateObject("ADODB.Connection")cnpath="DBQ=" & server.mappath("login.mdb")DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpathalterar = "UPDATE DISTINCTROW admin SET uid = '" & nome & "', pwd = '" & senha & "' WHERE id = " & (numero) & ""DB.Execute(alterar)response.redirect "password.asp"%>

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe (operador faltando) na expressão de consulta 'id ='.

/asp/eng/z/altera.asp, line 12

 

 

 

DELETAR

<%Dim nome,senha,numeronome = replace(request.form("uid"), "'", "''")senha = replace(request.form("pwd"), "'", "''")numero = replace(request.form("id"), "'", "''")Set DB = Server.CreateObject("ADODB.Connection")cnpath="DBQ=" & server.mappath("login.mdb")DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpathdeletar = "DELETE DISTINCTROW numero, nome, senha FROM admin WHERE numero = " & (numero) & ""DB.Execute(deletar)response.redirect "password.asp"%>

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe (operador faltando) na expressão de consulta 'numero ='.

/asp/eng/z/deletar.asp, line 12

 

---

Não estou conseguindo achar o erro

 

 

outra duvida é como listar o conteudo da tabela do bd

alguma dica?

[Salgado 4]

Verifique a variável "numero".

O "ID" é numérico?

Se for no replace que você ta dando você faz:

numero = replace(request.form("id"), "'", "")

Quanto a segunda duvida tá uma olhada no post do amigo MEBKOCZNSKI.

 

Valeu?

[mebkocznski 0]

O Request("id") não está recebendo o código.....ou por que você não está passando ou esta fazendo referência ao campo errado.Falow !!!!

[AlexCT 0]

consegui resolversobre o delete

 

mas este aqui esta travando, dessa vez mandei postei o arquivo envia os dados para o outro.

 

 

password.asp

<%Response.Buffer=TRUE%><%IF session("admin") = FALSE THEN Response.Redirect "admin_login.asp"%><%Set DB = Server.CreateObject("ADODB.Connection")cnpath="DBQ=" & server.mappath("database/login.mdb")DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpathlistar = "SELECT * FROM users ORDER BY id DESC"Set lista = DB.Execute(listar)%><form action="altera.asp" method="post">        <input type="text" name="nome" value="<%= lista("uid")%>">        <input type="text" name="senha" value="<%= lista("pwd")%>">        <input type="hidden" name="numero" value="<%= lista("id")%>">        <input name="submit" type="submit" value="Alterar">        <input type="reset" value="Desfazer" name="reset"></form>

altera.asp

<%Dim nome,senha,numeronome = replace(request.form("uid"), "'", "''")senha = replace(request.form("pwd"), "'", "''")numero = replace(request.form("numero"), "'", "''")Set DB = Server.CreateObject("ADODB.Connection")cnpath="DBQ=" & server.mappath("database/login.mdb")DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpathalterar = "UPDATE DISTINCTROW users SET uid = '" & nome & "', pwd = '" & senha & "' WHERE id = " & (numero) & ""DB.Execute(alterar)response.redirect "password.asp"%>

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)

[Microsoft][Driver ODBC para Microsoft Access] O campo 'users.uid' não pode ser uma seqüência de caracteres de comprimento nulo.

/asp/eng/clinica/altera.asp, line 12

 

 

pq esta dando erro?

 

uma pergunta, qdo usar post e qdo usar qet

[AlexCT 0]

tire o parenteses do numero na instrução do UPDATE

Fiz isso e continuou na mesma, o que mais pode ser?