I'm doing random file I/O in my program.But I've been repeatedly getting the Bad record length error when trying to output records whose length is around 852 characters.What should I do?

Are you using:

Open File For Binary Access Write As?

If so, how are you using the Put statement? Like this?:

Put #1, 12, Data

If that's the case, then you're probably getting an error where the number 12 is. 12, in this example, is the number of bytes, or the "offset" to place the data. So, it would seek 12 bytes into the file, and place the data after that. However, if there are not 12 bytes in the file then you will get the "Bad Record Length" error.

here's what I'm usin:

Open fpath For Random As #ff Len = Len(rot) 'ff=freefile
Put #ff, rec, rot
Close #ff

Can you please be a bit more quick since I'm really short on time

dim RecordNumber as integer
dim trip as Keys

' (random mode example)
Open "triplog.txt" For Random As #1 Len = Len(trip)<- sometimes easy to forget which goes here
...............

---

Try:

Open File For Random As #1

Put #1, FileLen(File) + 1, Data

Close #1

didnt work

may be there is a restriction on the maximum length of a record that you could output to a file,and my records exceed that limit.Anyway,what should I do?Look into binary file access?please note that we're dealing with a database program here.

thanks

I work with random access files all of the time. Try this;

 

if adding record to end of file:

open "filename" for random as 1 len = 852

L = lof(1) / 852 + 1

put#1, L, (recordname)

close 1

 

Hope that helps

 

 

Hello World!

If that doesn't work, then you will need to increase the len higher than 852 until you no longer get that error.

 

 

Hello World!