---
title: "FSO - klickbar"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/192672-fso-klickbar"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Trumpf"
published: "2015-05-03T19:09:01.000Z"
updated: "2015-05-04T10:23:45.000Z"
replies: 3
views: 942
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/192672-fso-klickbar"
---

# FSO - klickbar

## #1 — Trumpf, 2015-05-03T19:09Z

Jag har denna kod och den fungerar:

\<code\>
\<%
Dim FSO, myFolder, myFiles

Set FSO = CreateObject("Scripting.FileSystemObject")
Set myFolder = FSO.GetFolder(Server.MapPath("/upload/styrelsen/protokoll/"))
Set myFiles = myFolder.Files

For Each fileFound In myFiles
 Response.Write(fileFound.Name & "\<br\>")
Next
%\>

\</code\>

Skulle vilja ha att alla filer blir klickbara till filen?

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

## #2 — angelica, 2015-05-04T06:34Z

```
<%
Dim FSO, myFolder, myFiles

Set FSO = CreateObject("Scripting.FileSystemObject")
Set myFolder = FSO.GetFolder(Server.MapPath("/upload/styrelsen/protokoll/"))
Set myFiles = myFolder.Files

For Each fileFound In myFiles
'   Response.Write(fileFound.Name & "<br>")
   Response.Write "<A HREF=""/upload/styrelsen/protokoll/" & fileFound.Name  & """>" & fileFound.Name & "</A><br>" & vbCRLF
   Response.Write "<A HREF=""/upload/styrelsen/protokoll/" & fileFound.Name  & """>" & fileFound.Name & "</A> (" & FormatNumber((fileFound.Size / 1000),1) & " MB)<br>" & vbCRLF
Next
%>
```

Jag har inte testat detta och .size grejen är en ren gissning! Om det fungerar måste du dela med 1000 för att få MB. Annars blir det Kb, förmodligen...

Som sagt, jag vet inte om det fungerar, men det är lätt för dig att ta reda på! :-)

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

## #3 — angelica, 2015-05-04T06:47Z

<https://msdn.microsoft.com/en-us/library/aa711216%28v=vs.71%29.aspx>

Nej... jag har tittat på dokumentationen och .size fungerar förmodligen inte.
Testa i så fall .FileSize !
Dessutom, om det fungerar kommer resultatet i bytes, inte Kb... så du får dela med 1.000 två gånger, för att få MB.

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

## #4 — prplxr, 2015-05-04T10:23Z

Om filstorleken är av instresse så skall den räknas om i kB/MB/GB såhär:

B -\> kB: Bytes / 1024
B -\> MB: Bytes / 1048576
B -\> GB: Bytes / 1073741824

:-)

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

---

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