open, read, write file binary ?

[WoF]

I forgot: To write records you need the same declaration of the record type.

  Dim Rec As MyRecordType
  Open FileName For Random As #1 Len = Len(CurRecord)
  Rec.Name = "wahwah"
  Rec.Address = "Somewhere"
  Rec.PhoneNumber = "1234"
  Put #1, , Rec
  Close #1

This would write a new record to the file. After Open, it would start writing at the first record.
Put allows you always to specify the recordnumber, so as you can overwrite any record even in the middle of a file.
And there is the Seek statement to put your current record pointer to a specific record.