E库技术学院--您的网络技术顾问! 网站首页素材图片库设计原稿网页模板网站赏析下载中心明星图库E库论坛  
E库技术学院
设为首页
加入收藏
我要投稿
E库首页学院首页 ┊ 图形图象 ┊ 网页设计 ┊ 网络编程 ┊ 数据库 ┊ 服务器 ┊ 建站技术 ┊ 业界新闻 ┊ 作者专栏 ┊ 常用范文 ┊ 预留栏目
  当前位置:学院首页>>图形图象教程>>其它相关教程>>制作缩略图和加水印
制作缩略图和加水印
[ 来源: | 作者: | 时间:2005-8-3 10:33:50 | 浏览:人次 ]
收藏到新浪ViVi收藏到365KEY收藏到我摘 ┊ 双击滚屏 单击停止
 

ASPJPEG是Persits出品的共享软件,试用期为30天,您可以在这里下载:http://www.persits.com/aspjpeg.exe。最新版本号是1.3
ASPJPEG是一款功能相当强大的图象处理组件,用它可以轻松地做出图片的缩略图和为图片加上水印功能。下面简单介绍一下使用方法:
您先要执行下载得到的exe文件,安装该组件
1、为图片制作缩略图

<% ' 建立实例
Dim Jpeg,Path
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' 图片所在位置
Path = Server.MapPath("images") & "\clock.jpg"


' 打开
Jpeg.Open Path

' 设置缩略图大小(这里比例设定为50%)
Jpeg.Width = Jpeg.OriginalWidth / 2
Jpeg.Height = Jpeg.OriginalHeight / 2

' 保存缩略图到指定文件夹下
Jpeg.Save Server.MapPath("images") & "\clock_small.jpg"

' 注销实例
Set Jpeg = Nothing
%>

<IMG SRC="images/clock.jpg"><P>
<IMG SRC="images/clock_small.jpg">


2、为图片加入水印功能
<%
Dim Jpeg
' 建立实例
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' 打开目标图片
Jpeg.Open Server.MapPath("images/dodge_viper.jpg")

' 添加文字水印
Jpeg.Canvas.Font.Color = &HFF0000' 红色
Jpeg.Canvas.Font.Family = "宋体"
Jpeg.Canvas.Font.Bold = True 
Jpeg.Canvas.Print 10, 10, "Copyright (c) Cnmaya.org"

转自:动态网制作指南 www.knowsky.com

' 保存文件
Jpeg.Save Server.MapPath("images/dodge_viper_framed.jpg")

' 注销对象
Set Jpeg = Nothing
%>

“制作缩略图和加水印”教程到此结束==>||
 相关教程
用ASPJPEG组件制作图片的缩略图和加水印
ASPJPEG水印使用简略说明
特别声明: 本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载,但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站,我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员,我们尽快予以更正。

投稿作者:  信息来源:  录入时间: 2005-8-3 10:33:50
投稿信箱: web#iecool.com
设为首页 - 加入收藏 - 关于我们 - 广告服务 - 版权申明 - 友情链接 - 联系方式 - 会员投稿
E库技术学院 © 2004-2005 Edu.IEcool.Com  浙ICP备05015070号