Page 2 sur 2
Re: 010000110110111101110101011000110110111101110101
Publié : mer. 22/juin/2011 20:52
par Droopy
bien vu dobro la possibilité de Val() pour convertir du binaire
On peut aussi convertir de l'hexa
Re: 010000110110111101110101011000110110111101110101
Publié : lun. 05/sept./2011 12:40
par dayvid
Pas mal
Et pour fair l'inversse ?
Re: 010000110110111101110101011000110110111101110101
Publié : lun. 05/sept./2011 16:28
par Kwai chang caine
En cherchant un peu et en partant du code de DOBRO tu aurait pu trouver ....
Toi le roi des codes de la mort
La preuve, j'y suis arrivé, c'est pour dire, et j'y comprend jamais rien a ces bits, offset et tout le toutim
Code : Tout sélectionner
a$ = "Je sais , tu t'est fait chier à faire une moulinette pour ca...C'est assez decevant , bon , juste pour dire que j'ai 37°2 , et les urines claire...@++"
For i = 1 To Len(a$)
Titi$ + RSet(Bin(Asc(Mid(a$, i, 1))), 8, "0")
Next
Debug Titi$
a$ = Titi$
For i=1 To Len(a$) Step 8
toto$=toto$+Chr(Val("%"+Mid(a$,i,8)))
Next i
Debug toto$
Re: 010000110110111101110101011000110110111101110101
Publié : ven. 09/sept./2011 13:47
par dayvid
Cool, merci beaucoup KCC