Your recordsize doesn't match because you don't set te value for number.
As number is used in VBA I asume it's a reserved word, which woold lead to hard to trace errors. I recomend to change it to for example BookingNr.
Why did you set a max lenght for the filename of 14, it took me some time to see this one as I don't have a N: drive.
You use the same filename everywhere why not set it once as a constant in the module it's easier to maintain.
You don't use the option explicit, it may seem easier to not declare all variables but makes it harder to trace bugs as the type of the variables is not always what you expect.