|
<< Actualizar Registos | Declarações e Operadores >>
|
tratar dados >
bases de dados > eliminar registos |
|
|
. : : . eliminar registos . : : .
|
Usando pela última vez como base o exemplo anterior, vamos
alterá-lo para eliminar registos na tabela Aluno da base de dados Alunos.
Mais uma vez vamos recorrer a uma declaração SQL que nos permite eliminar
registos
dados que é Delete.
Vejamos o exemplo:
|
<HTML>
<HEAD>
<TITLE>Registos de Alunos</TITLE>
</HEAD>
<BODY>
<%
Dim Conn
Dim DsnAccess
Set Conn = Server.CreateObject("ADODB.Connection")
DsnAccess = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\BasesDados\Alunos.mdb"
Conn.Open DsnAccess
Dim RS
Set RS = Server.CreateObject ("ADODB.Recordset")
Dim SqlString
SqlString = "Delete * From Aluno Where Email='j.antunes@servidor.pt' "
Set RS = Conn.Execute(SqlString)
%>
</BODY>
</HTML> |
Esta declaração Delete
elimina o todos os dados do registo da tabela Aluno que tenha o e-mail
especificado na cláusula Where.
É aconselhável exercitar e usar com muito cuidado esta declaração
Delete, por duas razões:
1 - Uma vez eliminados, os registos não se podem recuperar. Está feito!
Já era!
2 - Se te esqueceres da cláusula Where, todos os registos da tabela
serão eliminados!
Para compreenderes aprofundadamente o acesso a dados e queries
complexas, consulta a Referência SQL e a Referência ADO deste
guia. Estas são referências bastante exaustivas às podes sempre recorrer, e
procurar um item facilmente.
<< Actualizar Registos | Declarações e Operadores >>
|
