Dateien per FSO auflisten?

[Cyberfuzzy]

Hi,

ich möchte per FSO Dateien aus einem Ordner auflisten. Leider funktioniert es nicht.
Hier der code:
<%
Path = Server.MapPath("./") & "\test"
Set objFileSys = Server.CreateObject("Scripting.FileSystemObject")
    Set objFolder = objFileSys.GetFolder(Path)
        Set objFiles = objFolder.Files
            For Each File in objFiles
                Response.Write "<a href=""" & File.Name & """>" & File.Name & "</a><br>"
            Next
        Set objFiles = Nothing
    Set objFolder = Nothing
Set objFileSys = Nothing
%>

Alle Dateien aus dem Ordner "test" sollen untereinander aufgelistet werden. Aber immer wenn ich diese ASP-Datei aufrufe, dann wird die Seite ewig geladen, aber es kommt nichts dabei raus. Nach dem 10. Versuch die Seite zu laden, bekomm ich eine Meldung vom IIS, dass zu viele User auf der Webseite sind. Dann lässt sich der IIS-Dienst auch nicht mehr beenden. Ich muss dann den Server neu starten.

Wenn ich nur das FSO starte, dann wird die Seite noch normal geladen:
Set objFileSys = Server.CreateObject("Scripting.FileSystemObject")

Aber ab dieser Zeile gibt es das Problem:
Set objFolder = objFileSys.GetFolder(Path)

Woran kann das liegen? Könnte es ein Rechteproblem sein? Ich habe aber den Ordner schon für "Jeder" mit Vollzugriff freigegeben. Außerdem hab ich in der IIS-Verwaltung lese und Schreibrechte erteilt. Trotzdem hilft nix.

Wäre für schnelle Hilfe dankbar.

Grüße
Cyberfuzzy