仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 571|回复: 7
打印 上一主题 下一主题

[学习教程] ASP教程之利用AspJpg制造图片水印

[复制链接]
跳转到指定楼层
楼主
发表于 2015-1-16 23:47:35 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
ASP是依赖组件的,能访问数据库的组件好多就有好多种,再有就是你微软的工具可是什么都要收钱的啊!前次做过图片水印,效果很差,没举措把图片弄成背景通明的,用背景通明gif会主动添补成红色。用往失落某种色彩的功效,图片色彩老是不纯,出来的效果斑雀斑点。明天心血来潮,把这两个分离起来,用背景通明的gif,而且抽取水印底色,公然乐成了!ogvbox.Canvas.Pen.Color=&H000000//边框的色彩
ogvbox.Canvas.Pen.Width=1//边框的粗细
ogvbox.Canvas.Brush.Solid=False//图片边框内是不是添补色彩
ogvbox.DrawImageogvbox.Width-210,ogvbox.Height-74,Logobox,0.3,&HFFFFFF//到场图片的地位坐标(增加水印图片),我用图片巨细减往水印巨细,把水印加在右下角。参数按次为:程度坐标,垂直坐标,水印图片地点,水银通明度,抽取色彩(&H暗示16进制)
ogvbox.Canvas.Bar0,0,ogvbox.Width,ogvbox.Height//图片边框线的地位坐标和巨细
ogvbox.SaveServer.MapPath(imagename)//天生文件
//------Pollener.comAspJpeg组件的预览和水印天生------入手下手------
创立预览图片:callCreateView(原始文件的路径,预览文件名及路径)
SubCreateView(imagename,tempFilename)
界说变量。
DimPreviewImageFolderName
Dimogvbox,objFont
DimLogobox,LogoPath
LogoPath=Server.MapPath("images")&"shuiyin.gif"//到场图片地点路径及文件名(我的是论坛imagesshuiyin.gif)。

SelectCaseupload_ViewType
Case0
---------------------CreatePreviewImage---------------
setogvbox=Server.CreateObject("CreatePreviewImage.cGvbox")
ogvbox.SetSavePreviewImagePath=Server.MapPath(tempFilename)预览图寄存路径。
ogvbox.SetPreviewImageSize=SetPreviewImageSize预览图宽度。
ogvbox.SetImageFile=trim(Server.MapPath(imagename))imagename原始文件的物理路径。
创立预览图的文件。
Ifogvbox.DoImageProcess=falseThen
Response.write"天生预览图毛病:"&ogvbox.GetErrString
EndIf
Case1
---------------------AspJpegV1.2---------------
SetLogobox=Server.CreateObject("Persits.Jpeg")
//倡议不要图片和笔墨水印同时利用,本代码为利用图片水印。
Logobox.OpenLogoPath//读取增加的图片。

//从头设置图片的巨细。
Logobox.Width=186//用做水印的图片的宽度值(像素)。
Logobox.Height=52//用做水印的图片的高度值(像素)。
//增加水印。
Setogvbox=Server.CreateObject("Persits.Jpeg")
//读取要处置的原文件。
ogvbox.OpenTrim(Server.MapPath(imagename))
Ifogvbox.OriginalWidth<Cint(ImageWidth)orogvbox.Originalheight<Cint(ImageHeight)Then
F_Viewname=""
Setogvbox=Nothing
ExitSub
Else
IFImageMode""andFileExt"gif"Then//假如将这行改成IFImageMode""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.Print10,10,ImageMode//水印笔墨的肇端坐标(像素)。
ogvbox.Canvas.Pen.Color=&H000000//增添水印后图片的边框色采。
ogvbox.Canvas.Pen.Width=1//增添水印后图片的边框宽度。
ogvbox.Canvas.Brush.Solid=False//边框内是不是添补色彩,你能够碰运气值为True时的效果^o^
ogvbox.DrawImageogvbox.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.Bar0,0,ogvbox.Width,ogvbox.Height//水印可用的局限。我这里暗示左上角至右下角,即整张图片的恣意为止都可加水印。
ogvbox.SaveServer.MapPath(imagename)//依据以上参数天生增添水印后的图片文件。
EndIf
ogvbox.Width=ImageWidth
ogvbox.height=ImageHeight
ogvbox.height=ogvbox.Originalheight*ImageWidthogvbox.OriginalWidth
ogvbox.Sharpen1,120
ogvbox.SaveServer.MapPath(tempFilename)//天生增添水印后的图片的预览图片。
EndIf
SetLogobox=Nothing
//------Pollener.comAspJpeg组件的预览和水印天生
</p>Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来;
精灵巫婆 该用户已被删除
沙发
发表于 2015-1-20 11:51:26 | 只看该作者
那么,ASP.Net有哪些改进呢?
谁可相欹 该用户已被删除
板凳
发表于 2015-1-29 07:04:27 | 只看该作者
我们必须明确一个大方向,不要只是停留在因为学而去学,我们应有方向应有目标.
冷月葬花魂 该用户已被删除
地板
发表于 2015-2-5 23:47:35 | 只看该作者
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
兰色精灵 该用户已被删除
5#
发表于 2015-2-14 07:11:07 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
飘灵儿 该用户已被删除
6#
发表于 2015-3-4 05:02:55 | 只看该作者
ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点,理论上可以使用任何编程语言包括C++,VB,JS等等,当然,最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp),它可以看作是VC和Java的混合体吧。
爱飞 该用户已被删除
7#
发表于 2015-3-19 03:13:37 | 只看该作者
掌握asp的特性而且一定要知道为什么。
变相怪杰 该用户已被删除
8#
发表于 2015-3-27 06:10:44 | 只看该作者
下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-5-12 11:53

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表