[VBS,WSH] Fonction qui retourne un tableau

Fonction qui retourne un tableau [VBS,WSH] - VB/VBA/VBS - Programmation

Marsh Posté le 01-11-2006 à 22:48:28    

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 :
  1. Dim arrayReturned()
  2. arrayReturned = FunctionThatReturnsAnArray()
  4. Wscript.Echo "Start of Loop"
  5. For Each x in arrayReturned
  6. Wscript.Echo "Loop: x = " & x
  7. Next
  8. Wscript.Echo "End of Loop"
  10. Function FunctionThatReturnsAnArray()
  11. Dim localArray(5)
  13. For j = 0 To 5
  14.   localArray(j) = j*10
  15.   MsgBox "FunctionThatReturnsAnArray(): Loop: j=" & j & Chr(13) & _
  16.    "FunctionThatReturnsAnArray(): Loop: localArray(j)=" & localArray(j)
  17. Next
  19. FunctionThatReturnsAnArray = localArray
  20. 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.
 
 :)

Reply

Marsh Posté le 01-11-2006 à 22:48:28   

Reply

Marsh Posté le 02-11-2006 à 19:33:57    

Bonjour,
 
Essaye d'enlever les () dans la 1ère ligne :
 

Code :
  1. Dim arrayReturned


 
wape

Reply

Marsh Posté le 17-11-2006 à 16:05:22    

Impecable :bounce:  
 
Merci :jap:

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed