Filstorlek i funktion

Nåt sånt här kanske:

Function getFileSize(strFil)
Set fso = CreateObject("Scripting.FileSystemObject")
Set fil = fso.GetFile(Server.MapPath(strFil))
storlek = fil.size
getFileSize = storlek / 1000
Set fil = Nothing
Set fso = Nothing
End Function

Du anropar den såhär:

storlek = getFileSize("bild.gif")

------------------
/Morph

Tech Support: "I need you to boot the computer."
Customer: (THUMP! Pause.) "No, that didn't help."

Jag körde in det så här:

<%
Function getFileSize(strFil)
Set fso = CreateObject("Scripting.FileSystemObject")
Set fil = fso.GetFile(Server.MapPath(strFil))
storlek = fil.size
getFileSize = storlek / 1000
Set fil = Nothing
Set fso = Nothing
End Function

Response.Write getFileSize(RecSet("file"))
%>

Den hämtar sökvägen till filen från databasen...

När jag kör detta hänger sig hela IIS. :(
Någon som vet varför?

------------------
~ Mz ~

<%
Function getFileSize([b]ByVal[/b] strFil)
Set fso = CreateObject("Scripting.FileSystemObject")
Set fil = fso.GetFile(Server.MapPath(strFil))
storlek = fil.size
getFileSize = storlek / 1000
Set fil = Nothing
Set fso = Nothing
End Function

strFil = RecSet("file")

Response.Write getFileSize(strFil)
%>

vet inte om det hjälper men det kan ju vara värt ett försök :)

det jag gjorde vara att lägga till ett ByVal(ByValidate) och sen la jag in RecSet("file") i en variabel .... du kan ju testa :)

------------------
Icaaq, mannen med korven. (!)

Tyvärr, hela IIS hänger sig igen och måste startas om... :(

------------------
~ Mz ~

borde det inte stå:

getFileSize = storlek / 1024

istället för:

getFileSize = storlek / 1000