El siguiente sript es para borrar registro de la base de datos, pero no me borra los registros.
aqui dejo el codigo por si alguien e ayuda
Borrar.asp
Cita: <html>
<head>
<title>borrar</title>
</head>
<body>
<H1>Ejemplo de uso de bases de datos con ASP y ADO</H1>
<%
' Nuestras tres variables para jugar con la bd
Dim oConn, rs, sSQL
'Creación del objeto que realiza la conexión a la base de datos
Set oConn = Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
oConn.ConnectionString = "DSN=prueba"
oConn.Open "driver={SQL Server}; server=AGUZMAN; uid=aguzman; pwd=zsamer; database=prueba"
sSQL = "SELECT * FROM cliente"
Set RS = oConn.Execute(sSQL)
%>
<TABLE BORDER=1 CELLSPACING=1 CELLPADDING=1>
<TR><TD> userid</TD> <TD> nombre </TD> <TD>Borrar</TD></TR>
<%
while (not RS.Eof)
Response.Write("<tr><td> " & RS("userid") & "</td><td> " & RS("nombre") & " </td><td><a href=""borra.asp?id=" & RS("nombre") &""">borrar</a></td></tr>")
RS.MoveNext
wend
oConn.Close
set RS = nothing
set oConn = nothing
%>
</table>
</body>
</html>
Borra.asp
Cita: <%
' Nuestras tres variables para jugar con la bd
Dim oConn, rs, sSQL, nombre
nombre=Request.form("nombre")
' Nuestras tres variables para jugar con la bd
'Creación del objeto que realiza la conexión a la base de datos
Set oConn = Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
oConn.ConnectionString = "DSN=prueba"
oConn.Open "driver={SQL Server}; server=AGUZMAN; uid=aguzman; pwd=zsamer; database=prueba"
sSQL="Delete From Cliente Where nombre='" & nombre & "'"
oConn.Execute(sSQL)
oConn.Close
set oConn = nothing
Response.Redirect("borrar.asp")
%>
salu2