je rencontre quelques difficultés à l'utilisation de l'objet FileSerach dans
Access.
Je veux, en effet, faire une recherche de fichiers (exemple : fichier *.mdb)
dans un répertoire précis de mon lecteur D:/ (sur les PC de mon travail nous
avons un lecteur Système C:\ et un lecteur de données D:\).
Le probmème est que si je recherche des ficheirs sur C:\ il me les trouve,
mais sur D:\ il ne me renvoie rien du tout !!!
Voici le code que j'ai créé pour lire mes fichiers :
Set fs = Application.FileSearch
With fs
.NewSearch
.LookIn = "D:\Dossier Access"
.SearchSubFolders = False
.FileName = "*.mdb"
.MatchTextExactly = True
.FileType = msoFileTypeAllFiles
If .Execute > 0 Then
Me.cboBaseClient.RowSourceType = "Liste valeurs"
For i = 1 To .FoundFiles.Count
Me.cboBaseClient.RowSource = Me.cboBaseClient.RowSource &
.FoundFiles(i) & ";"
Next i
Else
MsgBox "There were no files found."
End If
End With
Où cboBaseClient est une zone de liste déroulante de mon formulaire.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
3stone
Salut,
"JIELPE53" | Je veux, en effet, faire une recherche de fichiers (exemple : fichier *.mdb) | dans un répertoire précis de mon lecteur D:/ (sur les PC de mon travail nous | avons un lecteur Système C: et un lecteur de données D:). | | Le probmème est que si je recherche des ficheirs sur C: il me les trouve, | mais sur D: il ne me renvoie rien du tout !!!
A première vue cela semble correct pourtant...
Es-tu sûr du path "D:Dossier Access" ? Car en cas d'erreur, il cherche dans le répertoire courant, vu que tu ne vérifie pas la justesse du path par :
if Dir("i:Dossier Access",vbDirectory)<>"" then 'ton code else 'rep n'existe pas end if
"JIELPE53"
| Je veux, en effet, faire une recherche de fichiers (exemple : fichier *.mdb)
| dans un répertoire précis de mon lecteur D:/ (sur les PC de mon travail nous
| avons un lecteur Système C: et un lecteur de données D:).
|
| Le probmème est que si je recherche des ficheirs sur C: il me les trouve,
| mais sur D: il ne me renvoie rien du tout !!!
A première vue cela semble correct pourtant...
Es-tu sûr du path "D:Dossier Access" ?
Car en cas d'erreur, il cherche dans le répertoire courant, vu que tu ne vérifie
pas la justesse du path par :
if Dir("i:Dossier Access",vbDirectory)<>"" then
'ton code
else
'rep n'existe pas
end if
"JIELPE53" | Je veux, en effet, faire une recherche de fichiers (exemple : fichier *.mdb) | dans un répertoire précis de mon lecteur D:/ (sur les PC de mon travail nous | avons un lecteur Système C: et un lecteur de données D:). | | Le probmème est que si je recherche des ficheirs sur C: il me les trouve, | mais sur D: il ne me renvoie rien du tout !!!
A première vue cela semble correct pourtant...
Es-tu sûr du path "D:Dossier Access" ? Car en cas d'erreur, il cherche dans le répertoire courant, vu que tu ne vérifie pas la justesse du path par :
if Dir("i:Dossier Access",vbDirectory)<>"" then 'ton code else 'rep n'existe pas end if
