Je repost car j'ai la sensation que l'on ne m'as pas compris, et c'est extremement urgent, je ne suis pourtant pas développeur mais je doit faire d'autre preuve dans d'autre domaine et cela joue sur mon embauche final a terme du cdd... donc desolé pour le doublon

Pour fair simple:
Je souhaite pouvoir parcourir l'ensemble des dossier et sous dossier a partir d'un point donné, et à chaque palier executer une fonction que j'ai deja écrite et qui permet un traitement sur les fichier du repertoir courant.

pour bien tourné ma fonction a besoins du path a chaque palier du scan afin de pouvoir effectuer une copie en respectant cette arbo mais dans un autre dossier.

Comprendre mon désaroi passe par la non comprehension de ce que je pense:
Je n'ai pas l'expertise nécessaire afin de reussir a ecrire un script qui parcour une arbo (je suis admin reseau et non developpeur) a chque fois que je commence a ecrir quelque chose je me retrouve bloqué dans le doublonage de programme et je n'arrive pas a l'arreter .... javais pensé a passer par une fonction qui scan un repertoir donné en paramétre afin d'extraire les sous repertoir.... mais apres il faut encore que je j'execute mon script a la limite c'est fesable, mais dans ma fonction des qu'il va voir un sous repertoire il va rentrer dedans et refaire le scan .... sdans avoir traiter les fichier....

Bon en gros c'est incomprehensible, je cherche mais ne trouve pas, qui peux me renvoyer vers un tuto detailler? ou mieux me donner directement un code qui explorer une arbo a partir d'un point donné... afin bien entendu d'executer un script a chaque niveau....

S'il vous plais aidé moi, je suis vraiment perdu et je stress, et plus je stress plus je me perd...

Code "ma fonction deja ecrite" : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
option explicit
on error resume next
dim cheminsrc
dim dossier 
REM dossier est déterminé plus haut dans le script lors de la construction de la version
dossier = "vers.1.0.3966" 
cheminsrc = "C:\travail\compile\"&dossier&"\src" 
 
copyfile cheminsrc,dossier
 
function copyfile (cheminsrc,dossier) 
dim fso
dim file
dim arbodestfin
dim arbodest
dim extension
dim temp
set fso = wscript.createObject("Scripting.FileSystemObject")
	if fso.folderExists (cheminsrc) then 
		For Each file In fso.GetFolder(cheminsrc).files
			temp = file.name
			extension = right(temp,len(temp)-instr(1,temp,"."))
		if ucase(extension) ="XML" or ucase(extension) ="PROPERTIES" then
			arbodest=right(temp,len(temp)-instr(1,temp,"src"))
			arbodestfin= "c:\travail\compile\"&dossier&"\projetweb\WEB-INF\classes\"&arbodest
			file.copy arbodestfin,true
		end if
		next
	end if
end function