乐观 发表于 2015-1-16 22:09:43

ASP教程之缩略图水印组件wsImage2.0

ASP是依赖组件的,能访问数据库的组件好多就有好多种,再有就是你微软的工具可是什么都要收钱的啊!缩略图功效特性:
1、导进多种图片格局,今朝撑持BMP,JPG,GIF等。
2、输入JPG格局缩略图,自界说输入紧缩参数
3、高效力天生缩略图,4种导出体例,便利天真。
4、图片扩充功效,自界说扩充地区。
5、能购猎取图片尺寸。
6、撑持笔墨水印,可自界说字体、色彩、扭转角度等。
7、撑持图片水印,图片水引撑持通明度。
8、功能更不乱,损耗体系资本少。

示例代码(以ASP为例)
•猎取图片巨细信息
<%
setobj=server.CreateObject("wsImage.Resize")
obj.LoadSoucePicserver.mappath("25.jpg")
obj.GetSourceInfoiWidth,iHeight
response.write"图片宽度:"&iWidth&"<br>"
response.write"图片高度:"&iHeight&"<br>"
strError=obj.errorinfo
ifstrError""then
response.writeobj.errorinfo
endif
obj.free
setobj=nothing
%>

•天生缩略图
<%
setobj=server.CreateObject("wsImage.Resize")
obj.LoadSoucePicserver.mappath("25.jpg")
obj.Quality=75
obj.OutputSpicserver.mappath("25_s.jpg"),0.5,0.5,3
strError=obj.errorinfo
ifstrError""then
response.writeobj.errorinfo
endif
obj.free
setobj=nothing
%>

原始图片25.jpg宽:400高:298巨细:77K

发生的缩略5_s.jpg宽:200高:149巨细:6K
申明:
发生缩略图共有四种导出体例:
(1).
obj.OutputSpicserver.mappath("25_s.jpg"),200,150,0
200为输入宽,150为输入高,这类输入情势为强迫输入宽高,大概引发图片变形。
(2).
obj.OutputSpicserver.mappath("25_s.jpg"),200,0,1
以200为输入宽,输入高将随比列缩放。
(3).
obj.OutputSpicserver.mappath("25_s.jpg"),0,200,2
以200为输入高,输入宽将随比列缩放。
(4).
obj.OutputSpicserver.mappath("25_s.jpg"),0.5,0.5,3
第一个0.5暗示天生的缩略图是原始图片宽的一半,即暗示宽减少比例。
第二个0.5暗示天生的缩略图是原始图片高的一半,即暗示高减少比例。
宽高的减少比例分歧意味着将对原始图片举行比例减少。宽高的缩放比比方果年夜于1,则对原始图片举行缩小。
从下面四种发生缩略图的体例能够看出最初一个参数为第几种输入情势。

•扩充图片
<%
setobj=server.CreateObject("wsImage.Resize")
obj.LoadSoucePicserver.mappath("25.jpg")
obj.Quality=75
obj.cropImageserver.mappath("25_crop.jpg"),100,10,200,200
strError=obj.errorinfo
ifstrError""then
response.writeobj.errorinfo
endif
obj.free
setobj=nothing
%>

原始图片cropSource.jpg宽:400高:298巨细:77K

发生的扩充5_crop.jpg宽:200高:200巨细:7K
申明:
cropImage办法中参数100暗示入手下手扩充的出发点离原始图片右边的间隔,10暗示入手下手扩充的出发点离原始图片顶边的间隔,后两个参数暗示要扩充的宽度和高度。

•增加笔墨水印
<%
setobj=server.CreateObject("wsImage.Resize")
obj.LoadSoucePicserver.mappath("25.jpg")
obj.Quality=75
obj.TxtMarkFont="汉文彩云"
obj.TxtMarkBond=false
obj.MarkRotate=25
obj.TxtMarkHeight=25
obj.AddTxtMarkserver.mappath("txtMark.jpg"),"波浪事情室",&H00FF00&,10,70
strError=obj.errorinfo
ifstrError""then
response.writeobj.errorinfo
endif
obj.free
setobj=nothing
%>

发生的笔墨水印图txtMark.jpg巨细:7K
申明:
LoadSoucePic装载源图
obj.TxtMarkFont设置水印笔墨字体
obj.TxtMarkBond设置水印笔墨的粗细
obj.MarkRotate=25水引笔墨的扭转角度
obj.TxtMarkHeight=25水引笔墨的高度
obj.AddTxtMark办法中,参数&H00FF00&为水印笔墨的色彩代码,&H暗示十六进制,10,70为输入笔墨相对图片左上角的坐标地位

•增加图片水印
<%
setobj=server.CreateObject("wsImage.Resize")
obj.LoadSoucePicserver.mappath("25.jpg")
obj.LoadImgMarkPicserver.mappath("blend.bmp")
obj.Quality=75
obj.AddImgMarkserver.mappath("imgMark.jpg"),315,220,&hFFFFFF,70
strError=obj.errorinfo
ifstrError""then
response.writeobj.errorinfo
endif
obj.free
setobj=nothing
%>

发生的图片水印图imgMark.jpg巨细:7K
申明:
obj.LoadSoucePic装载源图
obj.LoadImgMarkPic装载水印图片
obj.AddImgMark315,220为水印图片在源图的坐标地位(相对左上角),参数70为不通明度。

•猎取版权信息
<%
setobj=server.CreateObject("wsImage.Resize")
response.writeobj.CopyRight
obj.free
setobj=nothing
%>

利用办法:
下载DLL到当地,使用regsvr32dll路径,注册,假如你的呆板上上装载有本组件的低版本,请先御载,然后注册最新版本。Access是一种桌面数据库,只适合数据量少的应用,在处理少量数据和单机访问的数据库时是很好的,效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限,如果数据达到100M左右,很容易造成服务器iis假死,或者消耗掉服务器的内存导致服务器崩溃。

透明 发表于 2015-1-18 21:19:14

ASP(ActiveServerPages)是Microsfot公司1996年11月推出的WEB应用程序开发技术,它既不是一种程序语言,也不是一种开发工具,而是一种技术框架,不须使用微软的产品就能编写它的代码,能产生和执行动态、交互式、高效率的站占服务器的应用程序。

兰色精灵 发表于 2015-1-24 12:42:17

先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习

海妖 发表于 2015-2-1 15:17:21

ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点,理论上可以使用任何编程语言包括C++,VB,JS等等,当然,最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp),它可以看作是VC和Java的混合体吧。

若相依 发表于 2015-2-7 07:26:49

在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。

柔情似水 发表于 2015-2-21 01:59:38

你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。

莫相离 发表于 2015-3-6 19:41:38

虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。

蒙在股里 发表于 2015-3-13 07:08:36

那么,ASP.Net有哪些改进呢?

admin 发表于 2015-3-20 16:14:22

封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
页: [1]
查看完整版本: ASP教程之缩略图水印组件wsImage2.0