当前位置: 网学 > 编程文档 > ASP > 正文

Aspjpeg添加水印完整方法

来源:Http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 13/06/17
水印的图片的高度值(像素)。
\''//添加水印。
Set ogvbox = Server.CreateObject("Persits.Jpeg")
\''//读取要处理的原文件。
ogvbox.Open Trim(Server.MapPath(imagename))
If ogvbox.OriginalWidth<Cint(ImageWidth) or ogvbox.Originalheight<Cint(ImageHeight) Then
F_Viewname=""
Set ogvbox = Nothing
Exit Sub
Else
IF ImageMode<>"" and FileExt<>"gif" Then \''//如果将这行改为IF ImageMode<>"" Then则可给上传的GIF图片也加上水印,但是那些动画的GIF在加了水印以后就只剩第一桢了,根据你的需求酌情处理吧。

\''//关于修改字体及文字颜色的。
\''//ogvbox.Canvas.Font.Color = &H0000FF \''//水印文字的颜色,&H后面输入色彩值。
\''//ogvbox.Canvas.Font.Size = 18 \''//水印文字的大小。
\''//ogvbox.Canvas.Font.Family = "Arial" \''//水印文字的字体名称。
\''//ogvbox.Canvas.Font.ShadowColor = &H000000 \''//水印文字的阴影色彩。
\''//ogvbox.Canvas.Font.ShadowXoffset = 1 \''//水印文字阴影向右偏移的像素值,输入负值则向左偏移。
\''//ogvbox.Canvas.Font.ShadowYoffset = 1 \''//水印文字阴影向下偏移的像素值,输入负值则向右偏移。
\''//ogvbox.Canvas.Font.Quality = 3 \''//水印文字的清晰度,从0~4,变换不是很大,建议用2或3。
\''//ogvbox.Canvas.Font.Bold = True \''//水印文字是否为粗体,True=粗体 False=正常。

\''ogvbox.Canvas.Print 10, 10, ImageMode \''//水印文字的起始坐标(像素)。
ogvbox.Canvas.Pen.Color = &H000000 \''//增加水印后图片的边框色彩。
ogvbox.Canvas.Pen.Width = 1 \''//增加水印后图片的边框宽度。
ogvbox.Canvas.Brush.Solid = False \''//边框内是否填充颜色,你可以试试看值为True时的效果^o^
ogvbox.DrawImage ogvbox.width-186, ogvbox.height-52, Logobox, 0.5 \''//水印图片的起始坐标,我这里ogvbox.width-186, ogvbox.height-52,表示图片在右下角,因为我的图片宽是186,高是52,所以这样写,你可以根据自己的图片进行调整。0.5是透明度,我这里是半透明,1表示不透明,你也可以试试看0.7或者0.8的效果。
ogvbox.Canvas.Bar 0, 0, ogvbox.Width, ogvbox.Height \''//水印可用的范围。我这里表示左上角至右下角,即整张图片的任意为止都可加水印。
ogvbox.Save Server.MapPath(imagename) \''//根据以上参数生成增加水印后的图片文件。
End If
ogvbox.Width = ImageWidth
ogvbox.height = ImageHeight
\''ogvbox.height = ogvbox.Originalheight*ImageWidth\\ogvbox.OriginalWidth
ogvbox.Sharpen 1, 120
ogvbox.Save Server.MapPath(tempFilename) \''//生成增加水印后的图片的预览图片。
End If
Set Logobox=Nothing
\''//------Pollener.com AspJpeg组件的预览和水印生成------结束------
  • 下一篇资讯: 动态CSS,换肤技术
  • 网学推荐

    免费论文

    原创论文

    浏览:
    设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
    版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
    Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
    湘ICP备09003080号