- 'aspjpeg版本:v1.801
- '将pic.jpg打上logo.png,可根据图片大小对水印图做适当调整
- filename="pic.jpg" '原始图片
- Set Jpeg1 = Server.CreateObject("Persits.Jpeg")
- Jpeg1.Open Server.MapPath(filename)
- iWidth=Jpeg1.OriginalWidth '图片的宽度
- iHeight=Jpeg1.OriginalHeight '图片的高度
- iiwidth=204 '水印图片的宽度
- iiheight=32 '水印图片的高度
- '水印图居左上
- jpeg1.Canvas.DrawPNG 5, 5,Server.MapPath("logo.png")
- '水印图居右上
- 'jpeg1.Canvas.DrawPNG iWidth-iiWidth-5, 5, Server.MapPath("logo.png")
- '水印图居左下
- 'jpeg1.Canvas.DrawPNG 5, iHeight-iiHeight-5, Server.MapPath("logo.png")
- '水印图居右下
- 'jpeg1.Canvas.DrawPNG iWidth-iiWidth-5, iHeight-iiHeight-5,Server.MapPath("logo.png")
- '水印图居中
- 'jpeg1.Canvas.DrawPNG iWidth/2-iiWidth/2, iHeight/2-iiHeight/2, Server.MapPath("logo.png")
- jpeg1.save Server.mappath(filename) '保存打上水印的图片将覆盖原图,亦可另存
- Set Jpeg1 = Nothing
asp利用aspjpeg给图片生成PNG透明水印
关键词：aspjpeg,图片,PNG,透明,水印 时间:2008年09月19日 星期五 阅读:606
2条记录访客评论
对象不支持此属性或方法: ''DrawPNG''
版本不够不支持该属性！