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