最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
调用aspjpeg组件给图片logo加水印
时间：2022-06-30 11:07:32 编辑：袖梨 来源：一聚教程网
function water_jpeg(filenameB)
dim water_file,Logo
water_file = Server.MapPath("../logo_water.png")
filenameB = Server.MapPath(filenameB)
dim Jpeg
set Jpeg = Server.CreateObject("Persits.Jpeg")
if -2147221005=Err then
Response.write "没有这个组件，请安装!" '检查是否安装
AspJpeg组件
Response.end()
end if
Jpeg.Open (filenameB) '打开图片
if Jpeg.width >= 500 and Jpeg.height >= 200 then
if err.number then
Response.write"打开图片失败,请检查路径！"
Response.end()
end if
set Logo = Server.CreateObject("Persits.Jpeg")
Logo.Open water_file '打开水印图片
Jpeg.DrawImage Jpeg.width-300, Jpeg.height-90,
Logo,0.8,&HFFFFFF '参数顺序为：水平坐标，垂直坐标，logo地址，透明度，抽
取颜色（&H表示16进制）
Jpeg.Save filenameB '保存文件
set Logo = nothing
end if
set Jpeg = nothing
end function
本站原创www.111com.net
相关文章
- 无畏契约实圆准星代码分享 07-04
- Bitget怎么注册？Bitget交易所注册下载及交易认证教程 07-04
- 艾尔登法环黑夜君临发育路线规划推荐 07-04
- 如何用ps磨皮并保留质感 ps保留皮肤质感脸部磨皮教程 07-04
- jsp中文乱码问题的简单解决方法 07-04
- jsp 使用request为页面添加静态数据的实例 07-04