Check to see if a file exists
function checkExists (filepath) dim fs, result set fs = createObject("Scripting.FileSystemObject") result = fs.fileExists(filepath) set fs=nothing checkExists = result end function