Hi,

How do I get rid of "Input past end of the line" error?
what went wrong during opening a file?

Code goes like this:

If FileLog.ListIndex < 0 Then
MsgBox "No File Selected....", vbOKOnly, "View Log"
Exit Sub
End If
TxtView = ""
hfile = FreeFile
sfilename = TxtPath.Text
Open sfilename For Input As #hfile
TxtView = Input$(LOF(hfile), hfile)
Close #hfile


TIA.