Insertar elementos de una variable, en distintos campos de una tabla (mas....)

[Berletzis]

Habre algun GEnio en ASP por ahi ke me eche la mano




Tengo una variable de la siguiente manera

Campo_CEROS = 000 0


y tengo una tabla de la siguiente manera


Campo1 Campo2 Campo3 Campo4 Campo5


Lo ke deseo es insertar cada Cero en un campo de mi tabla esto es para ke kede asi


Campo1 Campo2 Campo3 Campo4 Campo5
0 0 0 0



Alguna idua por ahi, o algun codigo ke me faciliten..

GRACIAS

[Bravenap]

Prueba con esto:

Código:

<%
For i=1 to Len(Campo_CEROS)
RS("campo" & i) = Mid(Campo_CEROS,i,1)
Next
%>

donde Campo_CEROS sería la variable que contiene la cadena de ceros, entiendo que en forma de texto y RS el objeto Recordset de la conexión a la base de datos que hallas hecho previamente.

Un saludo.

[Berletzis]

Haber haber no entendi, no me habia dado cuenta y me ekivoke en el post....
en donde escribi

Lo ke deseo es insertar cada Cero en un campo de mi tabla esto es para ke kede asi
-----Me referia a esto....----------

Campo_CEROS = 000 0

Campo1 Campo2 Campo3 Campo4 Campo5
0 0 0 0

Deseo insertar en mis campos de mi tabla cada cero.....

Supongo ke ha de levar algun query o algo por el estilo nop?????????

[Bravenap]

Bien ¿y donde está el problema?

El código que te he puesto vale. Lo que no sé es si te estás refieriendo a que no sabes cómo hacer la conexión con la base de datos.

De todas formas has vuelto a poner el mismo texto y no se ve muy claro la estructura de la tabla, aunque se sobreentiende (creo). Vamos a ver si lo he entendido.

Tienes una variable que se llama Campo_CEROS a la que le asignas un valor. Según lo que has puesto este valor es "000 0", con un espacio después del tercer cero. El espacio está en los dos mensajes, así que no sé si ha de estar o es simplemente un error al escribir.

Suponiendo que no haya espacio, son cuatro caracteres y quieres meter cada uno de ellos en un campo ¿no? Pero hay 5 campos, por tanto cabría pensar que el espacio, si existiera, iría en el campo 4.

La tabla quedaría así:

|_Campo1_|_Campo2_|_Campo3_|_Campo4_|_Campo5_|
|___ 0 ___|___ 0 ____|___ 0 ___|________|___ 0 ____|

Y si no hay espacio en la cadena de ceros, recuerda que ha de ser una cadena de texto (Campo_CEROS="0000"), así:

|_Campo1_|_Campo2_|_Campo3_|_Campo4_|_Campo5_|
|___ 0 ___|___ 0 ____|___ 0 ___|___ 0 ___|_________|

Explica un poco mejor qué es lo que quieres.

[Berletzis]

exactamente, tal como lo dices esta mas ke mejor explicado..... el espacio existe..!!!

y lo ke deseo es hacerlo, pero mi duda es a ke hora los inserto...
me lo podrias explciar mejor para aprender...... lo del mid y eso si lo entiendo pero no se en donde se va a hacer el INSERT INTO...

[Bravenap]

Iniciado por Berletzis

....pero mi duda es a ke hora los inserto...
...INSERT INTO...

¿A qué hora?¿INSERT INTO?
El espacio existe, por lo que es una cadena de texto, por lo que debe ir "ENTRECOMILLADO".

Tienes hecha tu conexión a la base de datos con un Recordset al que has llamado RS. Te posicionas sobre el registro en el que quieres meter los datos o bien creas un nuevo:

Código:

<%
RS.AddNew
For i=1 to Len(Campo_CEROS)
RS("campo" & i) = Mid(Campo_CEROS,i,1)
Next
RS.Update
%>

No sé qué es lo que no te funciona.

Yo te lo explicaría gustosamente pero, sinceramente, no me entero de nada. Como se suele decir, las cosas claras y el chocolate espeso. Así que, ¡hala!, o eres algo más explícito o me temo que nos vamos a quedar en blanco.

[Myakire]

Me imagino, estimado Bravenap, que Berletzis no esta familiarizado con los metodos del objeto recordset y por ello no espera que le dieras una solucion en AddNew y Update.
Tal vez el esperaba algo como:
Cadena = "000 0"
Dim vector(5) 'por decir algo, la verdad se puede definir con 1 y con redim crecerlo
for i=1 to Len(Cadena)
Vector (i) = Mid(Cadena,i,1)
Next
sql = "insert into tabla (campo1, campo2, campo3, campo5) values ("&vector(1)&","&vector(2)&","&vector(3)&","&vecto r(4)&","&vector(5)&")"

Saludos

[Berletzis]

a miralo deja estudiar la segunda opcion Miakire...

thx..... regreso en un rato.. bye

[Bravenap]

Pues va a ser eso Myakire, veamos si sirve.

De todas formas, Berletzis, has de reconocer que la expresión escrita no es tu fuerte ¿eh?

Un saludo a los dos.

[Berletzis]

En realidad si le entiendo, solo ke estoy algo presionado tengo ke desarrollar un algoritmo de migracion de datos, lo tengo ke hacer en ASP, el pex eske tengo ke ocupar varias estructuras y ciclos, el PEX eske tengo ke manejar arreglos y a su vez combinarlos con arreglo que probiene de una base de datos, la verdad NO TENGO NI LA MAS MINIMA IDA E COMO HACER ESO. Y LO PEOR ES PARA DENTRO DE DOS DIAS.....

LES GUSTARIA ECHARME LA MANO,yo digo ke no ha de estar dificil. PERO A MI NO SE ME OCURRE COMO.

Solo diganme si, para publicar un aexplicaion a detalle.............. de igual manera la publico en este tema por la noche.....

Para ke le den una leida y haber ke pasa OK.. GRACIAS chicos GENIOS

[Bravenap]

Bueno, tranquilo que las cosas con calma salen mejor.

Lo que tienes que decirnos es si te vale cualquiera de las dos soluciones que te hemos dado o, por el contrario, hay que seguir dándole vueltas.

[Myakire]

Como que siento que te has dejado impresionar por alguien. Para empezar, un algoritmo de migración de datos, aunque se oiga impresionante, no es mas que una rutina para cambiar datos de una BD a otra. Que tienes que ocupar estructuras y ciclos, pues si quieres. Y el que tienes que combinarlos con arreglos que estan en la BD's, pues ...no creo, ya que desde mi adorado COBOL no se guardan arreglos como los conocemos en las tablas.
Aterriza lo que necesitas claramente y postealo, el bueno de Bravenap, un servidor y muchos de los integrantes del foro con gusto te echaremos la mano.

Por cierto, trata de, como menciono Bravenap, ser muy claro en como redactas el post, ya que si entendemos a la primera es la ràpido de contestarte.

Saludos