Persits.jpeg - hvordan er det lige?
Hej EksperterJeg sidder og prøver at få lidt styr på ASPjpeg, men kan ikke helt få det til at virke. Min upload virker fint, men thumbnails kan jeg ikke få til at spille. Jeg får fejlmeddelelsen: "Object required".
KODE....................................................
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False
On Error Resume Next
Upload.SetMaxSize 1048576 ' Limit files to 1MB = 1048576
Count = Upload.Save(Application("temp_images_path"))
' Create instance of AspJpeg-----------------------------------THUMB RESIZE START
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' Open source image
Jpeg.Open (Application("images_path") & File.FileName)
' New width
L = 100
' Resize, preserve aspect ratio
Jpeg.Width = L
Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth
' create thumbnail and save it to disk
Jpeg.Save Application("temp_thumb_path") & File.FileName
'--------------------------------------------------------------THUMB RESIZE SLUT
%>