Visa antalet bytes av en mapp?

Ja.

Det är bara att använda filesystemobject och göra en rekursiv funktion för att kolla en mapps storlek.

Lite tips: http://www.virtualsplat.com/tips/visual-basic-fso.asp

Jag har det nästan att fungera! Problemet är med raden 19, fet stil.
Jag får följande felmeddelande.

C:\Hemsida\backup\info.vbs(19, 1) Microsoft VBScript runtime error: Invalid proc
edure call or argument

Kan nån hjälpa mig?

set oFS = WScript.CreateObject("Scripting.FileSystemObject")
set oFolder = oFS.GetFolder("c:\Hemsida\backup")

dim showdate

ShowFolderDetails oFolder

sub ShowFolderDetails(oF)
wscript.echo oF.Name & ":Size=" & oF.Size
end sub

showdate = FormatDateTime(Now(),2)

showpath = "\\192.168.11.38\Backup\backup_" & showdate

wscript.echo showpath

set oFS2 = WScript.CreateObject("Scripting.FileSystemObject")
[B]set oFolder2 = oFS2.GetFolder(wscript.echo (showpath))[/B]
wscript.echo oFolder2

ShowFolderDetails2 oFolder2

sub ShowFolderDetails2(oF)
wscript.echo oF.Name & ":Size=" & oF.Size
end sub

Varför har du wscript.echo med i den raden? Sökvägen ligger ju i variabeln showpath.

set oFolder2 = oFS2.GetFolder(showpath)

Hur får jag infon med wscript.echo skriven till en text fil?

set oFS = WScript.CreateObject("Scripting.FileSystemObject")
set oFolder = oFS.GetFolder("c:\Hemsida\backup")

ShowFolderDetails oFolder
 
sub ShowFolderDetails(oF)
wscript.echo oF.Name & ":Size=" & oF.Size
end sub

Eftersom det var så länge sedan jag pysslade med VB6 så var jag tvungen att googla lite åt dig. :)

Kolla här t.ex: http://www.martin2k.co.uk/vb6/posts/vb6post159.php

mvh