Jag prövade med koden nedan med fortfarande samma fel
Jpeg.Crop 0, 0, jpeg.Width + 100, jpeg.Height + 100
6 svar · 658 visningar · startad av calson
Hej
Jag håller på att skapa ett enkelt skript som förminskar en upladdad bild till en bestämd storlek. När jag kör sidan står det att den inte kan visas, utan något felmedelande. Detta är på mitt webhotell eftersom jag inte har komponenten installerad på min dator. Dom använder aspjpeg 1.3.
Någon som kan hitta felet/en i denna kod?
Före
<img src="bilder/users/test.jpg"><br><br>
<%
Dim Jpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open Server.MapPath("bilder/users/test.jpg")
Jpeg.Crop 0, 0, jpeg.Width + 100, jpeg.Height + 100
Jpeg.Save Server.MapPath("images/users/test2.jpg")
Jpeg.Close
set Jpeg = nothing
%>
Efter
<img src="birder/users/test2.jpg">
Tack på förhand
Jag prövade med koden nedan med fortfarande samma fel
Jpeg.Crop 0, 0, jpeg.Width + 100, jpeg.Height + 100
Nu börjar jag komma någon vart.
Jag installerade aspjpeg på min dator.
När jag körde skriptet får jag detta felmedelande
Feltyp:
Persits.Jpeg.1 (0x800A0001)
Åtkomst nekad.
Rad 18
Rad 18
Jpeg.Save Server.MapPath("bilder/users/test2.jpg")
Det var visst fel sökväg till mappen där bilden skulle sparas :)
Lädsen för så många inlägg gjorda av mig.
Nu ska jag bara försöka fixa så jag kan använda aspjpeg på min dator :)
Du försöker att beskära bilden till ett mått som är större än vad originalbilden är (jpeg.Width + 100, jpeg.Height + 100). Därav felmeddelandet troligtvis.
Får jag gissa på att det skulle vara Jpeg.Save Server.MapPath("**/**images/users/test2.jpg") ?
Jag tycker inte att det gör något att du har en monolog med dig själv ;) men posta gärna din lösning och acceptera det som slutgiltigt svar för att stänga tråden.
felet var att jag skrivit fel. Bilden skulle sparas i mappen bilder inte images.
På min dator var jag tvungen att dela ut mappen där bilden skulle sparas för att få åtkomst.
Klart :)