[td=1,1,89%]AspJpeg生成縮略圖,并添加LOGO圖片水印,可設置透明度和去掉背景色![td=1,1,11%] [td=2,1]<% '************************************************** '生成縮略圖,并添加LOGO圖片水印 '注意紅色部分標志為水印圖片的寬和水印圖片的背景色,務必寫正確,否則寬不對會出現(xiàn)斑點,色不對不能出現(xiàn)透明圖片。這點往往是很多人失敗的細節(jié)地方。 '************************************************** ' 建立圖片對象 Set Photo = Server.createObject("Persits.Jpeg") ' 圖片位置 PhotoPath = Server.MapPath("UploadFiles") & "a.jpg" ' 打開圖片 Photo.Open PhotoPath ' 建立LOGO對象 Set Logo = Server.createObject("Persits.Jpeg") ' LOGO位置 LogoPath = Server.MapPath("images") & "Logo.gif" ' 打開LOGO Logo.Open LogoPath ' 設置LOGO大小 Logo.Width = 90 Logo.Height = Logo.Width * Logo.OriginalHeight / Logo.OriginalWidth ' 縮略圖大小 Photo.Width = 180 Photo.Height = 130 ' 設置圖片水印位置,LOGO 透明度,抽取 LOGO 背景顏色(白色),并刪除 Photo.DrawImage Photo.Width-95, Photo.Height-22, Logo, 0.65, &HFFFFFF ' 保存文件 Photo.Save Server.MapPath("UploadFiles") & "a2.jpg" ' 注銷對象 Set Photo& %>