加入收藏 | 设为首页 | 会员中心 | 我要投稿 聊城站长网 (https://www.0635zz.com/)- 智能语音交互、行业智能、AI应用、云计算、5G!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

利用 ASP 程序添加图像是经过特殊处理的水印!

发布时间:2023-09-08 14:34:13 所属栏目:Asp教程 来源:
导读:ASPJPEG是Persits出品的共享软件,试用期为30天,

最新版本号是1.3

=========================================

<%

sub jpegclass(imgurl,fontsize,family,isbold,top,left,content,Horfli
ASPJPEG是Persits出品的共享软件,试用期为30天,
 
最新版本号是1.3
 
=========================================
 
<%   
 
    sub   jpegclass(imgurl,fontsize,family,isbold,top,left,content,Horflip)   '调用过程名     
 
          Dim   Jpeg,font_color,font_size,font_family,f_width,f_height,f_content,f_Horflip   
 
          '建立实例   
 
                Set   Jpeg   =   Server.CreateObject("Persits.Jpeg")   
 
                font_size=10   
 
                font_family="宋体"   
 
                f_left=   5   
 
                f_top=5   
 
                      if   imgurl<>""   then   
 
                            Jpeg.Open   Server.MapPath(imgurl)'图片路径并打开它   
 
                      else   
 
                      response.write   "未找到图片路径"   
 
                      exit   sub     
 
                      end   if   
 
                      if   fontsize<>""   then   font_size=fontsize     '字体大小   
 
                      if   family<>""   then       font_family=family       '字体   
 
 

(编辑:聊城站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章