asp实现图片加水印代码

asp实现图片加水印代码,要装aspjepg组件
<%
   set jpeg1=server.createobject("persits.jpeg")
   jpeg1.open server.mappath("1.jpg") '原图

   '添加水印
   set jpeg2=server.createobject("persits.jpeg")
   jpeg2.open server.mappath("watermark.gif")  '水印图

   jpeg1.canvas.drawimage 0,0,jpeg2,0.7,&HFFFFFF

   '坐标x,坐标y,水印图,透明度,去白底

   jpeg1.save server.mappath("2.jpg")  '添加水印后

   set jpeg1=nothing
   set jpeg2=nothing
%>