Pardon erreur dans la lecture des Print()...
Sous VB j'ai :
somme_trame=1687329312
checksum_trans=2607637984
Et sous PY :
somme_trame=19
checksum_trans=4294967277
En sachant que le Modulo sous VB est calculé suivant :
Code : Tout sélectionner
'VB Script
Function Modulo(a, b)
Modulo = a - (b * Int((a / b)))
End Function
Pour ensuite afficher le code HEX dans une cellule Excel, j'effectue une nouvelle inversion MSB LSB :
Code : Tout sélectionner
checksum_inv = Hex(Modulo(checksum_trans, 16 ^ 2)) & " " & Hex(Modulo(Int(checksum_trans / (16 ^ 2)), 16 ^ 2)) & " " & Hex(Modulo(Int(checksum_trans / (16 ^ 4)), 16 ^ 2)) & " " & Hex(Modulo(Int(checksum_trans / (16 ^ 6)), 16 ^ 2))
Le Problème étant déjà de retrouver le même résultat de somme_trame sous VB et sous PY