---
title: "Räkna filer med FSO"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/84816-räkna-filer-med-fso"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Melea"
published: "2003-08-29T17:50:56.000Z"
updated: "2003-08-29T20:56:30.000Z"
replies: 7
views: 312
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/84816-räkna-filer-med-fso"
---

# Räkna filer med FSO

## #1 — Melea, 2003-08-29T17:50Z

Hejsan!

Jag hittade den här koden här i forumet och undrar om någon kan hjälpa mig med att utöka den.
Som det ser ut nu så listar den alla kataloger, filer och underkataloger... man kan också klicka på katalogerna så man kommer till underkatalogen. Den visar också storleken på mappen/filen, när den skapades och när den senast blev läst.

Nu vill jag också lista hur många filer det finns i katalogerna.

Såhär ser koden ut just nu:

```
<%

if request.querystring("dir") = "" then
	strPath2 = "files"
else
strPath2 = strPath2 & request.querystring("dir")
end if

'On Error Resume Next
dim objFSO2,objFolder2,objFile2, strPath2

set objFSO2 = Server.CreateObject("Scripting.FileSystemObject")
set objFolder2 = objFSO2.GetFolder(server.mappath(strPath2))

function getFileSize(int)
	getFileSize = round(int/1024,0)
end function
%>

<table border="0">
<tr>
	<td>Innehåll i <%=strPath2%></td>
</tr>
<tr>
	<td>
	
	<table width="100%" border="0" cellpadding="0" cellspacing="0">
	<tr>
		<td>&nbsp;</td>
		<td width="140"><b>Katalognamn</b></td>
		<td width="80"><b>Storlek</b></td>
		<td width="100"><b>Skapad</b></td>
		<td width="100"><b>Senast läst</b></td>
	</tr>
	<tr>
		<td height="5" colspan="5"></td>
	</tr>
	<tr>
		<td width="15">«</td>
		<td colspan="4"><a href="<%=request.servervariables("SCRIPT_NAME")%>?dir=<%=objFSO2.GetParentFolderName(strPath2)%>">Bakåt i strukturen</a></td>
	</tr>
	<tr>
		<td height="5" colspan="5"></td>
	</tr>
	<% for each objFile2 in objFolder2.SubFolders	%>
	<tr>
		<td>&nbsp;</td>
		<td><a href="<%=request.servervariables("SCRIPT_NAME")%>?dir=<%=strPath2%>/<%=objFile2.Name%>"><%=objFile2.Name%></a></td>
		<td><%=getFileSize(objFile2.Size)%> kB</td>
		<td><%=Left(objFile2.DateCreated,10)%></td>
		<td><%=Left(objFile2.DateLastAccessed,10)%></td>
	</tr>
	<% next %>
	<% for each objFile2 in objFolder2.Files	%>
	<tr>
		<td>&nbsp;</td>
		<td><a href="<%=strPath2%>/<%=objFile2.Name%>"><%=objFile2.Name%></a></td>
		<td><%=getFileSize(objFile2.Size)%> kB</td>
		<td><%=Left(objFile2.DateCreated,10)%></td>
		<td><%=Left(objFile2.DateLastAccessed,10)%></td>
	</tr>
	<% next %>
	<tr>
		<td colspan="5">&nbsp;</td>
	</tr>
	</table>
	
	</td>
</tr>
<tr>
	<td height="10"></td>
</tr>
<tr>
	<td>&nbsp;</td>
</tr>
<tr>
	<td colspan="4" height="3"></td>
</tr>
</table>

<%
set objFolder2 = nothing
set objFSO2 = nothing
%>
```

Hoppas att någon kan hjälpa mig med detta!

MVH

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

## #2 — Skarre, 2003-08-29T17:56Z

"Count" fungerar säkert. 

> Count Property
> Returns the number of items in a collection or Dictionary object. Read-only.

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

## #3 — Melea, 2003-08-29T17:57Z

Finns det någon sida för FSO / VBscript?

Menar... "Count" hjälper inte särskilt mkt om man inte vet hur koden "ska" se ut ;)

MVH

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

## #4 — @nders, 2003-08-29T18:45Z

Man kan ju alltid ge sig på en sökning här på wF, då det antagligen frågats om förut. ;)

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

## #5 — Melea, 2003-08-29T18:53Z

Hm :) Tyvärr @nders men jag hittar inget i forumet. :l

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

## #6 — @nders, 2003-08-29T18:58Z

Okej, då kan man alltid söka på <http://msdn.microsoft.com/> .

Mvh

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

## #7 — Melea, 2003-08-29T20:42Z

Tack så mkt @nders!

Löst det nu...

MVH

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

## #8 — @nders, 2003-08-29T20:56Z

Härligt!

Och för att andra lättare ska hitta lösningen här på webForum så vore det alldeles fantastiskt (underbart) att se din lösning här. ;)

Mvh

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/84816-räkna-filer-med-fso