Visa ett inlägg
Oläst 2004-05-26, 01:09 #1
rille77s avatar
rille77 rille77 är inte uppkopplad
Medlem
 
Reg.datum: Dec 2003
Inlägg: 213
rille77 rille77 är inte uppkopplad
Medlem
rille77s avatar
 
Reg.datum: Dec 2003
Inlägg: 213
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.
rille77 är inte uppkopplad   Svara med citatSvara med citat