Använder detta för att hålla reda på storleken på en mapp. Har funkat bra tills nyss då jag fick ett felmeddelande. CINT OWERFLOW RAD 344 OSV... Varför???
<%
'Vi räknar utrymmet mappen mingelbilder
Dim FSO, Siten, Mappen
Mappen = "../../mingelbilder/"
Siten = "../../../wwwroot/"
Set FSO = Server.CreateObject ("Scripting.FileSystemObject")
Set Mapp = FSO.GetFolder (Server.MapPath(Mappen))
Set Site = FSO.GetFolder (Server.MapPath(Siten))
iMapp = Cint(Mapp.Size/1024)
iSite = Cint(Site.Size/1024)
Response.Write ("<P>Alla bilderna i albumet tar upp <B>" & iMapp & "</B> Kb<BR> Upptaget utrymme på hela siten är <B>" & iSite & "</B> Kb</P>")
Response.Write ("<P>Utrymmet du har till förfogande på hela siten är <B>50 000 </B>Kb</P>")
Set FSO = Nothing
Set Mapp = Nothing
Set Site = Nothing
%>

Integer klarar bara tal från -32,768 till 32,767.
Prova med CLng istället som klarar från -2,147,483,648 till 2,147,483,648.

/Micke