<% '建立实例 Set Jpeg = Server.CreateObject("Persits.Jpeg") Set Jpeg1 = Server.CreateObject("Persits.Jpeg") '打开要加水印的图片 Jpeg.Open Server.mappath("./Images/1.jpg") '透明图片水印图 Jpeg1.Open Server.mappath("./Images/2.gif") '合并图 Jpeg.Canvas.DrawImage 0,Jpeg.OriginalHeight/2-33,Jpeg1,0.6,&HFFFFFF ' 保存文件 Jpeg.Save Server.mappath("images/3.jpg") ' 注销对象 Set Jpeg = Nothing Set Jpeg1 = Nothing %>(鼠标移到代码上去,在代码的顶部会出现四个图标,第一个是查看源代码,第二个是复制代码,第三个是打印代码,第四个是帮助)
这样就行了。
需要注意一下,1.jpg是没有添加水印前的图片。2.gif透明的logo图片。3.jpg为最后生成的图片。