29/08/2003, 17:06
|
| | Fecha de Ingreso: noviembre-2002 Ubicación: Casa-Trabajo
Mensajes: 60
Antigüedad: 22 años Puntos: 0 | |
Aqui les pongo el código, hagan pruebas, please <HTML>
<HEAD>
<TITLE></TITLE>
</HEAD>
<BODY>
<center>
<br>
<form name=CapturaObjetivos action="CapturaDatosGenerales.asp" method=post>
<table border=0 cellspacing="0" cellpadding="3" bgcolor="#ebf1f5" class=Txt8Black width=600pt>
<tr>
<td class="Txt8Blue">
Objetivo:
<input style="width: 600; height: 22" maxLength="80" name="objetivo">
</td>
</tr>
<tr>
<td>
<input type=radio name=AutoPlan id="4" value=4>Normas y lineamientos
<input type=radio name=AutoPlan id="2" value=2>Estratégico
<input type=radio name=AutoPlan id="1" value=1>Autogestión
<input type=radio name=AutoPlan id="5" value=5>Ayudas económicas
<input type=radio name=AutoPlan id="3" value=3>Eventos al extranjero
</td>
</tr>
</table>
<br><br>
<input type=button Name="Siguiente" Value="Siguiente" class="txt8Black">
</form>
</BODY>
</HTML>
<script LANGUAGE="VBScript">
<!--
Sub Siguiente_OnClick
If CapturaObjetivos.Objetivo.value = "" Then
var = MsgBox(" Debe teclear un objetivo", 64," Captura")
CapturaObjetivos.objetivo.focus()
Exit Sub
ElseIf CapturaObjetivos.AutoPlan.value = "" Then
var = MsgBox(" Debe seleccionar el programa", 64, " Captura")
CapturaObjetivos.AutoPlan.focus()
Exit Sub
End If
CapturaObjetivos.submit()
End Sub
-->
</script> |