Billed+tekst på et billede vha. ASPImage

Har selv fundet ud af det

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

  Image.AutoSize = false

  Image.LoadImage server.mappath("lanmannt.bmp")

  'Image.FontName = "MS Sans Serif"
  'Image.FontColor = vbRed
  'Image.FontSize = 6
  'Image.TextOut "SteveG's Demo", 170, 57, false

  'Image.Bold = True
  'Image.FontSize = 12
  'Image.X = 160
  'Image.Y = 230
  'Image.TextOut "Sejt", Image.X, Image.Y, true
 
  Image.BrushColor = VbRed
  'intX1, intY1, intX2, intY2
  Image.Ellipse 0, 0, 300, 300
 
  Image.BrushColor = VbBlack
  'intX1, intY1, intX2, intY2
  Image.Ellipse 0, 0, 100, 100

  Image.FontName = "Times New Roman"
  Image.FontSize = 12
  Image.TextOut "Lavet af Peppino.dk", 100, 150, true
 
  'Image.X = 160
  'Image.Y = Image.Y + Image.TextHeight("XYZ")
  'Image.FontSize = 10
  'Image.TextOut "Sejt", Image.X, Image.Y, false

  Image.FileName = server.mappath("lman.jpg")
  Image.SaveImage

  Response.Write "<img src=""lman.jpg""><br>"

  Set Image = nothing

%>