---
title: "AspJpeg (again)"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/109483-aspjpeg-again"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "M.Cheraghi"
published: "2004-08-18T00:12:01.000Z"
updated: "2004-08-20T13:16:37.000Z"
replies: 7
views: 425
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/109483-aspjpeg-again"
---

# AspJpeg (again)

## #1 — M.Cheraghi, 2004-08-18T00:12Z

Jag har efter en tids småfnulande med AspJpeg konstaterat att mina thumbs får en riktigt kass kvalitet. Jag har provat att sätta quality till 100 (max) men jag jag märker skilnaden som 0% :OO
Har jag gjort något fel någonstans? Jag tycker bilden blir \_väldigt\_ luddig!

Orginalbild:
[orginal](http://194.237.241.56/orginal.jpg) 

Thumbnail:
[Thumbnail](http://194.237.241.56/thumb.jpg) 

```
Set Jpeg = Server.CreateObject("Persits.Jpeg")
	Path = Server.MapPath("photo\no\" & strUsername & ".jpg")
	Jpeg.Open Path

	Jpeg.Crop UserImagex1, UserImageY1, X2, Y2

	Jpeg.quality = 100

	strPercent = 40 / jpeg.originalwidth
	Jpeg.Width = "40"
	Jpeg.Height = Jpeg.OriginalHeight * strPercent

	Jpeg.quality = 100

	Jpeg.Save Server.MapPath("photo\not_validated\" & strUsername & "_small.jpg")

	Jpeg.Width = "90"
	Jpeg.Height = "110"

	Jpeg.Canvas.Pen.Color = &H000000' black
	Jpeg.Canvas.Pen.Width = 1
	Jpeg.Canvas.Brush.Solid = False ' or a solid bar would be drawn
	Jpeg.Canvas.Bar 0, 0, Jpeg.Width, Jpeg.Height

	Jpeg.Save Server.MapPath("photo\not_validated\" & strUsername & ".jpg")
```

Permalänk: https://www.webforum.nu/p/109483

## #2 — OveRRidE, 2004-08-18T09:04Z

Den tumnagelbilden du visar ovan är ju iofs. inte 40px bred, utan 90px. Är det meningen?

Permalänk: https://www.webforum.nu/p/1415645

## #3 — M.Cheraghi, 2004-08-18T09:35Z

> **OveRRidE skrev:**
>
> Den tumnagelbilden du visar ovan är ju iofs. inte 40px bred, utan 90px. Är det meningen?

Allt är i sin ordning ;)
det ska sammanlagt bli 3 filer.
\- Orginalet
\- 90 pixlar
\- 40 pixlar

Den med 90 pixlar är den jag har bifogat med, och den ser risig ut, dvs den ser luddig ut, även om orgnalet är skarp. och det vill jag inte :( men jag får inte till det, eller rättare sagt, jag vet inte *hur* man får till det ;)

Permalänk: https://www.webforum.nu/p/1415677

## #4 — M.Cheraghi, 2004-08-19T22:06Z

Jahapp, eftersom ingen visste felet och jag själv lyckades efter många och/men. Så postar jag koden här så gött fölk kan ta del utav den :) Det som jag gjorde fel var att jag tydligen skalade ner bilden till 40 pixlar först, osedan skalade om den till 90, dvs jag förstorade en förminskning :) så jag la till fetmarkerat.

```
Set Jpeg = Server.CreateObject("Persits.Jpeg")
	Path = Server.MapPath("photo\no\" & strUsername & ".jpg")
	Jpeg.Open Path

	Jpeg.Crop UserImagex1, UserImageY1, X2, Y2

	strPercent = 40 / jpeg.originalwidth
	Jpeg.Width = "40"
	Jpeg.Height = Jpeg.OriginalHeight * strPercent

	Jpeg.quality = 100

	Jpeg.Save Server.MapPath("photo\not_validated\" & strUsername & "_small.jpg")

	[b]Path = Server.MapPath("photo\no\" & strUsername & ".jpg")
	Jpeg.Open Path

	Jpeg.Crop UserImagex1, UserImageY1, X2, Y2

	quality = 100[/b]

	Jpeg.Width = "90"
	Jpeg.Height = "110"

	Jpeg.Canvas.Pen.Color = &H000000' black
	Jpeg.Canvas.Pen.Width = 1
	Jpeg.Canvas.Brush.Solid = False ' or a solid bar would be drawn
	Jpeg.Canvas.Bar 0, 0, Jpeg.Width, Jpeg.Height
```

Permalänk: https://www.webforum.nu/p/1416777

## #5 — OveRRidE, 2004-08-20T09:54Z

Och genast ställer jag mig själv frågan; *Hur ända in i tomteboda kunde man missa det?* :o :q

Ibland är saker helt enkelt för uppenbara. ;)

Permalänk: https://www.webforum.nu/p/1416852

## #6 — M.Cheraghi, 2004-08-20T11:01Z

> **OveRRidE skrev:**
>
> Och genast ställer jag mig själv frågan; *Hur ända in i tomteboda kunde man missa det?* :o :q
> 
> Ibland är saker helt enkelt för uppenbara. ;)

Jag ställer mig själv samma fråga :)
Men nu löste det sig till slut :)

[nya thumbnailen](http://194.237.241.56/new_thumb.jpg) 

[gamla thumbnailen](http://194.237.241.56/thumb.jpg) 

Hade jag anledning att whina på gamla thumben? eller var jag på tok för kräsen :)

Permalänk: https://www.webforum.nu/p/1416871

## #7 — Troxy, 2004-08-20T13:14Z

När vi ändå är inne på det där med JPEG-Thumbnails, behöver servern stöd för någon extra funktion för att man ska kunna skapa JPEG-Thumbnails?

Permalänk: https://www.webforum.nu/p/1416965

## #8 — OveRRidE, 2004-08-20T13:16Z

Du behöver en komponent som klarar att hantera och spara bilder på servern, 'on-the-fly', alltså i runtime. 

I Cheragi's fall heter komponenten Persits.

Permalänk: https://www.webforum.nu/p/1416968

---

Tråden på webben: https://www.webforum.nu/amne/asp/109483-aspjpeg-again
