当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > Asp组件高级入门与精通系列之三

ASP.NET
.net开发实例:绑定到ADO.NET数据源
vb.net中应用 ArrayList 实例
用.net 处理xmlHttp发送异步请求
编写ASP.NET应用程序的十大技巧
完全不使用配置文件构建和使用WCF服务
VB.net2008精彩实例,窗体应用技巧
VB.Net实现Web Service的基础
实用技巧:.Net框架类库中定时器类的使用
ASP.NET MVC:实现我们自己的视图引擎
基于ASP.NET MVC框架开发Web论坛应用程序
用VB.net2008打造你的影音播放器
如何使用.NET实现断点续传功能
如何用.NET技术在线生成网站LOGO
挖掘ADO.NET Entity框架的性能
编写ASP.NET应用程序的十大技巧 (1)
Asp.NET大文件上传开发总结集合
.net开发:如何为程式码加上行号
ASP.NET 中整合JavaScript技巧
浅谈.NET中加密和解密的实现方法
浅析ASP.NET 2.0 Client Callback

ASP.NET 中的 Asp组件高级入门与精通系列之三


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 172 ::
收藏到网摘: n/a


asp中测试
<%'生成缩略On Error resume nextset obj=server.CreateObject( flysoft.image")obj.LoadFromFile=server.MapPath("./love.bmp") '原始图片obj.Rate =0.5 '缩放比率 其中<1为缩小,>1为放大obj.OutputImgFile server.MapPath("./lovethumbmail_bmp.jpg") '生成结果图片if err.number<>0 thenresponse.write Err.Descriptionend if
%>
'生成水印 <%'生成文字水印On Error resume nextset obj=server.CreateObject( flysoft.image")obj.Rate = 0.5 '缩放比率 其中<1为缩小,>1为放大obj.MarkRotate = 25 '旋转角度obj.MaskText = "浪漫的情人节 祝天下有情人终成眷属" '要显示的文字obj.MaskTextFontName = "华文彩云" '字体设置obj.LoadFromFile =server.MapPath("./rose.bmp") '原始图片obj.OutputTxtImgFile server.MapPath("./rose_txtimg.jpg") , vbBlack, 20, 50, 0, 400 '参数分别代表:生成的图片,字体的颜色,字体的宽度,字体的高度,最后两个参数指文字相对于原始图片左上角的坐标位置if err.number<>0 thenresponse.write Err.Descriptionend if%>


<%'生成图片水印On Error resume nextset obj=server.CreateObject( flysoft.image")obj.Rate = 0.5 '缩放比率 其中<1为缩小,>1为放大obj.LoadFromFile = server.MapPath("./love.JPG") '原始图片obj.LoadFromMaskImgFile = server.MapPath("./rose_mark.bmp") '水印图片obj.OutputMarkImgFile server.MapPath("./lovemark.jpg"), 350, 350, 100 '生成结果图片 500,500为水印图片相对于原始图片左上角的坐标位置 最后的100是透明度 (0最透明,100不透明)if err.number<>0 thenresponse.write Err.Descriptionend if%>
同时还作了性能测试
作者的机器配置是赛扬850,内存512机器上生成50张图片(缩略,文字水印,图片水印)用了7秒机器配置是p4 2.4,内存1G 机器上生成50张图片(缩略,文字水印,图片水印)用了2秒
可以下载www.applevb.com/flysoft.rar和http://www.5ivb.net/