Guardar Datos Múltiples

Usa split...

Dim srrStr
arrStr = Split(ElRequest,",")

for i=0 to Ubound(arrStr)
' insertas el valor
next

Sashka
MS MVP Access

"ArFaXaDuS" escribió en el mensaje
news:eEPhX%
> no me sirvió gracias por tu ayuda... el problema es que los valores

> hacer un request son "Valor 2, Valor 3, Valor 5" separados por comas en
una
> sola línea, eso sería un solo registro copiado 3 veces con un "for

>
> sigo a esperas de ayuda...
>
> gracias.
>
>
> "Matias Iacono" escribió en el mensaje
> news:
> > Deberias hacer un bucle por los valores... ya que lo que te envia es

> > coleccion del mismo objeto.
> >
> > Por ejemplo, si tu combo se llama MiCombo:
> >
> > set dbc = server.createobject("adodb.connection")
> > dbc.open CADENADECONEXION
> >
> > for each elemento in request.form("MiCombo")
> > sql = "insert into tblCombo(Campo) values('" & elemento & "')"
> > dbc.execute sql
> > next
> >
> > Esto teniendo en cuenta que el campo es de tipo texto y demas, es solo
un
> > ejemplo, pero la idea es esa...
> >
> > Saludos
> >
> > "ArFaXaDuS" wrote in message
> > news:
> > > Es posible que alguien comparta el código para poder enviar a una
tabla
> > > todos los registros seleccionados en un listbox "multiple"..., es
decir,
> > si
> > > tengo selecionado (*)
> > >
> > > | Valor 1 |
> > > * | Valor 2 |
> > > * | Valor 3 |
> > > | Valor 4 |
> > > * | Valor 5 |
> > >
> > > que al presionar "guardar" me grabe en la tabla esos tres valores,
como
> > tres
> > > registros.
> > >
> > > gracias.
> > >
> > >
> >
> >
>
>

Sashka, me has entendido... gracias por tu código, ahora sí.


"Sashka" escribió en el mensaje
news:
> Usa split...
>
> Dim srrStr
> arrStr = Split(ElRequest,",")
>
> for i=0 to Ubound(arrStr)
> ' insertas el valor
> next
>
> Sashka
> MS MVP Access
>
> "ArFaXaDuS" escribió en el mensaje
> news:eEPhX%
> > no me sirvió gracias por tu ayuda... el problema es que los

al
> > hacer un request son "Valor 2, Valor 3, Valor 5" separados por comas

> una
> > sola línea, eso sería un solo registro copiado 3 veces con un "for
each".
> >
> > sigo a esperas de ayuda...
> >
> > gracias.
> >
> >
> > "Matias Iacono" escribió en el mensaje
> > news:
> > > Deberias hacer un bucle por los valores... ya que lo que te envia es
una
> > > coleccion del mismo objeto.
> > >
> > > Por ejemplo, si tu combo se llama MiCombo:
> > >
> > > set dbc = server.createobject("adodb.connection")
> > > dbc.open CADENADECONEXION
> > >
> > > for each elemento in request.form("MiCombo")
> > > sql = "insert into tblCombo(Campo) values('" & elemento & "')"
> > > dbc.execute sql
> > > next
> > >
> > > Esto teniendo en cuenta que el campo es de tipo texto y demas, es

> un
> > > ejemplo, pero la idea es esa...
> > >
> > > Saludos
> > >
> > > "ArFaXaDuS" wrote in message
> > > news:
> > > > Es posible que alguien comparta el código para poder enviar a una
> tabla
> > > > todos los registros seleccionados en un listbox "multiple"..., es
> decir,
> > > si
> > > > tengo selecionado (*)
> > > >
> > > > | Valor 1 |
> > > > * | Valor 2 |
> > > > * | Valor 3 |
> > > > | Valor 4 |
> > > > * | Valor 5 |
> > > >
> > > > que al presionar "guardar" me grabe en la tabla esos tres valores,
> como
> > > tres
> > > > registros.
> > > >
> > > > gracias.
> > > >
> > > >
> > >
> > >
> >
> >
>
>

perdon ... pero no veo la diferencia entre lo que yo te mande...

Al mandar los valores separados por comas, eso se transforma en una
coleccion, y tranquilamente podias recorrerlo con el For Each...

"ArFaXaDuS" wrote in message
news:%23vII%
> Sashka, me has entendido... gracias por tu código, ahora sí.
>
>
> "Sashka" escribió en el mensaje
> news:
> > Usa split...
> >
> > Dim srrStr
> > arrStr = Split(ElRequest,",")
> >
> > for i=0 to Ubound(arrStr)
> > ' insertas el valor
> > next
> >
> > Sashka
> > MS MVP Access
> >
> > "ArFaXaDuS" escribió en el mensaje
> > news:eEPhX%
> > > no me sirvió gracias por tu ayuda... el problema es que los
valores
> al
> > > hacer un request son "Valor 2, Valor 3, Valor 5" separados por comas
en
> > una
> > > sola línea, eso sería un solo registro copiado 3 veces con un "for
> each".
> > >
> > > sigo a esperas de ayuda...
> > >
> > > gracias.
> > >
> > >
> > > "Matias Iacono" escribió en el mensaje
> > > news:
> > > > Deberias hacer un bucle por los valores... ya que lo que te envia

> una
> > > > coleccion del mismo objeto.
> > > >
> > > > Por ejemplo, si tu combo se llama MiCombo:
> > > >
> > > > set dbc = server.createobject("adodb.connection")
> > > > dbc.open CADENADECONEXION
> > > >
> > > > for each elemento in request.form("MiCombo")
> > > > sql = "insert into tblCombo(Campo) values('" & elemento & "')"
> > > > dbc.execute sql
> > > > next
> > > >
> > > > Esto teniendo en cuenta que el campo es de tipo texto y demas, es
solo
> > un
> > > > ejemplo, pero la idea es esa...
> > > >
> > > > Saludos
> > > >
> > > > "ArFaXaDuS" wrote in message
> > > > news:
> > > > > Es posible que alguien comparta el código para poder enviar a

> > tabla
> > > > > todos los registros seleccionados en un listbox "multiple"...,

> > decir,
> > > > si
> > > > > tengo selecionado (*)
> > > > >
> > > > > | Valor 1 |
> > > > > * | Valor 2 |
> > > > > * | Valor 3 |
> > > > > | Valor 4 |
> > > > > * | Valor 5 |
> > > > >
> > > > > que al presionar "guardar" me grabe en la tabla esos tres

> > como
> > > > tres
> > > > > registros.
> > > > >
> > > > > gracias.
> > > > >
> > > > >
> > > >
> > > >
> > >
> > >
> >
> >
>
>