Be careful with the code above that you used. you'll notice that it had app.path etc so the position of the file was preset (which is likely why you never found a file you knew was there).Originally posted by crptcblade
This method is returning "false" whether the file is there or not...any thoughts??
try it like this
Code:Function ReportFileStatus(filespec) Dim fso, msg Set fso = CreateObject("Scripting.FileSystemObject") If (fso.FileExists(filespec)) Then msg = filespec & " exists." Else msg = filespec & " doesn't exist." End If ReportFileStatus = msg End Function




Paul Dwyer
Reply With Quote