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

problemas con un select

Estas en el tema de problemas con un select en el foro de ASP Clásico en Foros del Web. Buenas amigos de foros del web.....soy yo nuevamente....resulta que necesito Recuperar datos de un Form, lo cual son de N select , le muestro un ...
  #1 (permalink)  
Antiguo 10/04/2008, 10:30
itm
 
Fecha de Ingreso: marzo-2008
Mensajes: 19
Antigüedad: 17 años, 1 mes
Puntos: 0
problemas con un select

Buenas amigos de foros del web.....soy yo nuevamente....resulta que necesito Recuperar datos de un Form, lo cual son de N select , le muestro un pedazo de codigo para que me entiendan mejor:

'Formulario.asp

<%For i=1 to NumEQuipo %>
Select name="CveEquipo<%=i%>"
' aqui tengo la lista
<%next%>

Entonces el Valor que tenga NumEquipo, es el numero de Select a mostrar.
mi duda ¿Como recupero cada valor selecionado de cada Select?
si son son N cantidad


Saludos a todos............y gracias de antemano
  #2 (permalink)  
Antiguo 10/04/2008, 13:05
Avatar de Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 2 meses
Puntos: 88
Re: problemas con un select

-.....

haber
N de tantos de estos para tantos N's

<%For i=1 to NumEQuipo %>
Select name="CveEquipo<%=i%>"
' aqui tengo la lista
<%next
response.write "<input type=""hidden"" name=""cuantos"" value="& i & "/>"
%>

y recojes el campo "cuantos" y listo, tienes tus tantos "N" como quieras

__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra
  #3 (permalink)  
Antiguo 10/04/2008, 14:13
Avatar de i_e_s27  
Fecha de Ingreso: marzo-2008
Ubicación: En mi casa
Mensajes: 208
Antigüedad: 17 años, 1 mes
Puntos: 5
Re: problemas con un select

Tu lo que quieres hacer es recojer la informacion del formulario en la pagina que lo recibe? Pero no sabes cuantos selects son porque son generados dinamicamente?

Entonces haz un campo oculto donde informa la cantidad de selects que tienes:

(Permiso Shiryu_Libra )

<%next
response.write "<input type=""hidden"" name=""cuantos"" value="& NumEQuipo & "/>"
%>

Y lugo haces un bucle asi:

For i=1 to cInt(Request.Form("cuantos"))
Response.write (Request.Form("CveEquipo" & i))
Next
  #4 (permalink)  
Antiguo 10/04/2008, 16:37
Avatar de Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 2 meses
Puntos: 88
Re: problemas con un select

Cita:
Iniciado por i_e_s27 Ver Mensaje
.....

(Permiso Shiryu_Libra )

....
buena observacion
__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra
  #5 (permalink)  
Antiguo 11/04/2008, 07:25
itm
 
Fecha de Ingreso: marzo-2008
Mensajes: 19
Antigüedad: 17 años, 1 mes
Puntos: 0
Re: problemas con un select

No habia podido leer las respuestas, me quede sin internet ( el servicio de cablemas...es pesimo), pero acabo de adaptarlo usando un array para guardar lo valores luego en un a DB , y me sale el siguiente error

Tipo de error:
Objeto Request, ASP 0207 (0x80004005)
No se puede usar la colección Request.Form después de llamar a BinaryRead.
/metro/cabmuestra_p.asp, línea 74

La linea 74 es:

Dim Equipos()
Dim i, E
E = 0
For i=1 to cInt(Request.Form("cuantos"))
Redim Preserve equipos(I)
Equipos(E) = Response.write (Request.Form("CveEquipo" & i))
E = E + 1
Next

No se que sea :

gracias de antemano..........de verdad muchas gracias
  #6 (permalink)  
Antiguo 11/04/2008, 11:24
Avatar de i_e_s27  
Fecha de Ingreso: marzo-2008
Ubicación: En mi casa
Mensajes: 208
Antigüedad: 17 años, 1 mes
Puntos: 5
Re: problemas con un select

mmmmm.... "No se puede usar la colección Request.Form después de llamar a BinaryRead."

Acaso estas enviando un archivo en el form? ahi cambia la situacion...

Creo que se soluciona si pones el cInt(Request.Form("cuantos")) en una variable digamos Cantidad_de_Selects asi:

Cantidad_de_Selects = cInt(Request.Form("cuantos"))

Eso antes de llamar a BinaryRead, como te lo dice el Error...

y luego haz el For...Next:

Dim Equipos()
Dim i, E
E = 0
For i=1 to Cantidad_de_Selects
Redim Preserve equipos(I)
Equipos(E) = Response.write (Request.Form("CveEquipo" & i))
E = E + 1
Next
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 16:35.