Eccola,
grazie optime:
codice:
oFile.Write Chr(AscB(MidB(FileData,nIndex,1)))
Grazie ancora.
G.