Discussion :

[subaru889]

Bonjour,
j'ai une erreur de type incompatible caract. 1 de la ligne Debug.print arrDicExclusionsExternes.
Pouvez-vous m'aider merci?

Code :

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

1
2
3
4
5
6
7
8
9
Set args  = Wscript.Arguments
WScript.Echo args.Count
 
arrDicExclusionsExternes = Array(Wscript.Arguments)
 
set oDicExclusionsExternes = CreateObject("Scripting.Dictionary") 
For Strargs=0 to UBound(arrDicExclusionsExternes)
 
Debug.print arrDicExclusionsExternes & " : " & tableau(arrDicExclusionsExternes)

[ProgElecT]

Salut subaru889

Debug.print n'est pas une commande VBScript, a la rigueur du VBA ou VB6 et antérieur.

[l_autodidacte]

Comme indiqué par ProgElecT() la ligne 9 devrait être :
MsgBox arrDicExclusionsExternes & " : " & tableau(arrDicExclusionsExternes).
Seulement cela ne passera pas car arrDicExclusionsExternes est déjà un tableau il fallait écrire MsgBox arrDicExclusionsExternes(Strargs)