Public Function IsFile(s) IsFile = CreateObject("Scripting.FileSystemObject").FileExists(s) End Function