Access, crear consulta con campo que devuelva el nº de archs de una carpeta por reg

[fagoncis]

Hola a todos:

Necesito crear una consulta de selección en Access (2003 y 2007) con un campo calculado que me devuelva el número de archivos que hay en una carpeta cuya ruta viene dada en cada registro.

Tengo una tabla con una serie de campos, uno de los cuales es 'RutaDocs'. Lo que quiero hacer es una consulta de selección que me diga los archivos que tengo de cada persona. He intentado la función Dir() pero me dice que no está definida en la expresión, o algo así.

Estoy un poco limitado en esto de las funciones en Access. Agradeceria una solución o una alternativa.

Gracias

[Taribo007]

Mira esta funcion:

' ( @ @ )
'-----------------------------oOOo-(_)-oOOo--------------------------
'| |
'| CREADO POR: Andrés González García (Taribo) |
'| UTILIDAD: Numero de archivos de una carpeta con posibilidad |
'| de pasar un filtro y una extension |
'| FECHA: 29 de abril de 2008 |
'| AGRADECIMIENTOS:Foro de Access y VBA |
'| OBSERVACIONES: http://www.mvp-access.com/foro/ |
'---------------------------------------Oooo.------------------------
' .oooO ( )
' ( ) ) /
' \ ( (_/
' \_)
Public Function NumArchivosEncarpeta(Ruta As String, Optional Filtro As String, Optional Extension As String) As Integer
Dim Contador As Integer

If Dir(Ruta & "\*" & Filtro & "*" & "." & Extension) <> "" Then
Contador = 1
While Dir <> ""
Contador = Contador + 1
Wend
Else
Contador = 0
End If
NumArchivosEncarpeta = Contador
End Function

Un saludo

[fagoncis]

Muchas gracias, esto es lo que necesitaba.