FSO - kigge i mapper og undermapper

Kig på www.netsrac.dk <- der er der et script der hedder ASPAdmin som kan det!

okay.. det var måske lige at skyde gråspurve med kanonkugler.
Jeg skal blot have liste mapper/undermapper med tilhørende filer til en dynamisk menu.

Prøv flg.:

<%
Set fso = CreateObject("Scripting.FileSystemObject")

function lookinfolder (foldernavn)
  Set objFolder = fso.getFolder( foldernavn )
  Response.Write objFolder.path & "<br>"
  Response.Flush
 

  For each Folder in objFolder.SubFolders
    call lookinfolder (Folder.path)
  next
 
  Set objFolder = Nothing
end function


sti = "."
strPhysicalPath = Server.MapPath(sti)

lookinfolder (strPhysicalPath)

Conn.Close
Set Conn = Nothing
Set fso = Nothing
%>

//>Rune

Det har jeg også prøvet - mit problem har åbenbart ikke været min kode men tværtimod at jeg ikke har adgang til mappe med en asp-side.
Jeg lukker opgaven igen - du får dog lidt for din tid :)