---
title: "FSO (Igen)"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/137423-fso-igen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "M.Cheraghi"
published: "2005-11-11T13:07:54.000Z"
updated: "2005-11-11T14:05:27.000Z"
replies: 2
views: 213
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/137423-fso-igen"
---

# FSO (Igen)

## #1 — M.Cheraghi, 2005-11-11T13:07Z

koden genererar inga fel :) Det är heller inte det som är problemet. :)
Hur skriver jag ut filnamn plus tillägg i mina subsolders?

Kan man också efter mappnamnet skriva hur många filer det finns i mappen? :)

```
<%
set fso = server.createobject("scripting.filesystemobject")
set folder = fso.getFolder(server.mappath(session("username") & "/"))
set SF = folder.subfolders

for each Item in SF

	set files = folder.files

		response.write "Mapp: " & Item.name & "<br>"
		response.write "&nbsp;&nbsp;&nbsp;&nbsp;Dokument: " & [b]file.name[/b] & "<br>"

next

set folder = nothing
set fso = nothing
set SF =nothing
%>
```

Edit: Nu är det rätt :)

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

## #2 — M.Cheraghi, 2005-11-11T13:50Z

Sökte lite i forumet och fann denna! :) Inte exakt vad jag söker, så den inte listar filerna som ligger i subfoldermappen uder mappnamnet. Men den såg mycket smidigare ut än mig version.

```
<%
Dim fso, folder, subFolder,f

    set fso = server.createobject("scripting.filesystemobject")

    set folder = fso.getFolder(server.mappath(session("username") & "/"))
    
    For Each subFolder in folder.subFolders
        response.write subFolder.name & "<br>"
    Next
    
    For Each f in folder.files
        response.write f.name
    Next
%>
```

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

## #3 — M.Cheraghi, 2005-11-11T14:05Z

```
<%
Dim fso, folder, subFolder,f

    set fso = server.createobject("scripting.filesystemobject")

    set folder = fso.getFolder(server.mappath(session("username") & "/"))

    For Each f in folder.files

        response.write f.name & "<br>"

    Next
    
    For Each subFolder in folder.subFolders

        response.write subFolder.name & "<br>"

	set folder2 = fso.getFolder(server.mappath(session("username") & "/" & subFolder.name & "/"))
	set files = folder2.files

	for each Item in files

		response.write "&nbsp;&nbsp;&nbsp; " & Item.name & "<br>"

	Next

    Next
%>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/137423-fso-igen