Determinar se um arquivo existe no servidor

Segue o código completinho
para determinar se um arquivo qualquer já existe
no servidor. Espero que seja útil!

<%
Function FileExists(fspath, FileNameOnly)
‘fspath= caminho completo do
‘arquivo que nos queremos testar pra

‘Is FileNameOnly:
‘Booleano, false se voce passar
‘o caminho fisico + o nome do arquivo

‘true se voce passar apenas o nome do arquivo
‘e quiser retorno do caminho completo.

‘true trabalhara apenas se voce estiver verificando
pela
‘existencia de um arquivo dentro de sua aplicacao web.
‘(diretorio onde seu site esta).

sFile = fspath
if FileNameOnly = true then
sFile = request.servervariables("APPL_PHYSICAL_PATH")
& _
sFile
end if

On Error Resume
Next
FileExists = false
set fs = CreateObject("Scripting.FileSystemObject")
Err.Clear
set istream = fs.OpenTextFile(sFile)
if Err.Number = 0 then
FileExists = True
istream.Close
end if
set istream = Nothing
set fs = Nothing
End Function
%>