游客

标题:z-blog v1.8 Walle Build 上传图片自动加文字、图片水印
正文:
z-blog 1.8没有给图片加水印的功能，这二天研究了一下aspjpeg，发现并不难，就修改了代码实现水印功能。　　1、下载aspjpeg组件，我用的是crack版本，地址自个找的。然后在服务器上安装，一路next,就安装完成了。　　2、aspjpeg组件需要设置文件夹权限。如下图进行权限设置，User完全控制权限！
　　3、修改c_system_lib.asp文件，在c_system_lib.asp文件找到UpLoad=True，在这个语句上加入以下代码：
ASP代码If CheckRegExp(LCase(FileName),"jpg|gif|bmp|png") Then
Dim Jpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open BlogPath & "/" & ZC_UPLOAD_DIRECTORY & "/" & FileName ' 图片所在位置
Dim aa
aa=Jpeg.Binary '将原始数据赋给aa
'=========加文字水印=================
Jpeg.Canvas.Font.Color = &Hfffffff '水印文字颜色
Jpeg.Canvas.Font.Family = "Arial" '字体
Jpeg.Canvas.Font.Bold = true '是否加粗
Jpeg.Canvas.Font.Size = 16 '字体大小
Jpeg.Canvas.Font.ShadowColor = &H000000 '阴影色彩
Jpeg.Canvas.Font.ShadowYOffset = 1
Jpeg.Canvas.Font.ShadowXOffset = 1
Jpeg.Canvas.Brush.Solid = True
Jpeg.Canvas.Font.Quality = 4 '输出质量
Jpeg.Canvas.Print Jpeg.OriginalWidth-120,
[<<][[1]][2][>>]

查看评论(0)
发表评论



首页