nombre: tamaño: tipo de datos:
cantidad 2 bytes binario LSB-MSB
el problema que me surge es que al leer la cantidad de la BD (tipo de dato integer) lo debo pasar a hexa luego swapearlo y guardar esos valores ocupando solo 2 bytes
Pd: para abrir el archivo y ver como se guardaron los datos guardados uso el UEStudio (UltraEdit)
ej
Código:
Private Sub Form_Load()
Dim cantidad As Integer
Dim cantHexa As String
Dim a As String
Dim b As String
cantidad = 6871 'lo paso a hexa
cantHexa = Hex(6871) 'y da "1AD7" que es un dato de tipo string
'ahora debo guardarlo swapeado y solo ocupando 2 bytes
a = Right(cantHexa, 2) 'D7
b = Left(cantHexa, 2) '1A
Open "D:\pepe.bin" For Binary As #1
Put #1, 1, a 'D7
Put #1, 2, b '1A
Close #1
End Sub
Dim cantidad As Integer
Dim cantHexa As String
Dim a As String
Dim b As String
cantidad = 6871 'lo paso a hexa
cantHexa = Hex(6871) 'y da "1AD7" que es un dato de tipo string
'ahora debo guardarlo swapeado y solo ocupando 2 bytes
a = Right(cantHexa, 2) 'D7
b = Left(cantHexa, 2) '1A
Open "D:\pepe.bin" For Binary As #1
Put #1, 1, a 'D7
Put #1, 2, b '1A
Close #1
End Sub
El problema

Lo que yo deseo guardar es D7 (no 44 37) ocupando un solo byte y 1A (no 31 41) ocupando un solo byte o sea que cuando uso el UeStudio en modo hexa vea D7 y 1A ocupando solo 2 byte
Bueno se hizo largo por que trate de ser lo mas claro posible
Espero que se entienda

Un gran saludo