Tema: delete
Ver Mensaje Individual
  #3 (permalink)  
Antiguo 24/05/2005, 16:08
marcocho2005
 
Fecha de Ingreso: abril-2005
Mensajes: 137
Antigüedad: 19 años, 1 mes
Puntos: 0
mmmmmmmmm

Cita:
Iniciado por reel
Te Sugiero que lo hagas con consultas:

DELETE FROM tabla WHERE campo = valor

Saludes

si hace eso como puede verificar si el valor del campo existe???
primero debe hacer la consulta:
Dim RsRegistros As ADODB.Recordset
Dim SQL As String

Set RsRegistros = New ADODB.Recordset
SQL = "Select * From Tabla Where campo = " & valor
o
SQL = "Select * From Tabla Where campo = ' " & valor & " ' "
(si se trata de un campo string)
RsRegistros.Open SQL, Conexion. adOpenStatic
If RsRegistros.Recordcount = 0 Then
(Si no hay el registro)
msgbox "No existe el registro"
Else
SQL = "Delete Tabla Where Campo = " & valor
o
SQL = "Delete Tabla Where Campo = ' " & valor & " ' "
Conexion.Execute SQL
End If

asi verificas que haya el registro y si existe pues recien lo eliminas no?