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

Tratamiento Array

Estas en el tema de Tratamiento Array en el foro de ASP Clásico en Foros del Web. Hola a todos: Espero explicar bien lo que quiero, pq es un poco enrevesado. Tengo un array de strings, y quiero añadir una cadena más, ...
  #1 (permalink)  
Antiguo 08/06/2003, 14:15
Avatar de fjmasero  
Fecha de Ingreso: diciembre-2002
Mensajes: 488
Antigüedad: 21 años, 6 meses
Puntos: 1
Tratamiento Array

Hola a todos:

Espero explicar bien lo que quiero, pq es un poco enrevesado.

Tengo un array de strings, y quiero añadir una cadena más, pero con la particularidad de que esta nueva tiene que la primera de todas.

El problema que estoy encontrando es que cuando hago

redim miarray(ubound(miarray)+1)

me dice que el subindice esta fuera de rango, y el nuevo elemento no se puede añadir por la fuerza (como por ejemplo en javascript si).

¿Se os ocurre que puedo hacer, usando solo un array (pq si uso un segundo, lo resuelvo metiendo el nuevo elemento + los contenidos del primero, y ya esta, pero ...)?.

Salu2 y gracias.
__________________
No es sabio el que sabe sino el que no sabe y quiere aprender
  #2 (permalink)  
Antiguo 08/06/2003, 19:02
 
Fecha de Ingreso: junio-2003
Ubicación: Bilbao
Mensajes: 90
Antigüedad: 21 años
Puntos: 1
Intenta resolverlo de la manera
redim tuarray(ubound(tuarray,1)+1)
porque la orden Ubound también tiene parámetros, y
creo recordar (ahora no estoy muy seguro)
que si no especificas ninguna opción pasaba algo rarillo
No puedo contestarte concretamente ahora pero prueba eso
y sino mira las opciones que tiene ubound en cualquier manualcillo
o faq de vbscript.
Un saludo
__________________
Code
  #3 (permalink)  
Antiguo 09/06/2003, 05:58
Avatar de Aston  
Fecha de Ingreso: mayo-2001
Ubicación: Madrid
Mensajes: 933
Antigüedad: 23 años, 1 mes
Puntos: 0
Otra manera de hacerlo muy sencilla es usando Join() y Split()

Un ejemplo:

Dim aArray, cArray

aArray = Array("hola", "amigos", "como", "estan", "ustedes")
cArray = Join(aArray, "|") 'Devuelve "hola|amigos|como|estan|ustedes"

Ahora podrías añadir el siguiente valor al inicio, por ejemplo:

cArray = "Bienvenidos" & "|" & cArray

... y volverlo a convertir en un array con Split():

aArray = Split(cArray, "|")

Esto te devolvería:

aArray(0) = "Bienvenidos"
aArray(1) = "hola"
aArray(2) = "amigos"
aArray(3) = "como"
aArray(4) = "estan"
aArray(5) = "ustedes"

Bueno, es una manera de hacerlo. Espero te pueda servir de algo. Un saludo.
  #4 (permalink)  
Antiguo 09/06/2003, 06:12
Avatar de fjmasero  
Fecha de Ingreso: diciembre-2002
Mensajes: 488
Antigüedad: 21 años, 6 meses
Puntos: 1
Gracias Code y Aston por responderme.

Code, investigare lo de los parametros de ubound, pero ¿donde?. En los tutoriales que conozco no dicen nada.

La solucion que Aston propone me gusta. ¿Podría hacerse lo mismo con un array de 2 dimensiones, siendo la primera los strings, y la segunda, otros strings, asociados unica y exclusivamente a los primeros?.

Salu2.
__________________
No es sabio el que sabe sino el que no sabe y quiere aprender
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 21:25.