ESTO ES PARA ACTUALIZAR
' Tenemos que especificar un Cursor y un Lock (cerrojo) que permitan editar.
' Cursor=adOpenKeyset
rs.CursorType=1
' Lock=adLockOptimistic
rs.LockType=2
SQL="SELECT Nombre, Apellido, Edad FROM Empleados WHERE " & _
"Nombre='Paco' AND Apellido='Gómez' AND Edad=35;"
rs.Open SQL, oConn
rs.Fields(Edad)=25
'Guardamos los cambios
rs.Update
ESTO ES PARA BORRAR
SQL="DELETE FROM Empleados WHERE Nombre='Paco' AND Apellido='Gómez' AND Edad=35;"'Ejecutamos la sentenciaoConn.Execute(SQL)
Para borrar a través de ADO, hacemos lo siguiente:
' Tenemos que especificar un Cursor y un Lock (cerrojo)' que permitan en este caso, borrar.' Cursor=adOpenKeysetrs.CursorType=1' Lock=adLockOptimisticrs.LockType=2SQL="SELECT Nombre, Apellido, Edad FROM Empleados WHERE " & _ "Nombre='Paco' AND Apellido='Gómez' AND Edad=35;"rs.Open SQL, oConn'Borramos el registrors.Delete'Guardamos los cambiosrs.Update
O CHECA LA PAGINA
http://www.aspfacil.com/articulos/tododb.asp