Problemas apra calcular tamaño de un archivo en el upload

[lenz]

No encuentro la propiedad para calcular el tamaño del archivo que ingresa en el upload caulquier ayuda lo agradecere

mi codigo

set MyFileObject = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = MyFileObject.CreateTextFile(filename)

For i = 1 to LenB(value)

objFile.Write chr(AscB(MidB(value,i,1)))
Next
objFile.Close
Set objFile = Nothing
Set MyFileObject = Nothing



--------------

byteCount = Request.TotalBytes
RequestBin = Request.BinaryRead(byteCount)
BuildUpload(RequestBin)
filepathname = UploadRequest.Item("archivo").Item("FileName")
filename = Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
fileorigin = filename