aspJpeg图片水印有杂点的完美解决方法
程序员文章站
2022-05-28 16:05:45
操作实现函数: 复制代码 代码如下: function addwater(n) set photo = server.createobject("persits.jpeg"...
操作实现函数:
function addwater(n)
set photo = server.createobject("persits.jpeg")
photopath = server.mappath(n)
photo.open photopath
photo.interpolation=1
photo.quality=100
iwidth=photo.originalwidth
iheight=photo.originalheight
iiwidth=214 '水印图片的宽度
iiheight=51 '水印图片的高度
photo.canvas.drawpng iwidth-iiwidth-5, iheight-iiheight-5,server.mappath("water.png") 'water.png即为水印图片
photo.save server.mappath(n) '输出图片
set photo = nothing
end function
调用方法:
<% call addwater(图片名称)%>
复制代码 代码如下:
function addwater(n)
set photo = server.createobject("persits.jpeg")
photopath = server.mappath(n)
photo.open photopath
photo.interpolation=1
photo.quality=100
iwidth=photo.originalwidth
iheight=photo.originalheight
iiwidth=214 '水印图片的宽度
iiheight=51 '水印图片的高度
photo.canvas.drawpng iwidth-iiwidth-5, iheight-iiheight-5,server.mappath("water.png") 'water.png即为水印图片
photo.save server.mappath(n) '输出图片
set photo = nothing
end function
调用方法:
<% call addwater(图片名称)%>
上一篇: 网上用的比较多的asp级联菜单效果代码
下一篇: ASP隐藏真实文件的下载功能实现代码