Has anyone gotten a "bad file name or number" error opening a large file over network

[bluelocust]

File is about 150mb and file open code is as follows:

Dim Filenr As Integer
Dim ByteArray() As Byte

Filenr = FreeFile
Open Filename For Binary As #Filenr
ReDim ByteArray(0 To LOF(Filenr) - 1)
Get #Filenr, , ByteArray()
Close #Filenr

I get the "bad file name or number" error on the Get #Filenr, , ByteArray() line.

It only seems to happen with large files and works fine for other smaller files.

Any ideas?

[Mega_Man]

Try declaring Filenr as Long.

[bluelocust]

Tried as long and didn't have an effect.

I Wouldn't really think this would matter. I am opening one file at a time so this nuber (so far) has always been 1.