仓酷云

标题: ASP网页设计AspJpeg2.0组件教程完全版 aspjpeg教程... [打印本页]

作者: 兰色精灵 时间: 2015-1-16 22:04
标题: ASP网页设计AspJpeg2.0组件教程完全版 aspjpeg教程...
我想详细了解ASP整站代码与PSP整站代码有什么优缺点，那个更好，更安全，更用容易维护，和管理。。。AspJpeg是一款功效壮大的基于MicrosoftIIS情况的图片处置组件，收集上对其举行具体和深切先容的中文文章其实不多，即便有一样平常也只是扳连到图片缩略图和图片水印，这与其为英文版本有着亲切的干系。AspJpeg最新版本下载、更多例子及具体的在线工具参考手册:
http://www.aspjpeg.com/
1、甚么是AspJpeg？
AspJpeg是一款功效壮大的基于MicrosoftIIS情况的图片处置组件，收集上对其举行具体和深切先容的中文文章其实不多，即便有一样平常也只是扳连到图片缩略图和图片水印，这与其为英文版本有着亲切的干系。
AspJpeg可使用很少的代码在您的ASP/ASP.Net使用程序上静态的创立高质量的缩略图像，撑持的图像格局有：JPEG,GIF,BMP,TIFF,PNG
AspJpeg能够做到：
图片兼并
图片切割
图像殊效
数据库撑持
考证码手艺
天生缩略图片
天生水印图片
GIF静态图片创立、修正
...
2、AspJpeg功效择要

*撑持JPEG,GIF,BMP,TIFF和PNG格局图片来历
*图片能够来历于磁盘、内存、大概纪录集（数据库）
*调剂后的图片能够保留到磁盘、内存、大概HTTP流
*撑持三种变动巨细算法:NearestNeighbor、Bilinear、Bicubic
*能够在图片之上增加丹青大概笔墨,撑持TrueType和Type1字体
*词语主动换行，文本对齐体例：左、右、居中、两头,图片扭转
*撑持画中画
*剪切，翻转，扭转，锐化，灰度调治
*能够调治紧缩比率，以失掉最好输入效果和巨细
*从JPEG图象中提取EXIF和的IPTC元数据
*在变动图片的时分保留元数据
*IPTC元数据的增加和编纂
*CMYK到RGB转换
*棕褐色滤境(老化相片款式)
*从图像中对恣意象素举行读/写存取
*PNGAlpha通道撑持
*GIF通明撑持
*亮度，对照度和饱和度的调剂
*GIF输入，通明度和动画保留
*JPEG到GIF格局转换
3、AspJpeg体系需求
WindowsNT/2000/XP/2003/Vista,and
IIS4.0+andASP/ASP.NET,or
VisualBasic5.0+,or
VisualC++5.0+,or
anydevelopmentenvironmentsupportingCOM.
4、AspJpeg安装
全新安装：

*到官方网站下载30天全功效评价版本,分32位版(aspjpeg.exe,停止以后版本为2.0,文件巨细:1.75M,最初更新日期:2008.01.28)和64位版(aspjpeg64.exe,停止以后版本为2.0,文件巨细:1.35M,最初更新日期:2008.02.25,不包括文档)
*实行下载的aspjpeg.exe或aspjpeg64.exe
*在提醒输出序列号的时分输出无效的序列号便可,不输出即代表将利用30天评价版本,能够变动注册内外的RegKey举行注册
*假如安装地位磁盘格局为NTFS，则大概呈现会见权限成绩，需手工设置匿名用户有读取aspjpeg.exe的权限。
更新安装：
假如之前有装过别的版本的AspJpeg组件，则必要先卸载本来的组件，再举行新版本的安装。
先中断IIS：NetStopiisadmin/y
卸载旧版组件：regsvr32/uPath/aspjpeg.dl（Path为安装路径）
重启IIS：NetStartw3svc
然后再举行全新安装或复制Bin目次下的AspJpeg.dll文件到安装目次举行手工安装：
程序代码程序代码
regsvr32Path/aspjpeg.dll（Path为安装路径）

假如在一般安装过程当中没有输出序列号或更新安装则必要在注册表中到场以下项举行注册，为便利起见您能够间接将以下代码保留为key.reg文档并导进注册表：
程序代码程序代码
WindowsRegistryEditorVersion5.00
[HKEY_LOCAL_MACHINESoftwarePersitsSoftwareAspJpegRegKey]
@="17361-38566-42221"

别的,能够经由过程代码层由ASPJpeg工具的RegKey属性来设定注册码,以下:
viewplaincopytoclipboardprint?
1.SetJpeg=Server.CreateObject("Persits.Jpeg")
2.Jpeg.RegKey="12345-67890-12345"
3....
SetJpeg=Server.CreateObject("Persits.Jpeg")
Jpeg.RegKey="12345-67890-12345"
...

.RegKey指定注册表,假如这个属性没有设置AspJpeg组件将在体系注册表中寻觅一个指定的注册码.
5、怎样创立一个AspJpeg实例？
程序代码程序代码
SetJpeg=Server.CreateObject("Persits.Jpeg")

6、怎样检察到期工夫（是不是注册乐成）？
viewplaincopytoclipboardprint?
1.SetJpeg=Server.CreateObject("Persits.Jpeg")
2.Response.WriteJpeg.Expires
SetJpeg=Server.CreateObject("Persits.Jpeg")
Response.WriteJpeg.Expires

假如这个属性前往9/9/9999它意味着在利用一个永世的注册码。
不然为：安装日期加1个月刻日
7、怎样用AspJpeg组件创立图片缩略图？
viewplaincopytoclipboardprint?
1.<%
2.SetJpeg=Server.CreateObject("Persits.Jpeg")创立ASPJpeg工具实例
3.Path=Server.MapPath("../images/apple.jpg")设置图片路径
4.Jpeg.OpenPath翻开图片
5.调剂宽度和高度为本来的50%
6.Jpeg.Width=Jpeg.OriginalWidth/2
7.Jpeg.Height=Jpeg.OriginalHeight/2
8.Jpeg.SaveServer.MapPath("apple_small.jpg")保留图片到磁盘
9.Jpeg.Close:SetJpeg=Nothing
10.%>
<%
SetJpeg=Server.CreateObject("Persits.Jpeg")创立ASPJpeg工具实例
Path=Server.MapPath("../images/apple.jpg")设置图片路径
Jpeg.OpenPath翻开图片
调剂宽度和高度为本来的50%
Jpeg.Width=Jpeg.OriginalWidth/2
Jpeg.Height=Jpeg.OriginalHeight/2
Jpeg.SaveServer.MapPath("apple_small.jpg")保留图片到磁盘
Jpeg.Close:SetJpeg=Nothing
%>
8、怎样用AspJpeg组件创立图片水印？
viewplaincopytoclipboardprint?
1.<%
2.SetJpeg=Server.CreateObject("Persits.Jpeg")
3.Jpeg.OpenServer.MapPath("2.jpg")
4.入手下手写笔墨
5.Jpeg.Canvas.Font.Color=&000000red色彩
6.Jpeg.Canvas.Font.Family="CourierNew"字体
7.Jpeg.Canvas.Font.Bold=True是不是加粗
8.Jpeg.Canvas.Print10,10,"Copyright(c)XYZ,Inc."
9.打印坐标x打印坐标y必要打印的字符
10.以下是对图片举行边框处置
11.Jpeg.Canvas.Pen.Color=&H000000black色彩
12.Jpeg.Canvas.Pen.Width=2画笔宽度
13.Jpeg.Canvas.Brush.Solid=False是不是加粗处置
14.Jpeg.Canvas.Bar1,1,Jpeg.Width,Jpeg.Height
15.肇端X坐标肇端Y坐标输出长度输出高度
16.Jpeg.SaveServer.MapPath("1.jpg")保留
17.%>
<%
SetJpeg=Server.CreateObject("Persits.Jpeg")
Jpeg.OpenServer.MapPath("2.jpg")
入手下手写笔墨
Jpeg.Canvas.Font.Color=&000000red色彩
Jpeg.Canvas.Font.Family="CourierNew"字体
Jpeg.Canvas.Font.Bold=True是不是加粗
Jpeg.Canvas.Print10,10,"Copyright(c)XYZ,Inc."
打印坐标x打印坐标y必要打印的字符
以下是对图片举行边框处置
Jpeg.Canvas.Pen.Color=&H000000black色彩
Jpeg.Canvas.Pen.Width=2画笔宽度
Jpeg.Canvas.Brush.Solid=False是不是加粗处置
Jpeg.Canvas.Bar1,1,Jpeg.Width,Jpeg.Height
肇端X坐标肇端Y坐标输出长度输出高度
Jpeg.SaveServer.MapPath("1.jpg")保留
%>
9、怎样用AspJpeg组件举行图片兼并？
AspJpeg1.3+enablesyoutoplaceimagesontopofeachotherviathemethodDrawImage.Tousethismethod,youmustcreatetwoinstancesoftheAspJpegobjectsandpopulatebothofthemwithimagesviacallstoOpen(orOpenBinary).WhencallingCanvas.DrawImage,the2ndinstanceofAspJpegispassedasanargumenttothismethod,alongwiththeXandYoffsets(inpixels):
利用该办法，您必须创立两个AspJpeg实例工具
viewplaincopytoclipboardprint?
1.<%
2.SetJpeg1=Server.CreateObject("Persits.Jpeg")
3.SetJpeg2=Server.CreateObject("Persits.Jpeg")
4.Jpeg1.OpenServer.MapPath("t.jpg")
5.Jpeg2.OpenServer.MapPath("t1.jpg")
6.Jpeg1.Canvas.DrawImage10,10,Jpeg2optionalargumentsomitted
7.jpeg1.saveServer.mappath("tt.jpg")
8.%>
<%
SetJpeg1=Server.CreateObject("Persits.Jpeg")
SetJpeg2=Server.CreateObject("Persits.Jpeg")
Jpeg1.OpenServer.MapPath("t.jpg")
Jpeg2.OpenServer.MapPath("t1.jpg")
Jpeg1.Canvas.DrawImage10,10,Jpeg2optionalargumentsomitted
jpeg1.saveServer.mappath("tt.jpg")
%>
10、怎样用AspJpeg组件举行图片切割？
AspJpeg1.1+isalsocapableofcuttingoffedgesfrom,orcropping,theresultantthumbnailsviathemethodCrop(x0,y0,x1,y1).Thesizeofthecroppedimageisspecifiedbythecoordinatesoftheupper-leftandlower-rightcornerswithintheresultantthumbnail,nottheoriginallargeimage.
viewplaincopytoclipboardprint?
1.<%
2.SetJpeg=Server.CreateObject("Persits.Jpeg")
3.Jpeg.OpenServer.MapPath("t.jpg")
4.jpeg.Crop20,30,jpeg.Width-20,jpeg.Height-10
5.jpeg.saveServer.mappath("tt.jpg")
6.Response.write("")
%>
11、怎样用AspJpeg组件创立考证码？
创立考证码道理上和创立水印差未几。
viewplaincopytoclipboardprint?
1.<%
2.functionmake_randomize(max_len,w_n)max_len天生长度，w_n：0大概包括字母，1：只为数字
3.randomize
4.forintcounter=1tomax_len
5.whatnext=int((1-0+1)*rnd+w_n)
6.ifwhatnext=0then
7.upper=122
8.lower=97
9.else
10.upper=57
11.lower=48
12.endif
13.strnewpass=strnewpass&chr(int((upper-lower+1)*rnd)+lower)
14.next
15.make_randomize=strnewpass
16.endfunction
17.
18.天生平安码的图片。
19.random_num=make_randomize(4,1)天生4位数字的平安码
20.session("random_num")=random_num为么挪用session，没有session的平安码是完整没成心义的。呵呵.
21.
22.SetJpeg=Server.CreateObject("Persits.Jpeg")挪用组件
23.Jpeg.OpenServer.MapPath("t.jpg")翻开筹办的图片
24.Jpeg.Canvas.Font.Color=&HFFFFFF
25.Jpeg.Canvas.Font.Family="ArialBlack"
26.Jpeg.Canvas.Font.Bold=false
27.Jpeg.Canvas.PrintText0,-2,random_num
28.jpeg.saveServer.MapPath("tt.jpg")保留
29.%>
30.
12、怎样让AspJpeg组件增援数据库？
图片存进数据库只能以二进制数据保留，这里即使用AspJpeg的Binary办法，上面以两个AspJpeg用户手册上的代码为例，详细请参考AspJpeg用户手册：
viewplaincopytoclipboardprint?
1.从内存中翻开图像
2.OpeningImagesfromMemory
3.<%UsingADO,opendatabasewithanimageblob
4.strConnect="DRIVER={MicrosoftAccessDriver(*.mdb)};DBQ="&Server.MapPath("../db/aspjpeg.mdb")
5.Setrs=Server.CreateObject("adodb.recordset")
6.SQL="selectimage_blobfromimages2whereid="&Request("id")
7.rs.OpenSQL,strConnect,1,3
8.SetJpeg=Server.CreateObject("Persits.Jpeg")
9.Openimagedirectlyfromrecordset
10.Jpeg.OpenBinaryrs("image_blob").Value
11.Resize
12.jpeg.Width=Request("Width")
13.Setnewheight,preserveoriginalaspectratio
14.jpeg.Height=jpeg.OriginalHeight*jpeg.Width/jpeg.OriginalWidth
15.Jpeg.SendBinary
16.rs.Close
17.%>
18.
19.输入到内存
20.<%
21....
22.Setrs=Server.CreateObject("adodb.recordset")
23.rs.Open"images",strConnect,1,3
24.rs.AddNew
25.rs("image_blob").Value=Jpeg.Binary
26.rs.Update
27....
28.%>
从内存中翻开图像
OpeningImagesfromMemory
<%UsingADO,opendatabasewithanimageblob
strConnect="DRIVER={MicrosoftAccessDriver(*.mdb)};DBQ="&Server.MapPath("../db/aspjpeg.mdb")
Setrs=Server.CreateObject("adodb.recordset")
SQL="selectimage_blobfromimages2whereid="&Request("id")
rs.OpenSQL,strConnect,1,3
SetJpeg=Server.CreateObject("Persits.Jpeg")
Openimagedirectlyfromrecordset
Jpeg.OpenBinaryrs("image_blob").Value
Resize
jpeg.Width=Request("Width")
Setnewheight,preserveoriginalaspectratio
jpeg.Height=jpeg.OriginalHeight*jpeg.Width/jpeg.OriginalWidth
Jpeg.SendBinary
rs.Close
%>
输入到内存
<%
...
Setrs=Server.CreateObject("adodb.recordset")
rs.Open"images",strConnect,1,3
rs.AddNew
rs("image_blob").Value=Jpeg.Binary
rs.Update
...
%>
13、AspJpeg组件创立GIF动画？
viewplaincopytoclipboardprint?
1.<%
2.SetJpeg=Server.CreateObject("Persits.Jpeg")
3.SetGif=Jpeg.GifObtainGIFmanagementobject
4.
5.MarketShare=6initialmarketshareofhypotheticalXYZcompany
6.createa5-frameanimatedgif
7.Fori=1to5
8.Gif.AddFrame300,200,0,0
9.
10.Gif.PenColor=10
11.Gif.BrushColor=10
12.Gif.DrawBar0,0,300,200
13.
14.Gif.PenColor=201
15.Gif.FontFamily="Courier"
16.Gif.PrintText18,15,"XYZ,Inc.MarketShare"
17.Gif.PrintText120,50,2002+i
18.
19.Drawpiechart
20.Gif.PenColor=0
21.Gif.BrushColor=30
22.Gif.DrawPie150,130,50,0,MarketShare*360/100
23.Gif.BrushColor=20
24.Gif.DrawPie150,130,50,MarketShare*360/100,360
25.
26.Gif.PenColor=210
27.Gif.PrintText200,100,MarketShare&"%"
28.MarketShare=MarketShare*2-3marketsharealmostdoubleseveryyear!
29.increasedelayonthelastframe
30.ifi=5thenGif.Delay=3003sec
31.Next
32.Save
33.Gif.SaveServer.MapPath("chart.gif")
34.%>
35.<IMGSRC="chart.gif">
缺点：正版成本价格贵（盗版就不说了）、不够安全，大多数服务器用windows系统，没有linux安全

作者: 精灵巫婆 时间: 2015-1-18 19:56
Session:这个存储跟客户端会话过程的数据，默认20分钟失效

作者: 活着的死人 时间: 2015-1-27 06:48
用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

作者: 灵魂腐蚀 时间: 2015-2-5 04:57
我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。

作者: 金色的骷髅 时间: 2015-2-11 05:34
Application:这个存储服务端的数据，如果不清除，会直到web应用程序结束才清除(例如重启站点)

作者: 谁可相欹 时间: 2015-3-1 22:44
ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。

作者: 只想知道 时间: 2015-3-11 01:15
完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

作者: 柔情似水 时间: 2015-3-17 18:08
ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。　　因为ASP脚本语言非常简单，因此其代码也简单易懂，结合HTML代码，可快速地完成网站的应用程序。

作者: 老尸 时间: 2015-3-24 18:56
封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。

欢迎光临仓酷云 (http://ckuyun.com/)