AspJpeg filnavn
Hvordan ændre jeg navnet på den orginale?Name = year(now) & month(now) & weekday(now) & day(now) & hour(now) & minute(now) & second(now)
SName = "\Small_" & year(now) & month(now) & weekday(now) & day(now) & hour(now) & minute(now) & second(now) & ".jpg"
Set Upload = Server.CreateObject("Persits.Upload")
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Upload.SaveVirtual("pic")
For Each File in Upload.Files
If File.ImageType <> "JPG" Then
Response.Write "This is not a JPEG image."
File.Delete
Response.End
End If
Jpeg.Open File.Path
Scale = Upload.Form("Scale")
Jpeg.Width = 100
Jpeg.Height = 120
Jpeg.Save Server.MapPath("pic") & Sname
Next