---

Har nogen af jer prøvet at automatisk scalere et biledet fra 800 x 600
til 80 x 60 ?
Jeg bruger aspimage komponent !!! Jeg kan resize men jeg kan ikke
recompile !

Robert
www.fixpunkt.dk

---

> Jeg bruger aspimage komponent !!! Jeg kan resize men jeg kan ikke
> recompile !
>
Jeg laver selv dette :

' Fremstil lille billede ( max x=120)
dim Image, lillePath ,nyY ,maxX
maxX=120
lillePath = "0"
Set Image = Server.CreateObject("AspImage.Image")
if not(Right(Trim(Ucase(BilledePath)),4) = ".GIF") then
if Image.LoadImage(Upload.Files("billede").path) then
lillePath = "lille" & BilledePath Image.FileName = billedesti &
lillePath
nyY = image.MaxY / ( Image.MaxX / maxX )
Image.Resize maxX, nyY
Image.SaveImage
end if
else
response.write "Det er ikke muligt at fremstille en lille version af
billedet, da der ikke understøttes .GIF format "
end if

Og har ikke oplevet nogle problemer. ( Hvis koden ikke er for smart vil jeg
gerne høre det, så kan jeg jo lære !! )
Hvis jeg ikke forstår problemet, er du velkommen til at skrive.
Mvh
Janus

---

1.Jeg kan se at bu bruger resize.. har du prøvet med resizer ?
2.Har du prøvet at lad være med at gemme og spytter det ud binært !




On Sat, 27 Jan 2001 02:17:01 +0100, "Janus Klok Lauritsen"
<rud-klok@mobilixnet.dk> wrote:

>> Jeg bruger aspimage komponent !!! Jeg kan resize men jeg kan ikke
>> recompile !
>>
>Jeg laver selv dette :
>
>' Fremstil lille billede ( max x=120)
>dim Image, lillePath ,nyY ,maxX
>maxX=120
>lillePath = "0"
>Set Image = Server.CreateObject("AspImage.Image")
>if not(Right(Trim(Ucase(BilledePath)),4) = ".GIF") then
> if Image.LoadImage(Upload.Files("billede").path) then
> lillePath = "lille" & BilledePath Image.FileName = billedesti &
>lillePath
> nyY = image.MaxY / ( Image.MaxX / maxX )
> Image.Resize maxX, nyY
> Image.SaveImage
> end if
>else
> response.write "Det er ikke muligt at fremstille en lille version af
>billedet, da der ikke understøttes .GIF format "
>end if
>
>Og har ikke oplevet nogle problemer. ( Hvis koden ikke er for smart vil jeg
>gerne høre det, så kan jeg jo lære !! )
>Hvis jeg ikke forstår problemet, er du velkommen til at skrive.
>Mvh
>Janus
>
>

---

Desværre nej i begge tilfælde !!
Mvh
Janus
"Robert" <Robert@fixpunkt.dk> wrote in message
news:3a753646.7366362@news.worldonline.dk...
> 1.Jeg kan se at bu bruger resize.. har du prøvet med resizer ?
> 2.Har du prøvet at lad være med at gemme og spytter det ud binært !