Bonjour,
Je n'arrive pas à faire une fonction qui me retourne un tableau.
Lorsque j'exécute l'exemple suivant j'obtiens une erreur "Type incompatible" (code 800A000D) à la ligne 2, caractère 1.
Donc il semblerait que le retour de FunctionThatReturnsAnArray() ne soit pas un tableau... 
Code :
- Dim arrayReturned()
- arrayReturned = FunctionThatReturnsAnArray()
- Wscript.Echo "Start of Loop"
- For Each x in arrayReturned
- Wscript.Echo "Loop: x = " & x
- Next
- Wscript.Echo "End of Loop"
- Function FunctionThatReturnsAnArray()
- Dim localArray(5)
- For j = 0 To 5
- localArray(j) = j*10
- MsgBox "FunctionThatReturnsAnArray(): Loop: j=" & j & Chr(13) & _
- "FunctionThatReturnsAnArray(): Loop: localArray(j)=" & localArray(j)
- Next
- FunctionThatReturnsAnArray = localArray
- End Function
|
C'est un script destiné à être exécuté sur Windows XP (fichier .vbs).
Est-ce que je me prends la tête pour rien parce que les fonctions VBS WSH ne peuvent retourner de tableau ? ou est-ce que je rate quelque chose ?
PS: Je précise que je débute (depuis quelques semaines) en VBS.
