Foros del Web » Programando para Internet » ASP Clásico »

Graba en el 2do Envio

Estas en el tema de Graba en el 2do Envio en el foro de ASP Clásico en Foros del Web. 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 ...
  #1 (permalink)  
Antiguo 26/01/2006, 16:33
Avatar de WILLIAMGG  
Fecha de Ingreso: febrero-2005
Mensajes: 218
Antigüedad: 19 años, 3 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
  #2 (permalink)  
Antiguo 26/01/2006, 16:57
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 5 meses
Puntos: 98
Para mi tu problema es de logica, a golpe de vista, me salta esta condicion

<%if request.form("grabar")="Grabar Datos Ingresados" then%>

que aparte deberia tener un input de tipo hidden asociado, checalo por ahi.

Otra cosa, seria mucho mas facil de leer, si utilizas las etiquetas de codigo, en lugar de ponerlo en negrita, y tambien si tu codigo esta identado correctamente, aparte de como yo te mencione, poner la parte funcional.

Salu2,
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
  #3 (permalink)  
Antiguo 26/01/2006, 17:45
Avatar de WILLIAMGG  
Fecha de Ingreso: febrero-2005
Mensajes: 218
Antigüedad: 19 años, 3 meses
Puntos: 0
OK, Gracias U_G..., por tu consejo, revisare y os contare mañana, nos vemos Bye
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 21:10.