Ver Mensaje Individual
  #1 (permalink)  
Antiguo 27/06/2002, 22:57
Sebas22
 
Fecha de Ingreso: abril-2002
Mensajes: 34
Antigüedad: 23 años
Puntos: 0
Pequeño Gran Problema (parte 1)

Tengo el siguiente codigo generico:

Sql1 = “Select (dos subrubros principales)”
RS1 del SQL1
Do while not RS1.eof (2 repeticiones)
if (session("mostrarchksub") = 0) then
Check1 (dos checks generados dinámicamente según los subrubros, con los campos nombres = a los subrubros)
End if
i = i + 1
Elec(i) = request.form(check1)
If ((elec(i) <> “”) and (session(“enviar”) > 1)) then
Sql2 = “Select (marcas de acuerdo a los rubros elegidos)”
RS2 del SQL2
Do while not RS2.eof
If (session(“enviar”) < 2) then
Check2, name = i, value = RS2(“IdentMarcaDelSubrubro”) (varios checks generados dinámicamente según las marcas de los subrubros elegidos)
End if
RS2.Movenext
Loop
Marc1 = request.form(i) // “i” es el nombre del array Check2. Por ejemplo si hay 3 marcas del subrubro 1, y 2 marcas del subrubro 2, enconces se me generarian 5 checkboxes, 3 para un subrubro, y 2 para el otro. Los campos name y value serian asi: name=1, value = 1,2,3 y name=2, value = 1,2
If (marc1<>””) and session(“enviar”) > 1) then
SQL3 = “Select (Subrubro = i, campo marca in (“marc1”)” // con este Select, yo elijo las marcas de acuerdo a lo que está en el array marc1, que contiene las marcas elegidas en el array de checkboxes previo”
RS3 del SQL3
Do while not RS3.eof
Response.write (subrubros, y debajo cada una las marcas elegidas)
RS3.Movenext
Loop
End if
End if
RS1.Movenext
Loop
Session(“enviar”) = Session(“enviar”) + 1
session("mostrarchksub") = 1

La explicacion en Parte 2