添加图片水印设置透明度问题

来源：百度知道编辑：UC知道时间：2024/05/10 17:46:12

<%
Set ImageObj = Server.CreateObject("Persits.Jpeg")
ImageObj.Open Trim(Server.MapPath(savepath&FileName))
Set Logobox = Server.CreateObject("Persits.Jpeg")
'//读取添加的图片
Logobox.Open Server.MapPath("logobg.gif")
'Logobox.Width =Logobox.originalwidth '// 加入图片的原宽度
'Logobox.Height =Logobox.originalheight'// 加入图片的原高度
'x=cint((ImageObj.originalwidth-logobox.Width)/2)
'y=cint((ImageObj.originalheight-logobox.Height)/2)
Logobox.Height=30
Logobox.Width=imageObj.originalwidth
x=0
y=cint((ImageObj.originalheight-logobox.Height)/2)
ImageObj.DrawImage x, y, Logobox,1,0.60,&Hffffff'// 加入图片的位置价坐标（添加水印图片）

'=========
logobox.open Server.MapPath("logo.jpg")
Logobox.Width =Logobox.originalwidth '// 加入图片的原宽度
Logobox.Height =Logobox.originalheight'// 加入图片的原高度
x=cint((ImageObj.originalwidth-logo

ImageObj.DrawImage x, y, Logobox,1,0.60,&Hffffff
不懂你咋写的
我写的是
ImageObj.DrawImage X,Y,SmPic,0.5,&HFFFFFF
X-X坐标
Y-Y坐标
SmPic-水印图片路径如11.gif
0.5-透明度
&HFFFFFF-要去除的水印图片的背景色

你应该是背景色这里设置错了
我的11.gif背景色为白色
所以在添加水印的时候先把水印的白色背景&HFFFFFF去除变成透明的再把水印图片和目标图片合并在一起

就达到你想要的那种效果还不行的话加msn xjzb@hotmail.com

ASP给图片加水印是需要组件的...常用的有aspjpeg软件和中国人自己开发的wsImage软件，可以上网搜索下载这两个软件，推荐使用咱们中国人自己开发的wsImage，毕竟是中文版，容易操作．
注册组件的方法:
命令提示符下输入"regsvr32 [Dll路径]" 就可以了．
图片添加水印无非就是获得图片大小,然后把水印写上去..ASP代码只是起个控制组件的作用.用代码来说明一切吧.
一:获得图片大小(这里是用象素值表示的.学PhotoShop的朋友都应该明白)
<%
set obj=server.CreateObject("wsImage.Resize") ''调用组件
obj.LoadSoucePic server.mappath("25.jpg") ''打开图片,图片名字是25.jpg
obj.GetSourceInfo iWidth,iHeight
response.write "图片宽度:" & iWidth & "<br>" ''获得图片宽度
response.write "图片高度:" & iHeight & "&l

添加图片水印设置透明度问题上传图片时自动添加水印水印如何设置图片的透明度批量添加水印问题！ flash设置图片透明度工具在哪里？如何批量给图片添加水印？如何给word中的图片添加水印如何给图片批量添加水印? 网站后台的图片水印设置是什么? 求一个能给图片批量添加水印的软件