ASPSmartUpload

Hejsa..

Har ladet mig fortælle at jeg med SPSmartUpload kan bruge file.Ext men får bare denne fejl

Der opstod en Microsoft VBScript-kørselsfejl error \'800a01b6\'

Objektet understøtter ikke denne egenskab eller metode: \'Ext\'

Her er mit script:
  Dim mySmartUpload
  Dim file

  Set mySmartUpload = Server.CreateObject(\"aspSmartUpload.SmartUpload\")

  mySmartUpload.Upload

  strMonth = Month(Date)
  strDay = Day(Date)
  strYear = Year(Date)

\' #### BEGIN ## Upload User picture ####
  Str_Err=\"Error\"
  For each file In mySmartUpload.Files
    If not file.IsMissing Then
        Filename = Server.MapPath(\"/Upload/\") & \"/\" & strMonth & strDay & strYear & Replace(Time,\":\",\"\") & \".\" & file.Ext
        file.SaveAs(Filename)
        Str_Err=\"OK\"
      else
        Str_Err=\"FileError\"
    end if
  Next
  \' #### END ## Upload User picture ####

  Response.Redirect \"UserDetails.asp?PicUpload=\" & Str_Err

Nogen der har et bud?

Mvh
Jack!!