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
Partager