FSO funktioniert nicht

[John Barden]

Hi,

ich möchte per FSO Dateien aus einem Ordner auflisten. Dazu nehme ich dieses Script:
<%
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
%>

Bei meinem Testrechner (Win2000 Pro, SP2) funktioniert es einwandfrei. Aber auf dem Server (Win2000 Pro, SP3 + IIS Lockdown und Security updates) geht es nicht.
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 baldige Hilfe dankbar.

Grüße
John