IsThere1

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

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(&#34;e:\directory\folder\file.html&#34;, &#34;&#34;)<br/>IsThere1(&#34;&#34;, &#34;../File.html&#34;)<br/>

Views 776 Downloads 229

'FSO', 'IsThere1_Folder', 'File', 'Folder', 'Path', 'IsThere', 'IsThere1', 'Find', 'Search', 'MapPath', 'Server'

ANmarAmdeen
326
File System Classic ASP
Revisions

v3.0