[td=1,1,89%]AspJpeg生成缩略图,并添加LOGO图片水印,可设置透明度和去掉背景色![td=1,1,11%] [td=2,1]<% '************************************************** '生成缩略图,并添加LOGO图片水印 '注意红色部分标志为水印图片的宽和水印图片的背景色,务必写正确,否则宽不对会出现斑点,色不对不能出现透明图片。这点往往是很多人失败的细节地方。 '************************************************** ' 建立图片对象 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& %>