Error on binary file read? FIXED

[JordanChris]

I have a very simple program:

Private Sub Command1_Click()
    Open "c:\temp\my.txt" For Binary Access Read As #1
    sDATA = Space$(LOF(1))
    Get #1, , sDATA
    MsgBox sDATA
End Sub

The file exists OK.
LOF(1) shows a length of 50.
But on the GET line, I receive an error of:
" Run time error 458
Variable uses an automation type not supported in Visual Basic "

Any ideas why?

[plenderj]

Just try this

Open "c:\someFile.txt" For Binary As #1
    Dim strBuff As String: strBuff = Space(Lof(1))
    Get #1, , strBuff
Close #1

strBuff would then contain the contents of the file

[JordanChris]

THANKS.

I didn't have the CLOSE, so I wonder if I had previously opened it and it didn't like doing so again?

[nemaroller]

It wasn't about Closing... You needed to declare sData explicity... as plenderj did... otherwise, the compiler uses a variable type that it thinks it should, and obviously it picked the wrong type for the job..