ASPUpload - sammenlign filstørrelser

Hej

Det er tankten at følgende script, at det skal bruges til at konstatere om brugeren har uploadet en fil, som allerede er blevet uploadet til serveren.

Konkret vil det sige, at scriptet sammenligner en submittet fils størrelse (kb) med størrelserne på de filer, som ligger på serveren. Hvis scriptet finder ud af, at størrelsen (kb) af det submittede billede er lig med størrelsen på en fil, der allerede ligger på serveren, skal den sige ”hov stop” - eller rettere det burdte den sige.

Problemet med scriptet er, at det konstant siger, at filen "findes allerede, men den har ikke samme størrelse som den nye fil."... og det er ikke sandt, fordi filen, som der uploades, allerede ligger på serveren.

Kan du finde fejlen?

(Jeg bruger ASPUpload og overwrite er lig med "false".)
__________________________________________________

' find det nye billedes str.
NewFileSize = Upload.TotalBytes

' kald funktion der checker om filen findes

ret = checkfile(upload.file, newfilesize)

' udsriv resultat
response.write ret

Function checkfile(newfile,newsize)

    response.write "nyt filnavn = " & newfile & "<br>"
    response.write "ny str = " & newfilesize & "<br>"

    set FSO = server.createObject("Scripting.FileSystemObject")
    Filepath = Server.MapPath(newfile)
    if FSO.FileExists(Filepath) Then
        set file = FSO.GetFile(Filepath)
    response.write "gl filnavn = " & filepath & "<br>"
        FileSize = file.Size

    response.write "gl str = " & filesize & "<br>"

        if FileSize = NewFileSize then
            checkfile=filepath & " findes allerede, den er " & filesize & " bytes"
        else
            checkfile=filepath & " findes allerede, men den har ikke samme størrelse som den nye fil."
        end if
    else
        checkfile = "Filen findes ikke"

    end if
end function
%>