Kolla om fil finns :l

<%
' Detta exempel skall demonstrera hur vi bygger subrutin som
' kontrollerar om en namngiven fil finns. Om filen finns får
' vi True tillbaka i variabeln check, annars blir värdet False.
Option Explicit
Dim fs
dim fil, file, filenamne, check
sub checkfile(filename)
Set fs = CreateObject("Scripting.FileSystemObject")
check = fs.FileExists(server.mappath(filename))
set fs = nothing
end sub

 file = "nyfil.txt"
 call checkfile(file)
 if  check then
    Response.Write "Filen finns!"
 else
    Response.Write "Filen finns inte!"
 end if
 %\>

------------------
Daniel Olsson - Teknisk Internetkonsult
<A HREF="http://www.nanne.net" TARGET=_blank>http://www.nanne.net]

/N

</A>