webForumDet fria alternativet

ASPJpeg problem

0 svar · 205 visningar · startad av rille77

rille77Medlem sedan feb. 200476 inlägg
#1

Nån som kan hjälpa mig med att hitta vad det är för fel på denna kod? Den ska öppna en bild och sen skära bort kanterna på den och spara den i samma katalog med samma namn, alltså skriva över den gamla filen.

<%
x1 = CLng(Request.form ("coordX"))
x2 = CLng(Request.form ("coordX")) + 90
y1 = CLng(Request.form ("coordY"))
y2 = CLng(Request.form ("coordY")) + 118

Set Jpeg = Server.CreateObject("Persits.Jpeg")
Path = Server.MapPath("../images")
FilePath = Path & "/" & Request.Querystring("image")
SavePath = Path & "/" & Request.Querystring("image")

Jpeg.Open FilePath

Jpeg.Width = Jpeg.OriginalWidth 
Jpeg.Height = Jpeg.OriginalHeight
Jpeg.Crop x1, y1, x2, y2

Jpeg.Save SavePath
%>

Värdena på variablerna x1, x2, y1, y2 hämtar jag med hjälp av ett javascript, dom kommer in som dom ska men av någon anledning så beskärs inte bilden.

133 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)