VBScript - Problème d'écriture dans la BDR [Résolu]

[Rammstein]

Hello,
j'aimerais écrire une série de valeurs dans la base de registre sous forme de "REG_BINARY". Ces valeurs sont en fait le code ASCII d'une chaîne de caractères.
J'utilise la procédure SetBinaryValue de la classe Windows StdRegProve qui demande un array (tableau) de valeurs décimales sur 8bits (1 octet), ce qui me semble tout à fait logique.

Si je crée mon tableau (datas) de la façon suivante : array(12,345,43,23,54), ça marche mais ce n'est pas le but. Ce que j'aimerais, c'est avoir le code ASCII d'une chaîne de caractères quelconque, et ce grâce à ma fonction StrToDec_Array().

Code d'erreur sur la dernière ligne du script : Invalid Parameter

Voilà mon code (qui ne marche pas !!!)
================================================== =======
Function StrToDec_Array(strIn)
dim i
dim strInLen

dim currentChr
dim currentAsc

' initialisation
strInLen = len(strIn)
'strInLen = CInt(strInLen)
redim tabAsc(strInLen)

' lire la chaine caractère après caractère
for i=0 to strInLen-1 step 1
' sortir le code ASCII du caractère
currentChr=mid(strIn,i+1,1)
currentAsc=asc(currentChr)

' mettre ce nombre décimal dans le tableau
tabAsc(i)=currentAsc
next

StrToDec_Array = tabAsc
End Function

' initialisation pour la base de registres
Const HKEY_CURRENT_USER = &H80000001
Const HKEY_LOCAL_MACHINE = &H80000002

Set oReg=GetObject("winmgmts:{impersonationLevel=imper sonate}!\\.\root\default:StdRegProv")
dim datas

datas = StrToDec_Array("Hello")

msgbox("Taille du tableau : "&ubound(datas))

'écriture des valeurs
oReg.SetBinaryValue HKEY_CURRENT_USER, "Yann", "Haha", datas
================================================== ======

Merci pour votre aide

[Rammstein]

Solution trouvée....
VBScript - Problem with converting string to hex

Au lieu de remplir un tableau, il faut créer une chaine de caractères avec un séparateur :
maChaine = "13,45,125,230"
Et utiliser la fonction Split() pour créer le tableau
monTableau=Split(maChaine,",")

Prochaine fois je chercherai en premier dans Google, promis....