---
title: "AspImage Text?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/99699-aspimage-text"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Bosse168"
published: "2004-03-17T17:06:05.000Z"
updated: "2004-03-30T14:17:56.000Z"
replies: 5
views: 325
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/99699-aspimage-text"
---

# AspImage Text?

## #1 — Bosse168, 2004-03-17T17:06Z

Lyckas att ladda upp bilden men den skriver inte ut någon text på bilden.

```
File.SaveAs Server.MapPath("bilder") &"\"& NewName & Ext

'-------------------------

' Create instance of AspJpeg

Set Image = Server.CreateObject("AspImage.Image")

  Image.AntiAliasText = True
  Image.FontColor = vbWhite
  Image.Italic = False
  Image.Bold = True
  Image.FontName = "Verdana"
  Image.FontSize = 7
  Image.PadSize = 2

  strMessage = "Texten....."
  

  Image.X = Image.MaxX - Image.TextWidth (strMessage) - 1
  Image.Y = Image.MaxY - Image.TextHeight (strMessage) - 2
  Image.TextOut strMessage, Image.X, Image.Y, true
 

' Set the filename and save
Image.FileName = Server.MapPath("bilder") &"\"& NewName & Ext
```

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

## #2 — Bosse168, 2004-03-17T17:08Z

Och hur gör man thumbnails i AspImage?

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

## #3 — Bosse168, 2004-03-30T13:27Z

Ingen som vet hur man gör thumbnails (80px i bredd) med aspImage?

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

## #4 — Bosse168, 2004-03-30T13:30Z

Eller kan man göra det samtidigt som man laddar upp bilden med aspUpload?

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

## #5 — dAEk, 2004-03-30T13:59Z

Jag vet inte. Men har du kollat i dokumentationen / API:t ?
Det borde stå där om det går, annars är risken stor att det inte är möjligt mha de komponenterna.

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

## #6 — Bosse168, 2004-03-30T14:17Z

Hittade den här koden som ska göra bilden mindre. Någon som vet hur man ändrar den så att bilden blir 80px i bredd  och istället för att ta en bild från servern så ska den spara bilden som laddades upp via mitt formulär?

```
function CreateThumbnail(strPath, strFilename, maxX, maxY)
Set image = server.createobject("aspimage.image")
if image.loadimage(strPath & "\" & strFilename) then
intWidth = image.MaxX
intHeight = image.MaxY

if (intWidth<MaxX) and (intHeight<MaxY) then
if intWidth>intHeight then
intRatio=(maxX/intWidth)
image.resizeR intWidth*intRatio, intHeight*intRatio
else
intRatio=(maxY/intHeight)
image.resizeR intWidth*intRatio, intHeight*intRatio
end if
end if

'Optimised for JPEG thumbnails - generally better than GIFs
Image.ImageFormat = 1
Image.PixelFormat = 6
strSfilename=split(strFilename,".")
Image.Filename=strPath & "\thumb_" & strSfilename(0)
picture="thumb_" & strSfilename(0) 
if Image.SaveImage then
response.write "<img src=""pics/" & picture & ".jpg"">"
Set Image = nothing
else
'You may want to put some kind of error handler in here
Set Image = nothing
end if
else
'Error while loading, abort
Set Image = nothing
exit function
end if
end function

%>

<%Test=CreateThumbnail("c:\inetpub\wwwroot\pics", "sverige.jpg", "200", "200")%>

<%=Thumb_bild%>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/99699-aspimage-text