---
title: "Undermappar i flera nivåer"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/163442-undermappar-i-flera-nivåer"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "bigsky"
published: "2007-08-13T11:22:29.000Z"
updated: "2007-08-13T12:21:28.000Z"
replies: 2
views: 465
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/163442-undermappar-i-flera-nivåer"
---

# Undermappar i flera nivåer

## #1 — bigsky, 2007-08-13T11:22Z

Det är ju lätt att lista alla undermappar i en mapp. Men hur listan man på samma gång alla undermappar i respektive undermapp? Det är ju en process som kan fortsätta i all oändlighet. Och klistrar man in koden nedan i sig själv så att säga får man ju ända bara undermapparna i nivå 2, inte nivå 3, 4, 5 osv.

```
For Each Folder in SubFolders
<option value=""><% = Folder.Name %></option>
Next
```

Permalänk: https://www.webforum.nu/p/163442

## #2 — Denkan, 2007-08-13T11:48Z

```
Sub ListFolders(ByVal Path, ByVal Level)
Dim fso, folder, subfolder
Set fso = Server.CreateObject("Scripting.FileSystemObject")
If fso.FolderExists(Path) Then
   Set folder = fso.GetFolder(Path)
   For Each subfolder in folder.SubFolders
      Response.Write(Level & ") " & subfolder.Name)
      Level = Level + 1
      ListFolders subfolder.Path, Level
      Level = Level - 1
   Next
   Set folder = Nothing
End If
Set fso = Nothing
End Sub

' Kör skriptet
ListFolders "C:\test\", 0
```

Otestat, men något sånt.

Permalänk: https://www.webforum.nu/p/2013996

## #3 — bigsky, 2007-08-13T12:21Z

Strålande! Tack.

Permalänk: https://www.webforum.nu/p/2014005

---

Tråden på webben: https://www.webforum.nu/amne/asp/163442-undermappar-i-flera-nivåer
