asp中上传图片添加水印和缩略怎么实现?

我安装的是aspjpeg,但是这个安装后怎么用啊?... 我安装的是aspjpeg,但是这个安装后怎么用啊? 展开
 我来答
匿名用户
2013-09-25
展开全部
'************加文字水印**********************
Public Function AddPersitsText(Path,Font,Location)
Dim Jpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open Server.MapPath(Path) '打开图片,Path为路片路径及名称
Jpeg.Canvas.Font.Color = &HFF0000 '后6位为文字颜色
Jpeg.Canvas.Font.Family = "黑体" '文字字体
Jpeg.Canvas.Font.Bold = True '是否加粗
Jpeg.Canvas.Font.Size = 18 '字体大小
Jpeg.Canvas.Font.Quality = 10
Jpeg.Canvas.Font.ShadowXOffset = 1
Jpeg.Canvas.Font.ShadowYOffset = 3 '阴影效果
Jpeg.Canvas.Pen.Color = &HFFFFFF '水印背景颜色
Jpeg.Canvas.Pen.Width = 3
Jpeg.Canvas.Brush.Solid = False
IF Location =0 Then
Jpeg.Canvas.Print (Jpeg.width-60)/2, (Jpeg.height-10)/2, Font '水印显示在图片上的居中位置
ElseIf Location=1 Then
Jpeg.Canvas.Print Jpeg.width-120, 20, Font '水印显示在图片上的右上位置
ElseIF Location=2 Then
Jpeg.Canvas.Print Jpeg.width-120, Jpeg.height-20, Font '水印显示在图片上的右下位置
ElseIF Location=3 Then
Jpeg.Canvas.Print 20, 20, Font '水印显示在图片上的左上位置
Else
Jpeg.Canvas.Print 20, Jpeg.height-20, Font '水印显示在图片上的左下位置
End IF
Jpeg.Save Server.MapPath(Path) '保存水印图片
Set Jpeg = Nothing
End Function
匿名用户
2013-09-25
展开全部
给你思路:1.建立一个新类,实现IHttpHandler接口
注意:改为context.Request.PhysicalPath来获得要访问的图片
2.在web.config中添加如下配置
<httpHandlers>
<add verb="动作,如GET,POST"
path="要捕获的路径"
type="处理的类"/>
</httpHandlers>
如果发布了网站,做如下设置:
1.虚拟目录名称->右键属性->配置
2.添加映射->.后缀
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2013-09-25
展开全部
遇到过问题,注册表aspjpeg项的权限问题;
把ASPJPEG的安装目录指派everyone权限,试一下,
如果不行,开始->运行 输入regedit 找到 aspjpeg项,具体的我忘了,我用的电脑也没装,你试着找下,找到后改下权限肯定就行了,呵呵,
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式