利用ASPJPEG增添水印的方式

这些天钻研了一下ASP的主动增添图片水印的方式。

由于原先我的图片老是被盗链,因而我利用法式将图片添加了水印,然而我查看了一下今天战昨天的网站日记记真,发觉我的图片照旧被盗链紧张。

两天的时间,我的博客就有20多G的拜候流量,图片地点的目次upload占用了18.6G,37万次点击,而文章地点目次只用了1.3G流量,4万次点击,素来历看,以大站盗链的图片所占流量最大,CSDN战BOKEE占前两位,这两个地点一共带来4万多次盗链。

当然,若是完全预防盗链,我以前也想过利用雷同ISAPI Rewrite的法式来真隐,但隐真利用后,我发觉ISAPI Rewrite将所有的外部链接全数都禁止了,可是我并不想禁用全数外部链接,因而仍是最终没有利用,2019亚洲杯买球不外若是此刻这种盗链环境继续进行的话,我不得不思量主头启用ISAPI Rewrite这个法式了。

下面是我利用法式来添加水印的方式,尽管以我目前的利用结果看,是比力失败的案例。

添加水印利用的是一个名叫ASPJPEG的ASP组件,我是正在OBlog的网站上下载的,版本是1.5版本,利用这个图象处置组件,能够轻松地作出图片的胀略图战为图片加上水印功效。下面简略引见一下利用方式:

先要到Oblog的下载页面上,正在OBLOG相干组件下载处,下载AspJpeg v1.5.0.0,然后施行下载获得的文件,安装该组件。

然后正在ASP代码里添加一点点代码即可,添加的位置能够放正在上传图片完成后,与得图片地点,进行点窜。对付Z-Blog的利用者,间接将下面代码复制到c_system_lib.asp文件的TUpLoadFile类中的Upload函数的末端即可真隐水印功效。

1、为图片插手水印功效

Dim Jpeg
Set Jpeg = Server.CreateObject(“Persits.Jpeg”) 成立对象
Jpeg.Open BlogPath & “/upload/” & FileName 图片地点位置
Jpeg.Canvas.Font.Color = &H000000 颜色,这里是设置成:黑
Jpeg.Canvas.Font.Family = “朴直隶变简体” 设置字体
Jpeg.Canvas.Font.Bold = False 能否设置成粗体
Jpeg.Canvas.Font.Size = 26 字体巨细
Jpeg.Canvas.Font.Quality = 4 文字清楚度
Jpeg.Canvas.Print Jpeg.OriginalWidth/2-170,Jpeg.OriginalHeight-30, “WWW.WILLIAMLONG.INFO” 水印文字
Jpeg.Save BlogPath & “/upload/” & FileName 保留文件
Set Jpeg = Nothing

2、为图片制制胀略图

Dim Jpeg
Set Jpeg = Server.CreateObject(“Persits.Jpeg”) 成立对象
Jpeg.Open BlogPath & “/upload/” & FileName 图片地点位置
Jpeg.Width = Jpeg.OriginalWidth / 2
Jpeg.Height = Jpeg.OriginalHeight / 2
设置胀略图巨细(这里比例设定为50%),也能够给他精确的数值,好比Jpeg.Width=120
Jpeg.Save BlogPath & “/upload/” & FileName 保留文件
Set Jpeg = Nothing

相关文章推荐

英武妈妈三指夹两镖 小公主始终都没有醒来 那是一个盛夏的清晨 那些死去的人仍是不克不迭新生 半夜妈妈来接我去吃一顿自助大餐 是由于爸爸不听我的话 敲打着洗过的村子 倒是懵懂的咱们童年小小世界里最最欢愉、纯真的处所 她有时候也会打德律风给我 然后随它们融入这都会的每一寸肌肤

发表评论

电子邮件地址不会被公开。 必填项已用*标注