directory browsing

jeg har prøvet at høre i win2000 server, men har ikke fået svar så nu prøver jeg her...
jeg mener at koden er go' nok

jeg har følgende problem:
man kan godt se filerne i et dir hvis man gør det via directory browsning, men hvis jeg laver et asp script der skal vise filerne i dir'et så sker der ingen ting.
spørgsmålet er så hvordan jeg sætter min server op så jeg kan se filerne via et asp script.
og ja jeg er sikker på at scriptet virker da jeg har prøvet flere bla.

<%
    strPathInfo = Request.ServerVariables("PATH_INFO")
    strPhysicalPath = Server.MapPath(strPathInfo)

    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFile = objFSO.GetFile(strPhysicalPath)
    Set objFolder = objFile.ParentFolder
    Set objFolderContents = objFolder.Files

    For Each objFileItem in objFolderContents
      If Not Right(objFileItem.Name,3) = "asp" Then
        Response.write "<a href="
        Response.Write(objFileItem.Name)
        Response.write ">"
        Response.Write(objFileItem.Name & "<br>")
        Response.write "</a>"
      End If
    Next
%>
håber der er hjælp at hente