CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

flemmingk Nybegynder

15. februar 2000 - 15:39 Der er 5 kommentarer og
1 løsning

Hvormeget plads optager ens ting?

Når man har arbejdet flere måneder på samme site, lægger nye ting ud i nye biblioteker osv. - kan man lave et ASP-script, som kan køre på en NT, som lister op hvad man har liggende i alt (inkl. underdirs og underdirs til underdirs ...) og hvad det samlet fylder ?

Synes godt om

reason Nybegynder

15. februar 2000 - 15:43 #1

ja da

Synes godt om

snowball Novice

15. februar 2000 - 15:46 #2

Det er altså bare det lammeste svar man ka' gi' !!!

Hvis du ikke kan gi' et eksempel (el. lign.), så la' da være med at skrive noget !

Snowball

Synes godt om

reason Nybegynder

15. februar 2000 - 15:49 #3

det var da det han ? om
og hvis du nu kigge efter så er det en kommentar ikke et svar

så snowball begynd on tud

Synes godt om

bocker Nybegynder

15. februar 2000 - 20:46 #4

nu var det jo kun en kommentar

Synes godt om

snowball Novice

15. februar 2000 - 23:53 #5

Ja godt nok var det kun en kommentar, men alligevel !

Snowball

Synes godt om

mjess Nybegynder

16. februar 2000 - 10:45 #6

Kan det her bruges?

<%
Dim rootDir, byteSize

Function filesSize(dir)
Dim s, fso, fo, f

s = 0
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set fo = fso.GetFolder(dir)
For Each f in fo.Files
s = s + f.Size
Next

Set fo = Nothing
Set fso = Nothing

filesSize = s
End Function

Function folderSize(dir)
Dim s, fso, fo, f, subFo

s = filesSize(dir)
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set fo = fso.GetFolder(dir)
For Each subFo in fo.SubFolders
s = s + folderSize(subFo)
Next

Set fo = Nothing
Set fso = Nothing

folderSize = s
End Function

rootDir = Server.MapPath("/")
bytesize = FormatNumber(folderSize(rootDir),0,,,-1)

%>
<html>
<head>
<title>Size</title>
</head>
<body>

Total size of <%=rootDir%> and all subdirectories is <%=byteSize%> bytes

</body>
</html>

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS