
25/06/2002, 13:12
|
| | Fecha de Ingreso: junio-2002
Mensajes: 11
Antigüedad: 22 años, 11 meses Puntos: 0 | |
Re: Borrar registros gracias pero de esa forma es como lo estoy haciendo y no funciona, cuando doy un nombre que no existe, me saca el mensaje de nombre borrado, te pongo el codigo para que lo veas
***************
Set rsdel = Server.CreateObject ("ADODB.Recordset")
strSQL = "SELECT * FROM empleados WHERE Nombre ='" &nombre& "' and Apellido ='" &apellido& "'"
Set rs = Server.CreateObject ("ADODB.Recordset")
rs.Open strSQL, oConn
if (rs.EOF) Then
Response.Write ("No existe nadie con el nombre "& Nombre)
else
strSQL = "DELETE FROM empleados WHERE Nombre='"&nombre&"' and Apellido='"&apellido&"'"
rsdel.Open strSQL, oConn
Response.Write ("<p> Nombre borrado: " & Nombre & " " & Apellido & " " & "<br>")
rsdel.Close
end if
rs.Close
oConn.Close
:) Gracias |