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]![]()

Rispondi quotando