IsThere1

Finds out if a file exists, can pass either mapped file path, or unmapped

CodeFunctionName

What is this?

Public

Tested

Original Work

Function IsThere1(FilePath_MapPathed, FilePath_UnMapPathed)
IsThere1 = False
Rett = False
FilePath = ""
If FilePath_MapPathed > "" And FilePath_UnMapPathed = "" Then
FilePath = FilePath_MapPathed
ElseIf FilePath_MapPathed = "" And FilePath_UnMapPathed > "" Then
FilePath = Server.MapPath(FilePath_UnMapPathed)
End If
IF FilePath = "" Then Exit Function
If IsThere1_Folder(FilePath) Then
Rett = fso.FileExists(FilePath)
End If
IsThere1 = Rett
End Function

FilePath_MapPathed, FilePath_UnMapPathed
One of them, not both

IsThere1("e:\directory\folder\file.html", "")
IsThere1("", "../File.html")