---
title: "kb -> mb"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13394-kb-mb"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "patbueno"
published: "2001-12-27T20:58:00.000Z"
updated: "2001-12-27T21:27:00.000Z"
replies: 2
views: 169
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/13394-kb-mb"
---

# kb -> mb

## #1 — patbueno, 2001-12-27T20:58Z

hej!

använder ett fso-script som listar mappar och filer i en bestämd mapp. 

har suttit och försökt ändra lite men får det inte att fungera.

hur gör jag för att visa mapparnas storlek i gb och filer i mb?

koden:

For Each Folder in MyDrive 
Typ = "kb" 
Size = Folder.size / 1000 
Tecken = instr(Size,",") + 1 
Size = Left(Size,Tecken) 
If Size = "0,0" Then 
Size = Folder.size 
Typ = "byte" 
ElseIf Tecken = 6 then 
Typ = "mb" 
Size = Folder.size / 1000000 
Tecken = instr(Size,",") + 2 
Size = Left(Size,Tecken) 
End if 
Response.Write "\<tr\>\<td width='15'\>\<img src='mapp.gif'\>\</td\>\<td\>"\_ 
& "\<b\>\<font face='Verdana' size='1'\>Namn: \</b\>" & Folder.Name & "\<br\>\<b\>Storlek:\</b\> "&\_ 
Size & " " & Typ & "\</font\>\</td\>\<td\>"& Folder.DateLastModified &"\</td\>\</tr\>" 
Next 

For Each objFile in Fgf.Files 
Typ = "kb" 
Size = objFile.size / 1000 
Tecken = instr(Size,",") + 1 
Size = Left(Size,Tecken) 
If Size = "0,0" Then 
Size = objFile.size 
Typ = "byte" 
ElseIf Tecken = 6 then 
Typ = "mb" 
Size = objFile.size / 1000000 
Tecken = instr(Size,",") + 2 
Size = Left(Size,Tecken) 
End if 
Response.Write ("\<tr\>\<td width='15'\>\<img src='fil.gif'\>\</td\>\<td width='20%'\>"\_ 
& "\<font face='Verdana' size='1'\>\<b\>FilNamn:\</b\> " & objFile.Name & "\<br\>"\_ 
& " \<b\>Storlek:\</b\> " & Size & " " & Typ & "\</Font\>\<br\>\</td\>\<td\>"& objFile.DateLastModified &"\</td\>\</tr\>") 
Next 

MVH/

Niclas
 
detta verkar säkert simpelt men snälla, hjälp mig!

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

## #2 — icaaq, 2001-12-27T21:14Z

Kolla in [denna](http://script.webforum.nu/wf/Forum1/HTML/000083.html). Den kanske får in dig på rätt spår :)

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

## #3 — icaaq, 2001-12-27T21:27Z

Och en sak till

**Välkommen till wF** :e

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/13394-kb-mb