AspImage.Image problem

Jeg benytter følgende kode til at redigere i et billede

Set Conn = Server.Createobject("ADODB.Connection")
Conn.Open strCMS
Set rs = Server.CreateObject("adodb.recordset")
Set Upload = Server.CreateObject("Persits.Upload")
Set Image = Server.CreateObject("AspImage.Image")

rs.Open "billedKart", Conn, 2, 3
rs.AddNew
rs.movelast

' Save to memory. Path parameter is omitted
Upload.Save
' Obtain file object
Set File = Upload.Files("src")

If Not File Is Nothing Then
Set Image = Server.CreateObject("AspImage.Image")
Image.LoadImage(Upload.Form("srcHidden"))
Image.FileName = Server.MapPath("..\..\billedKart\" & rs("billedID") & file.filename)
width = Image.MaxX
    if width>250 then
        width = Image.MaxX - 250
        width = Image.MaxX - width
    end if
Image.CropImage 0, 0, width, Image.MaxY
Image.SaveImage
Set Image = Nothing

' Indsæt data i tabellen billedKart
rs("src") = rs("billedID") & Replace(File.FileName, "'", "''")
rs("billedeNavn") = Replace(Upload.Form("billedeNavn"), "'", "''")

rs.Update
rs.close
end if

...men resultatet bliver at billedet fylder 0 byte. Er der nogen der har været ude for det samme og kan hjælpe?