aspjpeg生成水印

<%
Set Jpeg = Server.CreateObject("Persits.Jpeg")
 Jpeg.Open Server.MapPath("abc.png")'//源图片位置
 Jpeg.Canvas.Font.Color =&Hb80911'//字体颜色
 Jpeg.Canvas.Font.Family = "文鼎CS大宋"'//字体
 Jpeg.Canvas.Font.Bold = false 'false,True是否加粗
 Jpeg.Canvas.Font.Size = 24'//字体大小
 Jpeg.Canvas.Font.Quality = 8'品质
 Jpeg.Canvas.Print 71,8,"要生成的文字1"

 Jpeg.Canvas.Font.Color =&H000000
 Jpeg.Canvas.Font.Family = "宋体"
 Jpeg.Canvas.Font.Size = "12"
 Jpeg.Canvas.Font.Quality = 4
 Jpeg.Canvas.Print 71,35,"要生成的文字2"
 
 Jpeg.Save Server.MapPath("p.jpg") '保存
Set Jpeg = Nothing

%>