Skapa thumbnails

Jag tänkte skapa stora tumnaglar för galleriet på webbisen, en del bilder är lika stora som hela skärmen och jag vill ha en standardstorlek om de är över en visss storlek, tänkte använda aspjpeg och jag vet inte om det räcker med en koden eller om jag måste använda hela min aspsmartupload, andra frågan är hur man hämtar formulärdatan med aspjpeg

' Create instance of AspJpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")

' Open source image
[B]Jpeg.Open "c:\path\myimage.jpg"[/B]

' New width
L = 300

' Resize, preserve aspect ratio
Jpeg.Width = L
Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth

' create thumbnail and save it to disk
[B]Jpeg.Save "/images/gallery"[/B]

Set Upload = Server.CreateObject("Persits.Upload")
Upload.OverwriteFiles = False
Upload.SetMaxSize 100000, False
Count=Upload.Save(Server.MapPath("/images/gallery"))
For Each file In Upload.Files
  If File.ImageType = "UNKNOWN" Then

      Response.Redirect "Fell.asp"
      File.Delete
   End If
  Next
For Each file In Upload.Files

If file.Size = 100000 Then
        'This means the file was truncated
        Response.Redirect "fel.asp"
    File.Delete
    End If
Next

Set File = Upload.Files

filnamn = Upload.form("blob")
kommentar = Upload.form("kommentar")
upplagd= Upload.form("upplagd")

If NOT File Is Nothing Then
On Error Resume Next
strFileName= Upload.Files("blob").ExtractFileName
END IF