Vandmærke on the fly.

Hey,

Jeg prøver at lave en lille kode der generere et vandmærke på et billede "on the Fly". Kan dette lade sig gøre?

her er min kode:
FileName = request.QueryString("FileName")
Size = Cint(request.QueryString("size"))

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

imgpath = "sti" & FileName
imageMY.LoadImage imgpath

    intX = ImageMY.MaxX
    intY = ImageMY.MaxY

imgpath2 = "sti"

    'Size = 50

'Vandmærkets højde og bredde
'if intY > size then
'    watermarkY = Cint(intY*size/intX)
'    watermarkX = size
'    Image.ResizeR NewWidth,NewHeight
'end if

    'Margin til kant
    margin = 5 'px

    'LogoX = intX - (watermarkX + margin)
    'LogoY = intY - (watermarkY + margin)

    ImageMY.ImageFormat = 1
    ImageMY.JPEGQuality = 100
    ProgressiveJPEGEncoding = true
    imageMY.AddImageTransparent imgpath2, 0, 0, VbBlack

    Response.BinaryWrite ImageMY.Image

Set ImageMY = Nothing

Jeg skylder vel lige at sige at jeg bruger ASPImage, bare for en god ordens skyld.

Mvh.
Anders.