Gestion de fichier des repertoires

Marsh Posté le 22-01-2004 à 10:20:18

Bonjour,

Je cherche à parcourir des fichiers dans une arbo de repertoire.
Je parcours donc facilement tous mes repertoires à l'aide d'une boucle.
Dans cette boucle j'appel un fonction qui devra faire un traitement dans les fichiers notament recuperer que des fichiers jpg.
Le probleme se situe au moment ou pour tester je cherche à afficher le contenu de chaque repertoire.
En effet il ne m'ffiche le contenu que d'un repertoire, notament l'avant dernier.
voici le code ds 2 petites fonctions :

Code :

'****************************************************
'*Fonction permettant le parcour du sous repertoire *
'* *
'****************************************************
sub Rechrep()
dim WayFolder
WayFolder=server.MapPath("GammeSuzuki" )
'Objet systeme de Fichier
set obj_FileSysteme=server.CreateObject("Scripting.FileSystemObject" )
'Objet repertoire
set obj_Folder=obj_FileSysteme.GetFolder(WayFolder)
'Parcour de l'objet obj_Folder
For each Folder in obj_Folder.subFolders
Response.Write(Folder.Name&"<br>" )
TrieRep(Folder)
Next
end sub
'***********************************************************
'*Fonction de trier les repertoires excluant les defil_img *
'* *
'***********************************************************
function TrieRep(obj_Folder)
for each File in obj_Folder.Files
'Traitement des Files
Response.Write(File&"<br>" )
next
end function

Marsh Posté le 22-01-2004 à 10:20:18

Marsh Posté le 22-01-2004 à 10:46:53

bon j'ai trouve c'est que certain repertoire ne contienne ques des fichiers et d'autre repertoire ne contienne que d'autre repertoire..
DOnc c'est bon!!

Marsh Posté le 22-01-2004 à 10:55:43

bon j'ai trouve c'est que certain repertoire ne contienne ques des fichiers et d'autre repertoire ne contienne que d'autre repertoire..
DOnc c'est bon!!

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *