Borrado de registros de un select dependiente

[Uefor]

Hola...
Tengo un código adaptado de select dependientes en los que el usuario selecciona un número en el select y aparecen los registros relacionados en campos de texto, necesito poder borrar uno de ellos respetando al resto obviamente.

He pensado incluir checkbox, pero no me termina de funcionar, ¿alguna idea?

El formulario que quiero usar es este:

Código:

<form name=formulario> 
<select name=IdSalidas SIZE="1" CLASS="fc_dateHover" onChange="location.href('borrar.asp?IdSalidas=' 
+ formulario.IdSalidas.options[formulario.IdSalidas.selectedIndex].value)">
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open = MM_cnx_salidas_STRING

Dim RS_insc, SQL_insc, IdSalidas

SQL_insc="SELECT IdSalidas FROM salidas ORDER BY IdSalidas DESC"
IdSalidas = request.querystring("IdSalidas")

set RS_insc = createobject("ADODB.Recordset")
set RS_insc = Conn.execute(SQL_insc)
    
	if isNumeric(IdSalidas) then
end if

if RS_insc.EOF then
	 response.write("<option value=="""">-- No hay datos --</option>")
else
do while not RS_insc.eof
    response.write("<option value="""&RS_insc("IdSalidas")&"""")
	     if CLng(IdSalidas) = CLng(RS_insc("IdSalidas")) then 
    response.Write(" selected")
    response.Write(">"&RS_insc("IdSalidas")&"</option>")
	
    RS_insc.movenext
    loop
    end if

    RS_insc.close
    set RS_insc = nothing
%>

   </select>

<%
    if IdSalidas <> "" then %>

<%  
    Dim RS_buzos, SQL_buzos 
     	     
SQL_buzos=" SELECT TOP 12 buzos_incl.*, Socios.*"
SQL_buzos=SQL_buzos&" FROM buzos_incl INNER JOIN Socios" 
SQL_buzos=SQL_buzos&" ON buzos_incl.Socio=Socios.socio "
SQL_buzos=SQL_buzos&" WHERE IdSalidas="&IdSalidas&""
SQL_buzos=SQL_buzos&" ORDER BY Id ASC"

        set RS_buzos=createobject("ADODB.Recordset")
        RS_buzos.open SQL_buzos,conn
        do while not RS_buzos.eof  
%>

      <input TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS_buzos("Socio")%>" SIZE="7" READONLY="true">

     <input TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS_buzos("Nombre")%>" SIZE="53" READONLY="true">

     <input TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS_buzos("DNI")%>" SIZE="12" READONLY="true">

     <input TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS_buzos("TIT")%>" SIZE="21" READONLY="true">
     
<%
   RS_buzos.movenext
   loop	
   RS_buzos.close
   set RS_buzos = nothing
%>
   </form>

[mc_quake]

mira yo lo haria tal como dices tu

Go = Cint(Request.Form("Go"))
If Go = 1 Then

aca pones tu consulta delete segun el campo que decesee en este caso lo aremos por el dni asi que rescatas el dni

DNI = Trim(Request.Form("DNI")) ' el trim lo cambias por int en caso que solo sean numero depende de l que rescates

sql delete aca

Else


<%
Set Rs = Server.CreateObject("ADODB.Recordset")
Call_Sql = "SELECT * FROM Tabla "
Rs.Open Call_Sql, MM_conn_STRING,1,2
Rs_total = Rs.RecordCount

<form action="#" method="post" name="f1" id="f1">

While NOT Rs.EOF

<input name="Socio" TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS"Socio")%>" SIZE="7" READONLY="true">

<input name="Nombre" TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS("Nombre")%>" SIZE="53" READONLY="true">

<input name="DNI" TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS("DNI")%>" SIZE="12" READONLY="true">

<input name="TIT"TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS("TIT")%>" SIZE="21" READONLY="true">


Rs.MoveNext
Wend

<input name="Go" type="hidden" value="1" />
<input type="submit" name="button" id="button" value="Submit" />
</form>
Rs.Close
Set Rs = Nothing
%>
<%End If ' fin if go %>

espero haber sido de ayuda

[Uefor]

Muchas gracias... por tu ayuda