Apagar Um Registro

Março 2, 2005

Primeiramente quero agradecer por vocês terem resolvido meu problema com a conexão do banco. Agora quero incomodar mais uma vez, é o seguite: quero apagar um registro do banco e está dando o seguinte 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 'cod ='.

/apaga02.asp, line 23

Código

<%@ LANGUAGE=VBScript%>

<html>

<head>

<title>Apaga (deleção)</title>

</head>

<body topmargin="0" leftmargin="0" marginheight="0" marginwidth="0"

style="font-family: Arial" bgcolor="#FFFFFF" text="#5B2D02">

<%

Dim nome,conteudo,numero,data

nome= replace(request.form("nome"), "'", "''")

cod = replace(request.form("cod"), "'", "''")

senha= replace(request.form("senha"), "'", "''")

email = replace(request.form("email"), "'", "''")

'***Declarando Conexões com Banco de Dados***

Set conexao=Server.CreateObject("ADODB.Connection")

constr= "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\simone\banco.mdb"

conexao.Open(constr)

'***Deletando o registro na tabela***

InstrucaoSql= " DELETE DISTINCTROW cod, nome, senha, email FROM Aluno WHERE cod = " & (cod) & ""

conexao.Execute(InstrucaoSql)

%>

<tr>

<td width="100%" align="center">Apagado!</td>

</tr>

</table>

</center></div>

<form>

<div align="center"><center><p><input type="button" value="Voltar" name="B1"

onClick="history.back()"></p>

</center></div>

</form>

<br>

</p>

</body>

</html>

allan.wa · Março 2, 2005

Ola ... aparentemente esse seu "cod" que vem de um form não está tendo um cod...

tente isso só para ver o que vai aparecer na tela... se aparece um cod ou não...

<%

Dim nome,conteudo,numero,data

nome= replace(request.form("nome"), "'", "''")

cod = replace(request.form("cod"), "'", "''")

senha= replace(request.form("senha"), "'", "''")

email = replace(request.form("email"), "'", "''")

response.write cod

-----

o resto de seu codigo...

=======================

só adicione esse response.write

depois poste aqui de novo..

Reginaldo ASP · Março 2, 2005

Sua variável 'cod' está em branco.

Verifique no formulário que está enviando, se o campo está com esse mesmo nome 'cod', pois provavelmente não está, ou está sem preenchiemento.

beleza?

Principe · Março 2, 2005

tira as aspas depois da string de DELETE tipu :

...OM Aluno WHERE cod = " &cod

Ale_xacunois · Março 2, 2005

coloque as aspas depois do sinal de igual

aí você concatena

exemplo:

***Deletando o registro na tabela***

InstrucaoSql= " DELETE DISTINCTROW cod, nome, senha, email FROM Aluno WHERE cod = " & (cod)

conexao.Execute(InstrucaoSql)

qualquer coisa posta ai

Alesandro

Entrar

Apagar Um Registro

Pergunta

Guest - Simone -

Link para o comentário

Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

allan.wa

Link para o comentário

Compartilhar em outros sites

Reginaldo ASP

Link para o comentário

Compartilhar em outros sites

Principe

Link para o comentário

Compartilhar em outros sites

Ale_xacunois

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns

Navegação

Atividades