¿Qué API o función de Access 97 debería utilizar para recorrer,
 recursivamente, todos los ficheros y subcarpetas que existan apartir
 de una ruta (carpeta o unidad) seleccionada?

 Pretendo recuperar esa información para crear una entrada en una tabla
 por cada fichero, almecenando el nombre del fichero y la ruta en la
 que se encuentra ubicado.


JUAN M AFAN DE RIBERA
=====================

supongo que habrá diversas maneras de hacer eso. Una de ellas y la más
sencilla es utilizando la propiedad FileSearch del objeto Application. Por
ejemplo, esta rutina escribe en la ventana inmediato el nombre de todos los
archivos que se encuentren a partir de la ruta que se pasa como argumento,
incluyendo todas las subcarpetas.

Sub extraerArchivos(ruta As String)
Dim i As Long

   With Application.FileSearch
      .NewSearch
      .LookIn = ruta
      .SearchSubFolders = True

      If .Execute > 0 Then
         For i = 1 To .FoundFiles.Count
            Debug.Print .FoundFiles(i)
         Next
      End If
   End With

End Sub

también puedes echar mano de la función Dir de VBA o de las APIs
FindFirstFile y FindNextFile (aunque la cosa se complicará más
naturalmente).


    Source: geocities.com/es/ensolva/Descargas/Documentos

               ( geocities.com/es/ensolva/Descargas)                   ( geocities.com/es/ensolva)                   ( geocities.com/es)