<%@ LANGUAGE="VBSCRIPT"%>
<HTML>
<HEAD><META NAME=GENERATOR CONTENT="Microsoft FrontPage 4.0">
<script>
function verificaP()
{if (document.formulario.PAD.checked){
document.formulario.PAD.checked=false }
document.formulario.action ="NEWFAMIL.asp?HIJ="+
document.formulario.HIJ.value;
cadena=document.formulario.HIJ.value
alert(cadena)
document.formulario.submit();
}
function verificaH()
{cadena=document.formulario.PAD.value
if (document.formulario.HIJ.checked){
document.formulario.HIJ.checked=false }
document.formulario.submit();
}
</script>
</HEAD>
<BODY>
<% abro la BD
%>
<form name=formulario method=post>
<center><h1>INGRESO DE NUEVO INTEGRANTE DE FAMILIA</h1></center>
Nombre: <input type=text name="txtnombre" size=18 value="<%=Request.Form("txtnombre")%>"><BR>
Apellidos : <input type=text name="txtapell" size=22 value="<%=Request.Form("txtapell")%>"><BR>
<TABLE BORDER=0 CELLPADDING=5>
<TR><TD><input type=radio name="PAD" VALUE="PADRE" ONCLICK="javascript:verificaH();">PADRE
<input type=radio name="HIJ" VALUE="HIJO" ONCLICK="javascript:verificaP();">HIJO <BR></TD></TR>
</TABLE>
PADRES:<select name=CBOPAP>
<%if Request.QueryString("HIJ")<>""then%>
<%do while not tabla.eof%>
<option value="<%=tabla("IdP")%>"><%=tabla("Nombre")%>
<%tabla.MoveNext
loop%>
<%end if%>
</select><BR>
<INPUT type=button name="Acep" VALUE="Enviar">
<INPUT TYPE="RESET" name="Canc" VALUE="CANCELAR">
<%
tabla.Close
set tabla=nothing
coneccion.Close
set coneccion=nothing%>
</form>
</BODY>
</HTML>
TABLA PADRE(IDP, Nombre), HIJO(IDH, IDP, Nombre, Apellidos)
GRACIAS A TUTO MUNDO ...
ATTE WYLO
