Discussion :

[MarieKisSlaJoue]

Bonjour, je suis en VbScript, et je veut lister tous les fichiers qui finissent par ISO

pour l'instant j'ai écrit ça

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
 Sub iniMenuIso
		Dim regEx , occurrences
		Dim fso, fichier, fileItem
		Dim i, imax, z, valeur, cible, liste
		Dim client
 
		Set fso = CreateObject("Scripting.FileSystemObject")
		Set regEx = New RegExp
 
		 regEx.Pattern = "*\.[iso]$"
 
 
		'début de l'énumération
		For Each client in getListeClient()
			For Each fichier In fso.GetFolder(path & "\" & client & "\").Files
				if regEx.Test(fichier.name ) then
					msgbox fichier.name
				End If
			Next
		Next
 
 
   End Sub

Mais j'ai une erreur sur cette ligne if regEx.Test(fichier.name ) then
Qui me dit Quantificateur inattendu. Je ne comprend pas pourquoi et je ne maitrise pas bien les regexs.

Connaissez vous sinon un autre moyen de parvenir à ce résultat

[tsuji]

[0] Le * pose le problème: c'est un qualificateur qui ne qualifie rien.

regEx.Pattern = "*\.[iso]$"

[1] Et puis, "[iso]" signifie un charset. L'expression va matcher positive toutes particules "i" ou "s" ou "o" une fois c'est tout. Ce n'est bien entendu pas ce qu'on cherche à faire. Mettez simplement "iso" avec la note [2].

[2] Et puis, le match va être sensitive au cas par défaut. Pour les fichiers en windows, il va souvent trop strict, n'est-ce pas?

Donc, en somme, le script devrait s'écrire comme ça.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
regEx.Pattern = "\.iso$"
regEx.IgnoreCase=true

Voilà.

[MarieKisSlaJoue]

OK, je te remercie de tes explication.

[hackoofr]

Pour tester la validité de vos RegExp ===> http://regexpal.com/