ASP - kigger efter under mappe, linker deres index-ér.

Hej du

Nu har jeg lavet et script som gennemsøger alle undermapperne efter index.htm, hvis filen eksisterer så finder den filnavnet på filen, fjerner ".htm" og så udskriver stien til mappen:

<%
  Set Fso    = Server.CreateObject("Scripting.FileSystemObject")
  Set Folder    = Fso.getFolder(Server.MapPath("/"))

  For Each folderObject in folder.SubFolders
      For Each File In folderObject.Files
          if file.name = "index.htm" then
            strFileName = replace(file.name,".htm","")
            response.write "<a href=""/" & folderObject.name & "/" & strFileName & """>/" & folderObject.name & "/" & strFileName & "</a>"  & vbcrlf
        end if
    next
  next
 
  Set Fso        = Nothing
  Set Folder    = Nothing
%>

Hey thefatman

1000 tak.. det virker kano godt... :)
send et svar så for du dine point

så smider jeg da bare et svar..