Discussion :

[Celestus]

Voilà mon problème.
J'ai cherche sur le tuto mais pas trouvé comment faire...

J'ai besoin de manipuler un fichier octets par octets.

Je dispose d'un fichier .txt contenant une colonne de paires d'octets.
Ca se présente comme ça.

05CC
05D5
05E2
05F9
0606
060C
061C
etc. (Yen a beaucoup beaucoup beaucoup)

J'ai besoin d'inverser les octets 2 à 2
pour que ça donne ça
CC05
D505
E205
F905
0605
0C06
1C06
etc.

Je peux spliter les chaines en vbs et le mettre dans un tableau pour inverser les lots, mais je ne sais pas comment sélectionner les caractères.

Quelqu'un saurait-il trouver une astuce ?

[Celestus]

En fait je me prends la tête pour rien.

Il suffit d'écrire le txt, de faire un left pour choper les 2 premiers caractères, puis un right pour les 2 derniers, d'inverser le tout et d'écrire tout dans un txt

Quelqu'un aurait un code à me filer parce que après ma nuit j'ai le cerveau cramé...

[Celestus]

C'est fait. J'ai utilisé WinHex pour modifier mon fichier pour que ça ressemble à ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Set WshShell = WScript.CreateObject("WScript.Shell")
fichier=WshShell.currentdirectory & "\" & "fichier.txt"
Set objet_systeme_de_fichier = CreateObject("Scripting.FileSystemObject")
Set objet_fichier = objet_systeme_de_fichier.OpenTextFile(fichier,8,true)
 
variable="05CC":droite=right(variable,2):gauche=left(variable,2):objet_fichier.writeline droite&gauche
variable="05D5":droite=right(variable,2):gauche=left(variable,2):objet_fichier.writeline droite&gauche
variable="05E2":droite=right(variable,2):gauche=left(variable,2):objet_fichier.writeline droite&gauche
variable="05F9":droite=right(variable,2):gauche=left(variable,2):objet_fichier.writeline droite&gauche
variable="0606":droite=right(variable,2):gauche=left(variable,2):objet_fichier.writeline droite&gauche
variable="060C":droite=right(variable,2):gauche=left(variable,2):objet_fichier.writeline droite&gauche
variable="061C":droite=right(variable,2):gauche=left(variable,2):objet_fichier.writeline droite&gauche
variable="062E":droite=right(variable,2):gauche=left(variable,2):objet_fichier.writeline droite&gauche

Merci de votre aide à tous, je vais me coucher, je suis mort.