论坛首页   WEB网页设计  利用ASPJPEG组件给图片加水印

[公告]快到[搜艺招聘网]发布招聘信息 注册简历、发布自己作品！ ：）
利用ASPJPEG组件给图片加水印
QQD 查看QQD的博客 金钱 : 2201 Level : 0 发帖数 : 347 最后登陆 : 2007/10/25 注册时间 : 2004/10/18	信息 | 留言 | 引用 | 回复 | 编辑 | 置顶 | 移动 | 删除 <% Dim Jpeg ' 建立实例 Set Jpeg = Server.CreateObject("Persits.Jpeg") ' 打开目标图片 Jpeg.Open Server.MapPath("images/test.jpg") ' 添加文字水印 Jpeg.Canvas.Font.Color = &HFF0000' 红色 Jpeg.Canvas.Font.Family = "宋体" Jpeg.Canvas.Font.Bold = True Jpeg.Canvas.Print 10, 10, "Copyright (c) XiaoCui.Cn" '小崔设计 www.xiaocui.cn ' 保存文件 Jpeg.Save Server.MapPath("images/test_framed.jpg") ' 注销对象 Set Jpeg = Nothing %>
2006/3/6	信息 | 留言 | 引用 | 回复 | 编辑 | 置顶 | 移动 | 删除