Le vendredi, 25 avr 2003, à 14:19 Europe/Paris, Frank Bitterlich a
écrit :
do until myBinaryStream.EOF
s = s + "0x" + Right("00"+Hex(myBinaryStream.ReadByte), 2)+" "
loop
Thanks Franck. It works like a charm...
Regards.
------------------------------------------------------------------------
---
Stéphane Pinel
Information System
Equinox Partners Paris
iChat/AIM: s.pinel
------------------------------------------------------------------------
---
---
A searchable archive of this list is available at:
<http://support.realsoftware.com/listarchives/search.php>
Unsubscribe:
<mailto:realbasic-nug-off at lists dot realsoftware dot com>
Subscribe to the digest:
<mailto:realbasic-nug-digest at lists dot realsoftware dot com>
.
|