vbs - Est-il possible d'inverser se script de conversion ascii

Mal dit, mais comme tu donnes un bout de code, c'est plus facile à comprendre  
La fonction inverse de Asc, c'est Chr.

OK, merci beaucoup

On ma donné la réponse:

st = "65 66 67" 

CharASCII = Split(st, " ") 

 
'en decimal 

For i = 0 To UBound(CharASCII) 

 st2 = st2 & Chr(CharASCII(i)) 

Next 

wscript.echo st & " ==> " & st2

C'a c'est pour convertir du decimale, j'ai essayer d'adapter un code pour convertir de l'ehxdecimale:

st = "41 42 43"

 
' === Hexadecimal 

CharASCII = Split(st, " ") 

for i = 1 to Len( St) 

 st2Hdcml= st2Hdcml & Hex(Chr(CharASCII(i))) & " " 

next 

 
wscript.echo st & " ==> " & st2Hdcml

Mais ça me renvoi une erreur, saurais tu m'aier a aranger ça ?

(pourquoi avoir correctement écrit le premier post, avec la balise CODE et m'avoir fait cette horreur ensuite. Edite-moi ça le temps que je regarde ton truc)

C'est réglé

Ligne 6 (<-- Hey, utile la balise code   )
Hex attend un nombre décimal pour le transformer en texte hexa.
Tu lui donne un entier converti en texte !

Retire le Chr

J'ai esayer ceci, mais en vin:

st = "41 42 43"

 
 
 
' === Hexadecimal 

CharASCII = Split(st, " ") 

for i = 1 to Len( St) 

 st2Hdcml= st2Hdcml & Hex(CharASCII(i)) & " " 

next 

 
wscript.echo st & " ==> " & st2Hdcml

for i = 1 to Len(St)

Tu boucles sur le nombre de caractères de la chaîne. Boucle plutôt sur le nombre de case du tableau CharASCII. C'est correctement fait, ligne 5 de ton premier code.

Evidemment, si tu picoles pendant que tu codes