C'e' qualcuno che sa aiutarmi a convertire questo pezzo di codice VB in Python?

Dim Buffer As String * 327

fileno = FreeFile
Open ".\DATAFILE" For Binary As #fileno
Get #fileno, , Buffer

VCod = Hex2(Asc(Mid(Buffer, 9, 1))) & Hex2(Asc(Mid(Buffer, 10,1))) & Left(Hex2(Asc(Mid(Buffer, 11, 1))), 1)

VCog = Trim(Mid(Buffer, 31, 30))



Function Hex2(Number)
  Hex2 = Right("00" & Hex(Number), 2)
End Function



Grazie.
_______________________________________________
Python mailing list
Python@lists.python.it
http://lists.python.it/mailman/listinfo/python

Rispondere a