Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/01/2006, 16:33
Avatar de WILLIAMGG
WILLIAMGG
 
Fecha de Ingreso: febrero-2005
Mensajes: 218
Antigüedad: 20 años, 2 meses
Puntos: 0
Graba en el 2do Envio

Hola forences tengo un formulario en donde lleno datos y por medio de un botom envio a Grabar los datos ingresados, pero resulta k al hacer click en el botom grabar no lo realiza, recien en el sgdo click recien envia los datos a grabar.
coloco el codigo.
//////
<script>
function Envio(){
document.formulario.submit();
}
.......
</script>
</head>

<body bgcolor="#FFFFCC">
<%conexion%>

<form name="formulario" method="POST" <%if request.form("grabar")="Grabar Datos Ingresados" then%> action="GrabaCorreo.asp" <% else%> action="CreaCorreo.asp"<%end if%> >
<%dim dia,i, mes,anno %>

<table ><tr>
<td><strong>Pais:</strong></td>
<%set tabla=coneccion.Execute("select * from PAIS")%>
<td><select name="CboPais" onchange="javascript:Envio();">
<%idpais=cint(Request.form("CboPais"))%>
<option value="----"></option>
<%do while not tabla.eof %>
<option value="<%=tabla("IdP")%>" <%if idpais=cint(tabla("IdP")) then%> Selected <%End if%>>
<%=tabla("Nombre")%></option>
<%tabla.movenext
loop%>
</select></td>
</tr>
<tr><td><input type=hidden name="accion" value="<%=idpais%>"></td></tr>
<%If request.form("accion")= "" Then%>
<tr><td><strong>Estado:</strong></td><td><select name=CboDpto> </td> </tr>
<%else%>
<%identP=cint(request.form("CboPais"))%>
<%set tablaD=coneccion.Execute("select * from DEPARTAMENTO where IdP="&identP&" ")%>
<tr><td><strong>Estado:</strong></td>
<td><select name="CboDpto" >
<%idenD=cint(Request.form("CboDpto"))%>
<option value="----"></option>
<%do while not tablaD.eof%>
<option value="<%=tablaD("IdD")%>" <%if idenD=cint(tablaD("IdD")) then%>Selected <%End if%>>
<%=tablaD("Nombre")%></option>
<%tablaD.movenext
loop%>
</select></td></tr>
<%tablaD.close
set tablaD=nothing%>
<%end if%>
<tr><td><strong>Dirección de Correo:</strong></td>
<td><input type="text" name="txtcorreo" size=20 maxlength=20 value="<%=Request.Form("txtcorreo")%>" onblur="javascript:verificaVacio(this);">
</td>
</tr>
<tr><td><strong>Contraseña:</strong></td><td><input type="password" name="txtclave" size=25 maxlength=15 value="<%=Request.Form("txtclave")%>"></td></tr>
<tr><td><strong>Confirmar Contraseña:</strong></td><td><input type="password" name="txtCclave" size=15 maxlength=15 value="<%=Request.Form("txtCclave")%>" onblur="javascript:confirma(this);"></td></tr>
<tr><td><strong>Sexo</strong></td>
<td><input type="radio" name="H" VALUE="Hombre" ONCLICK="javascript:Envio();" <%if Request.Form("H")<>"" then%>checked<%end if%>> <strong>Hombre</strong>
<input type="radio" name="M" VALUE="Mujer" ONCLICK="javascript:Envio();" <%if Request.Form ("M")<>"" then%>checked<%end if%>> <strong>Mujer</strong></td>
</tr>
<input type="hidden" name="txtSexo" <%if Request.Form("H")<>"" then%> value="H" <%else if Request.Form("M")<>"" then%> Value="M" <%end if%><%end if%>>
<tr><td></td><td><input type="submit" value="Grabar Datos Ingresados" name="grabar" ></td></tr>

</table>
<%tabla.close
set tabla=nothing
coneccion.Close
set coneccion=nothing%>
</form>
</body>
</html>

Gracias por todo