Lister les fichiers d'un rép

Bonsoir

Je pensais avoir trouvé ce que je cherchais, c'est ok ça marche sur
tous les type de fichier, mais pas sur les .zip, je suis sous xp, et
les .zip, il ne les voient même pas.

Auriez vous une piste, une réponse? une autre solution.
c'est qu'en même bizarre, sous NT ça marche avec tout?

Merci à tous.

Raja


Message n° 1 de ce fil
De :jonathan (supernet18@hotmail.com)
Objet :liste nom de fichier


View this article only
Groupes de discussion :microsoft.public.fr.access
Date :2002-05-15 13:57:15 PST


Bonjour,

Est-il possible de faire un programme qui permet de lire
chaque fichier d'un dossier et de faire une liste dans une
table. Si oui, comment. ...(JE d?esp?e)
ex:
C: contient...
a.txt
b.txt
c.htm
d.prg
.....etc

et je voudrais que mon prog inscrive les noms de ces
fichiers dans une table ex:
TABLE NOMS FICHIERS contient...
a.txt
b.txt
c.htm
d.prg
....

Merci de votre aide!
JP
Message n° 2 de ce fil
De :Jessy Sempere (jessy.sempere@prg.sncf.fr)
Objet :Re: liste nom de fichier


View this article only
Groupes de discussion :microsoft.public.fr.access
Date :2002-05-16 00:19:15 PST


Essais cette fonction, tu as justes à l'adapter un peu...
- strDir : nom du répertoire dont tu veux lister les fichiers
- strTable : nom de la table où stocker les données
- strField : Nom du champ

Function FileExistDir(strDir As String, _
strTable As String, strField As String)
'Enregistre le nom de tous les fichiers d'un répertoire dans une
table
Dim intFile As Integer, strFile As String
intFile = 0: strFile = ""
With Application.FileSearch
.LookIn = strDir: .FileName = "*.*"
If .Execute > 0 Then
For intFile = 1 To .FoundFiles.Count
strFile = .FoundFiles(intFile)
strFile = right(strFile, Len(strFile) - (Len(strDir) +
1))
CurrentDb.Execute "INSERT INTO [" & strTable & "] (["
&
strField & "])" _
& "SELECT """ & strFile & """ ;"
Next
End If
End With

End Function

@+
--------------------------------------------
Jessy Sempere
Délégation Infra INP-BI / INP-BC
Tél : 32.01.15 / 32.05.28
jessy.sempere@sncf.fr
--------------------------------------------
jonathan <supernet18@hotmail.com> a écrit dans le message :
364501c1fc52$b1c83390$2ae2c90a@hosting.microsoft.com...
Bonjour,

Est-il possible de faire un programme qui permet de lire
chaque fichier d'un dossier et de faire une liste dans une
table. Si oui, comment. ...(JE désespère)
ex:
C: contient...
a.txt
b.txt
c.htm
d.prg
.....etc

et je voudrais que mon prog inscrive les noms de ces
fichiers dans une table ex:
TABLE_NOMS_FICHIERS contient...
a.txt
b.txt
c.htm
d.prg
....

Merci de votre aide!
JP

Bonjour,

raja <raja_elm@yahoo.fr> :
| Bonsoir
|
| Je pensais avoir trouvé ce que je cherchais, c'est ok ça marche sur
| tous les type de fichier, mais pas sur les .zip, je suis sous xp, et
| les .zip, il ne les voient même pas.
|
| Auriez vous une piste, une réponse? une autre solution.
| c'est qu'en même bizarre, sous NT ça marche avec tout?
|
| Merci à tous.
|
| Raja

Essaye la méthode dispo à l'adresse suivante
http://memoaccess.free.fr/files.htm#fListFiles

et dis nous si ça résout ton problème STP