Thumbnails

Jeg uploader nogle billeder til en server. Samtidig med dette skal der laver nogle thumbnails af dem hvordan gør man det ??

<%
Response.Expires = 0

response.write "DONE!"

Set jpg = Server.CreateObject("Persits.Jpeg")

jpg.Open( Request("path1") )

jpg.Interpolation = 1

jpg.Height = Request("NewHeight")
jpg.Width = Request("NewWidth") * Request("Width1") / request("Height1")

Jpg.Save Server.MapPath("..\upload") & "\thumb_" & Request("Savename1")

response.redirect "bedrifter.asp"
%>

Kan dette lade sig gøre ??