lire 4 bytes dans un fichier binaireRésolu

Question

bonjour a tous,

j'ai un fichier binaire ou il y a a l'adresse 0x000E  4 bytes qui donne un entier normalement
(voir image)

moi je lit le fichier comme ça pour les données d'un byte (numero 8 , 9 et A sur l'image)
Dim Tampon As Byte
dim pos as integer
pos=1 ' par exemple 
Open CommonDialog1.FileName For Binary As #1
Get #1, Pos, Tampon

mais je n'arrive pas a avoir la ligne video length, avez vous une idée ?

voir fichier ci dessous :

cs_Jack · Accepted Answer

Salut
Non, en VB6, 4 bytes = Long
Integer sous .Net = Long sous VB6

La structure de ton type serait :
Private Type typeMonFichier
   mTotalSize   As Long
   mYear        As Byte
   mMonth       As Byte
   mDay         As Byte
   mHour        As Byte
   mMinute      As Byte
   mVideoLength As Long
   mAspectRatio As Byte
   mQuality1    As Byte
   mQuality2    As Byte
End Type

et quand tu veux lire cet entête :
   Dim monEntête As typeMonFichier
   ...
   Get #x, 2, monEntête
   ...

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

cs_ravachol · Answer

merci beaucoup je n'ai pas penser a definir un type

super cool, merci je test ça de suite !

Lire 4 bytes dans un fichier binaire

2 réponses

Votre réponse