If Len(Dir$(appPath & "Bday.txt")) > 0 Then 'returns 8 as file does exist
MsgBox FileLen(Dir$(appPath & "Bday.txt")) 'craps out on file not found.....
how do you tell if the file has no content??????
Printable View
If Len(Dir$(appPath & "Bday.txt")) > 0 Then 'returns 8 as file does exist
MsgBox FileLen(Dir$(appPath & "Bday.txt")) 'craps out on file not found.....
how do you tell if the file has no content??????
That exact same code works for me. However, FileLen returns 36, and the file is empty. ????
that's what I thought..the code is good...ok. I'll delete the stupid file and create a new one..perhaps it's a dud of a file.
thanks
Disregard that. I was hard coding the path. The problem is that Dir$ only returns the file name, not the path, remove Dir$ from the MsgBox statement.
I should be s*** on burried dug up and p***** on and then left in the sun...
stupid me...I left the Dir in the filelen statement...