---
title: "Transparent .png - AspImage"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/156264-transparent-png-aspimage"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "andyoumaydie"
published: "2007-01-21T13:52:40.000Z"
updated: "2007-01-21T13:52:40.000Z"
replies: 0
views: 162
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/156264-transparent-png-aspimage"
---

# Transparent .png - AspImage

## #1 — andyoumaydie, 2007-01-21T13:52Z

Hej hej.
Jag undrar om det är någon som lyckats att 'resiza' en transparent png med bibehållen transparens med hjälp av AspImage?

Om någon har lyckats med det och vill dela med sig av sitt kunnande skulle jag bli överlycklig.   ;)

Min nuvarande kod som inte funkar:

```
if Image.LoadImage("*red*" & request.querystring("pic")) then
	intWidth = request.querystring("w") 'filen.imagewidth
	intHeight = request.querystring("h") 'filen.imageheight
	newX = 200
	newY = 200		
	intRatio = (newX/intWidth)
	Image.ResizeR intWidth*intRatio, intHeight*intRatio
	if Image.maxY > Image.maxX then
		intRatio = (newY/Image.maxY)
		Image.ResizeR Image.maxX*intRatio, Image.maxY*intRatio
	end if
	strH = Image.maxY
	strW = Image.maxX
	Image.Transparent = True
	Image.ImageFormat = 3 'png
	Image.PixelFormat = 6 '24bit
			
	Image.Filename = ("*red*" & request.querystring("pic"))
	Image.SaveImage
	Set Image = nothing
end if
```

Tackar på förhand /Patrik

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/156264-transparent-png-aspimage