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??????