Bonjour tous le monde,
Voilà je suis actuellement un bachelier en informatique. Nous avons un Labo a fournir pour le cours de scripting windows, et j'ai quelques soucis avec Kix.
J'ai chercher mais malheureusement je ne trouve pas mon erreur.

Si vous voulez mon script ma lire dans un fichier une list d'extension. Il doit ensuite parcourir le disque principale pour lister les fichier de cette exetension avec leur chemin absolu dans un fichier.

Je sais charger la liste des extension à rechercher, mais lorsque j'essaie de rechercher les fichiers sur le disque cela ne fonctionne pas.

J'utilise la commande shell "" pour rechercher mais on dirait qu'il saute au-dessus de cette instruction.
Ci vous pouvez eclairer ma l'anterne... Je n'ai plus de pétrole

Code : 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
$F_Handle = freeFileHandle()
$NB_Ext = 0

cls ;Netttoyage de l'ecran
cd \
MD Backup
;
;Chargement des extensions
;
? " Chargement des extensions à copier..."
if open($F_Handle,"c:\Kix/Ext.list") = 0
	$LineExt = ReadLine($F_Handle)
	while @error = 0 ; Tant que l'on n'est pas à la fin du fichier...
		shell "dir /b /s *.LineExt >> c:\Backup/tempo.txt"; Je liste les fichier trouver dans un fichier temporaire
		? " Extension : .$LineExt" ; J'affiche l'extension chargée
		$NB_Ext = $NB_Ext + 1
		$LineExt = ReadLine($F_Handle) ; Lecture des ligne suivantes
	loop
	if Close($F_Handle) <> 0; Je test la fermeture du fichier
		? " Erreur lors de la fermeture du fichier Ext.list"
	endif
else
	? "Erreur à l'ouverture du fichier Ext.list"
endif
? " Chargement des $NB_Ext extensions terminée..."