WN

WN (https://www.wn.se/forum/index.php)
-   Serversidans teknologier (https://www.wn.se/forum/forumdisplay.php?f=4)
-   -   Beskärning med ASPJpeg (https://www.wn.se/forum/showthread.php?t=2400)

rille77 2004-05-26 01:09

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.

Kod:

<%
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 y1, x1, y2, x2

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.


Alla tider är GMT +2. Klockan är nu 18:28.

Programvara från: vBulletin® Version 3.8.2
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Svensk översättning av: Anders Pettersson