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

select from where

Estas en el tema de select from where en el foro de ASP Clásico en Foros del Web. Hola ¡¡¡ Tengo un select múltiple en el cual quiero recoger los valores que se pulsan del siguiente modo: Si el usuario pulsa dos registros, ...
  #1 (permalink)  
Antiguo 18/04/2008, 00:42
 
Fecha de Ingreso: marzo-2008
Mensajes: 42
Antigüedad: 17 años, 1 mes
Puntos: 0
select from where

Hola ¡¡¡

Tengo un select múltiple en el cual quiero recoger los valores que se pulsan del siguiente modo:

Si el usuario pulsa dos registros, quiero que se introduzca en mi tabla dos registros haciendo referencia a esos dos por una tabla de relación.
En el código que pongo más abajo con la línea comentada he conseguido que si por ejemplo el usuario pulsaba tres registros, se introdujera en mi tabla tres registros con el campo IDorig con valor 2.
Pero yo lo que quiero es que el valor de IDorig lo coja del campo id de una tabla llamada CATEGORIA donde el campo nombre de la tabla CATEGORIA sea el que el usuario ha seleccionado en el Select.

Por ejemplo:
El usuario selecciona en el select por ejemplo el equipo Valencia y Barcelona. Tendría que buscar en la tabla CATEGORIA los id's de Valencia y Barcelona, supongamos que son 10, 15.
Me introduciría dos registros en TABLANUEVA, uno con el campo IDorig 10 y otro con el campo IDorig 15.


Código:
<% Sub muestraArray(datos)
For i = LBound(datos) To UBound(datos) Step 1

'conexion.Execute ( "INSERT INTO TABLANUEVA (IDorig) VALUES ('2')" )

conexion.Execute ( "INSERT INTO TABLANUEVA (IDorig) SELECT id FROM CATEGORIAS where (nombre="&request.form("datos(i)")&")" )


Next
End Sub

equipo=request.form("equipo")

Dim equipos(), I 
I = 0 
For Each Valor In Request.Form("equipo") 
    Redim Preserve equipos(I) 
    equipos(I) = Valor 
    I = I + 1 
Next 

muestraArray(equipos)
%>

Un saludo ¡ ¡ ¡ ¡ ¡
  #2 (permalink)  
Antiguo 18/04/2008, 05:47
 
Fecha de Ingreso: marzo-2008
Mensajes: 42
Antigüedad: 17 años, 1 mes
Puntos: 0
Re: select from where

Bien al final lo he hecho de la siguiente manera:

set rs = oConn.execute("select MAX(ID) from agenda")

tipo="0"
For Each Valor In Request.Form("seleccion")
oConn.Execute ("INSERT INTO TABLANUEVA (IDorig, IDcat, Tipo) VALUES ('"&rs(0)&"', '"&valor&"', '"&tipo&"')")
Next

En el select seleccion se carga la lista de productos con sus respectivas id's, por lo que aquí solo queda recorrerlo con el For Each.
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 11:04.