Bonjour je souhaite réaliser une action en vbs suivant un for each:

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
 
Dim Wshell
Dim OFSo
Dim Client
Dim Name
Dim RepClients
 
Set Wshell = Createobject("Wscript.Shell")
Set OFSo = CreateObject("Scripting.FileSystemObject")
 
RepClients = "D:\test"
Client = "toto tata titi"
 
'On execute un batch sur la liste de clients définie dans (Client)
 If oFSO.FolderExists(RepClients) Then
  For each Name in Client
  MsgBox Name
  Next
 End If
Mais ça ne fonctionne pas.
Pouvez vous m'aider à corriger la syntaxe svp ?
Merci