繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > Asp组件高级入门与精通系列之三
- ASP.NET
- 调用另外一个同名的重载函数漏掉括号出现的严重问题
- DataGrid模板列应用：在DataGrid中用CheckBox控制TextBox的Enabled属性
- 使用存储过程的一个小例子
- .net中xmlhttp下载文件的方法参考
- 简单的c#文本文件读写
- 我的C#学习过程 第一天 安装
- 在数据库中开始一个事务。
- 用ASP.NETt实现简单的文字水印
- C/S系统中三层结构（Com/Com+）的测试成功实现
- VB 二进制块读写类模块应用实例，包括一个文件拷贝和一个文件二进制比较的例子。
- 扫雷程序“布雷”代码（vb）
- 关于网络连接状态的编程
- c#中ref和out参数使用时需要注意的问题
- use Assembly to call a method
- 在VBA中调用AUTOCAD打印文件
- 在VS.NET的
- 昨天折腾了一晚上，哪位高手帮我看看！急！
- Net是未来的趋势吗?
- 如何修改自定义Webpart 的标题(downmoon)
- [收藏]ASP.Net生成静态HTML页 选择自 coofucoo 的 Blog
ASP.NET 中的 Asp组件高级入门与精通系列之三
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 125 ::
收藏到网摘: 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/
评论 (0) All
