Estructura de un Directorio (Carpetas) a Registros de una Base

[jorevale]

Hola amigos

Mi intención es hacer un programita que valide la estructura de un directorio contra los registros de una base Access.

Esto tiene dos aristas. La Primera:
1)Supongamos que tenemos una base con tres registros:
Juan
Pedro
José
Tenemos una carpeta C:\Movida
Y queremos que al ejecutar el programa se creen tres subcarpetas de ésta:
C:\Movida\Juan
C:\Movida\Pedro
C:\Movida\José
Eso no resulta dificil haciendo lo siguiente
- Recorriendo la base
- Pasando el registro a una variable de memoria
- Creando la carpeta desde la variable de memoria con MkDir

Pero en el procedimiento inverso (intentando llevar el nombre de las carpetas que ya existen a registros de una base)...
... me pierdo porque no sé como hacer el recorrido por la estructura del directorio desde el programa.

Si tenéis alguna sugerencia os lo agradecería.

Gracias

[jorevale]

Me respondo a mi mismo por si a alguien le interesa el tema.

Para saltar al próximo directorio se emplea la función Dir, sin argumentos.

Con ello y un ciclo, se logra recorrer la estructura de directorios.

No obstante, ello no incluye los subdirectorios, lo cual era otro problema, porque a mi me hacía falta incluirlos. La solución que encontré es la siguiente:

- La estructura de directorios - que es conocida - tiene como última carpeta una que se llama "999999 - END"

De modo que hago un ciclo que al llegar a esa carpeta, termine:

MyPath = "c:\Documents and settings\Administrador\Favoritos\" ' Set the path.

MyName = Dir(MyPath, vbDirectory) ' Retrieve the first entry.
Do While Left(MyName, 6) <> "999999" ' Start the loop.

Y luego voy cambiando MyPath por el nombre de las carpetas interiores y pasando a la base...

Nos vemos