Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/01/2005, 07:29
nana_01
 
Fecha de Ingreso: octubre-2004
Mensajes: 101
Antigüedad: 19 años, 6 meses
Puntos: 0
Pregunta Problemas con array

hola a todos les explico mi problema

tengo dos arrays, los cuales los saco del SqlServer desde una consulta determinada, los cuales serian los siguientes

Rol actual(0) = 1007
Rol actual(1) = 15623
Rol actual(2) = 15663
Rol actual(3) = 15736
Rol actual(4) = 15749
Rol actual(5) = 15777
Rol actual(6) = 15973
Rol actual(7) = 34783
Rol actual(8) = 34819
Rol actual(9) = 34901
Rol actual(10) = 34957
Rol actual(11) = 34960

Rol anterior(0) = 1
Rol anterior(1) = 34960
Rol anterior(2) = 34957
Rol anterior(3) = 34901

despues hago varios calculos y saco los valores repetidos de los dos arrays

y me keda lo siguiente

indice(0) = 34901
indice(1) = 34957
indice(2) = 34960

lo ke tengo ke hacer es eliminar todos los elementos ke se encuentran en indice a Rol actual y Rol anterior la idea ke me keden de la siguiente manera

Rol actual(0) = 1007
Rol actual(1) = 15623
Rol actual(2) = 15663
Rol actual(3) = 15736
Rol actual(4) = 15749
Rol actual(5) = 15777
Rol actual(6) = 15973
Rol actual(7) = 34783
Rol actual(8) = 34819

Rol anterior(0) = 1

yo tengo el siguiente script
l = 0
for d = 0 to I
If (Rol_actual(d) <> Indice_1(e)) Then
Redim Preserve Result(d)
Result(l) = Rol_actual(d)
l = l + 1
End if
e = e + 1
If (e > a) Then
e = 0
End if
Next

I es la cantidad de elementos ke tiene Rol actual, esto me resulta, siempre y cuando los valores de indice tengan el mismo orden ke se encientra en rol anterior
a es la cantida de elementos ke tiene Indice
ademas tengo un J ke es la catidad de elementos de rol anterior

pero si se dan cuenta ke en rol anterior no tiene el mismo orden asi es ke este script no me resulta.........

alguien me puede ayudar a solucionar esto..............

hay ke tomar en cuenta ke los valores no siempre tiene el mismo orden correlativo..........

espero ke me haya hecho entender.............

ojala me puedan ayudar, he estado con este casho hace mas de un dia y no he podido solucionarlo y a simple vista se ve batante facil...........

de antemano muchisimas gracias