Ver Mensaje Individual
  #8 (permalink)  
Antiguo 20/08/2009, 12:22
glory82
 
Fecha de Ingreso: febrero-2007
Mensajes: 139
Antigüedad: 18 años, 2 meses
Puntos: 0
Respuesta: Clic boton no hace nada

Hola,
De ajax no se nada, entonces ahi si no se que hacer, claro que despues de mucho cacharrear tengo este codigo para lo que necesito, pero ahora el problema que tengo es que despues de dar clic en el 2 boton, aunque me muestra la 1 tabla (lo que no hacia antes) me borra los datos ya mostrados almacenados en variables.
Habia pensado en definir las variables con Dim o Public o Session pero no me fuciona.
Como puedo hacer para mantener el valor de las variables o ServerVariables guardadas a pesar de dar clic al 2 boton.
Esta pregunta la puse como nuevo tema en el foro, no se si esta bien hecho pero es que necesito poder hacer este reporte.
Adjunto el codigo.
Código HTML:
<html>
<head>
</head>
<body>
<form name="form" method="post" action="">
  <font color="#009333">
  Fecha&nbsp;
    <select name="mes" style="height: 22px">
   	  <option value="01" >ENERO</option>
      <option value="02">FEBRERO</option>
      <option value="03">MARZO</option>
      <option value="04">ABRIL</option>
      <option value="05">MAYO</option>
      <option value="06">JUNIO</option>
      <option value="07">JULIO</option>
      <option value="08">AGOSTO</option>
      <option value="09">SEPTIEMBRE</option>
      <option value="10">OCTUBRE</option>
      <option value="11">NOVIEMBRE</option>
      <option value="12">DICIEMBRE</option>
    </select>&nbsp;&nbsp; <font face="Arial" color="#009333" size="2">  
    <input name="Mostrar" type="submit" value="Mostrar"></font></font></form>
<%if request.ServerVariables("REQUEST_METHOD")="POST" then
	Dim Fecha1
    for each control in request.form
	  	for indice=1 to request.form(control).count
		    ' response.write control & " = " & request.form(control)(indice)&"<br>"
		     select case control
		     	case "ano": Fecha1 = request.form(control)
		     	case "mes": Fecha2 = request.form(control)
		     	case "dia": Fecha3 = request.form(control)
		     	case "ano1": Fecha1_1 = request.form(control)
		     	case "mes1": Fecha2_1 = request.form(control)
		     	case "dia1": Fecha3_1 = request.form(control)
		     end select		   
	 	 next
	next
	FechaReport 	= fecha1 & "-" & Fecha2 & "-" & Fecha3 
    FechaReport_1 	= fecha1_1 & "-" & Fecha2_1 & "-" & Fecha3_1 %>
	<p>&nbsp;<span class="style7"><strong>Datos desde el dia <%Response.write fecha1&"/"&fecha2&"/"&fecha3%>
     </strong><span class="style5"></span></p>
	<form name="form2" method="post" action="">
	<%for i=0 to 3%>
	<input type="radio" value="<%=i+1%>" name="radio">
	<%next%>
	<input type="submit" name="comprobar" value="comprobar">
	</form>
	<%if request.ServerVariables("REQUEST_METHOD")="POST" then
		for each control in request.form
			 for indice=1 to request.form(control).count
			    response.write control & " = " & request.form(control)(indice)&"<br>"
			 next
		next%>
		<%end if	
end if%>	
</body></html>