ASP程序给上传的图片增添水印成效

ASPJPEG是Persits出品的共享软件，试用期为30天，您可以在这里下载：http://www.persits.com/aspjpeg.exe。

最新版本号是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       '字体  

（编辑：汽车网）

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