Il Totem (Admin)
Guru^2
Messaggi: 3635
Iscritto: 24/01/2006
|
BinaryReader ti consente di leggere dati scritti in binario. La funzione ReadInt32 legge un integer (anche se č probabile che in vb6 integer sia a 16 bit, quindi ReadInt16). Non esiste un metodo per leggere date purtroppo. Tuttavia i valori Date vengono salvati come interi a 64 bit, quindi puoi ottenere il dato corrispondente con Date.FromBinary.
Ad esempio cosė:
Codice sorgente - presumibilmente VB.NET |
Dim File As New IO. FileStream("file", IO. FileMode. Open) Dim Reader As New IO. BinaryReader(File) Do While Reader.BaseStream.Position < Reader.BaseStream.Length - 1 Dim I As Int32 Dim D As Date I = Reader.ReadInt32() D = Date.FromBinary(Reader.ReadInt64()) Loop Reader.Close()
|
|