AspImage og et billede i en Access database.

Hej Guro

Jeg opretter min thumbnail når jeg uploader billedet, så er jeg sikker på det sker og jeg behøver ikke checke for om det er lavet og hvis ikke så lave en thumbnail.

Min kode:

        ' generer thumbnail

                ' husk response.content type
        ret = Response.ContentType
            ' sæt response.content type
        Response.ContentType = "image/jpeg\"
' her tilknytter jeg filnavnet fra upload objectet
        strPicture = file.path
' opret object
        Set Image = Server.CreateObject("AspImage.Image")
    ' tilknyt billede
        Image.LoadImage strPicture
' resize
        intRatio = ((75 * 100) / Image.MaxX)
        intNewY = CInt(Image.MaxY * (intRatio / 100))
        Image.ResizeR 75, intNewY
        Image.ImageFormat = 1
'opret nyt filnavn
        image.filename = server.mappath("..") & "\thumbs\" &
file.filename
' gem thumb
        image.saveimage
' clear object
        Set Image = nothing   
' sæt response tilbage
        Response.ContentType = ret

'//akj