FoxPro/Visual FoxPro - Ayuda con la función ADIR ............

 
Vista:

Ayuda con la función ADIR ............

Publicado por Juanma (503 intervenciones) el 18/09/2002 10:06:43
Hola amigos:
Intento rellenar una tabla con nombres de archivos y para ello tengo
el siguiente código pero no me funciona.... solo me lo hace bien la primera vez (n=1)......cuando el valor es 2 me pone la fecha del primer archivo encontrado, cuando el valor es 3 la hora .... etc.
¿Porque la función no me pone los demas archivos?

sele MiBase
for n=1 to adir(fich,'DA*.DBF')
Nbase=fich[n]
appe blan
repl Name with NBase
next

Gracias..
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda con la función ADIR ............

Publicado por Alvaro Padilla (146 intervenciones) el 18/09/2002 16:23:15
El ADIR te crea una matriz de 6 columnas...
y al hacer referencia a Array(2) te despliega el segundo elemento.. o sea... la segunda columna de la primera fila... si pones array(7) te despliega la primera columna de la segunda fila.. y asi sucesivamente.. te recominendo que lo trates como una MATRIZ Bidimensional y no como Unidimensional.. o seaseeee... para accesar a tus archivos...

For i = 1 to alen(array)
? array(i,1)
endfor

o sea..
array(1,1)
array(2,1)
array(3,1)

Saludos..
aps
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar