io per "marchiare" le immagini con un logo in semitrasparenza facevo così
codice:
<%
srcMarchio = "img/marchio.jpg"
Marchio = Server.MapPath(srcMarchio)
srcImmagineDaMarchiare = "img/immaginedamarchiare.jpg"
immagineDaMarchiare = Server.MapPath(srcImmagineDaMarchiare)
srcDestinazione = "img/immagineMarchiata.jpg"
Destinazione = Server.MapPath(srcDestinazione)
srcRitagliotemp = "img/ritaglio.jpg"
ritagliotemp = Server.MapPath(srcRitagliotemp)
MarchioX = 10
MarchioY = 160
Set objImg = Server.CreateObject("ASPImage.Image")
objImg.LoadImage(Marchio)
MarchioW = objImg.MaxX
MarchioH = objImg.MaxY
Set objRitaglio = Server.CreateObject("ASPImage.Image")
objRitaglio.LoadImage(immagineDaMarchiare)
imgW = objRitaglio.MaxX
imgH = objRitaglio.MaxY
objRitaglio.CropImage (MarchioX),(MarchioY),MarchioW,MarchioH
objRitaglio.DoMerge Marchio,50
objRitaglio.ImageFormat = 1
objRitaglio.FileName = ritagliotemp
objRitaglio.SaveImage
Set objImg = Server.CreateObject("ASPImage.Image")
objImg.LoadImage(immagineDaMarchiare)
objImg.AddImageTransparent ritagliotemp,(MarchioX),(MarchioY),vbWhite
objImg.ImageFormat = 1
objImg.JPEGQuality = 100
objImg.FileName = Destinazione
objImg.SaveImage
Set objImg = Nothing
%>
[img]<%=srcMarchio%>[/img]
[img]<%=srcImmagineDaMarchiare%>[/img]
[img]<%=srcRitagliotemp%>[/img]
[img]<%=Destinazione%>[/img]