<% Dim objFSO Set objFSO = Server.CreateObject("Scripting.FileSystemObject") If objFSO.FileExists("d:\testfile.txt") Then Response.Write "File exists" Else Response.Write "File does not exist" End If Set objFSO = Nothing %>