Excluir um registro

Como apagar um registro. Scripts de exemplo.

Por Rubén Alvarez


Publicado em: 18/12/04
Valorize este artigo:
Outra das operações fundamentais que podem ser realizadas sobre uma base de dados é o apagar um registro. Para fazê-lo, SQL nos propõe sentenças do tipo Delete. Vejamos com um exemplo, aplicado a nossa agenda. Primeiro, criaremos um menu desdobrável dinâmico como para o caso das atualizações:

<HTML>
<HEAD>
<TITLE>Apagar1.asp</TITLE>
</HEAD>
<BODY>
<div align="center">
<h1>Apagar um registro</h1>
<br>
<%
'Instanciamos e abrimos nosso objeto conexao
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Minhabase"
%>

<FORM METHOD="POST" ACTION="apagar2.asp">
Nome<br>
<%
'Criamos a sentença SQL e a executamos
sSQL="Select nome From clientes Order By nome"
set RS = conn.execute(sSQL)
%>
<select name="nome">
<%
'Geramos o menu desdobravel
Do While not RS.eof%>
   <option><%=RS("nome")%>
   <%RS.movenext
Loop
%>
</select>
<br>
<INPUT TYPE="SUBMIT" value="Apagar">
</FORM>
</div>

</BODY>
</HTML>

O seguinte passo é fazer efetiva a operação a partir da execução da sentença SQL que construímos a partir dos dados do formulário:

<HTML>
<HEAD>
<TITLE>Apagar2.asp</TITLE>
</HEAD>
<BODY>
<%
'Recolhemos os valores do formulario
nome=Request.Form("nome")

'Instanciamos e abrimos nosso objeto conexao
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Minhabase"

'Agora criamos a sentença SQL
sSQL="Delete From Clientes Where nome='" & nome & "'"

'Executamos a ordem
set RS = Conn.Execute(sSQL)
%>

<h1><div align="center">Registro Apagado</div></h1>
<div align="center"><a href="leitura.asp">Visualizar o conteudo da base</a></div>

<%
'Fechamos o sistema de conexao
Conn.Close
%>

</BODY>
</HTML>





Comentários do artigo
Foram enviados 4 comentários ao artigo
4 comentários não revisados
0 comentários revisados

Usuários :    login / registro

Manuais relacionados
Categorias relacionadas
O autor

Home | Sobre nós | Copyright | Anuncie | Entrar em contato