1. 论坛系统升级为Xenforo,欢迎大家测试!
    Dismiss Notice

比较好看的asp加水印功能

Discussion in '后端开发' started by 著名混混, Jun 29, 2006.

  1. 著名混混

    著名混混 New Member

    Joined:
    Mar 22, 2006
    Messages:
    292
    Likes Received:
    1
    PHP:
    <%
    Dim Jpeg 
    Set Jpeg 
    Server.CreateObject("Persits.Jpeg"
    Jpeg.Open Server.MapPath("1.jpg")
    dim aa
    aa
    =jpeg.binary
     
    Jpeg
    .Canvas.Font.Color = &Hffffff 
    Jpeg
    .Canvas.Font.Family "Arial" 
    Jpeg.Canvas.Font.size 21 
    Jpeg
    .Canvas.Font.Bold True
    Jpeg
    .Canvas.Font.ShadowYOffset 
         Jpeg
    .Canvas.Font.ShadowXOffset 
         Jpeg
    .Canvas.Brush.Solid True 
         Jpeg
    .Canvas.Font.Quality 


    Jpeg
    .Canvas.Print Jpeg.OriginalWidth-130 ,Jpeg.Originalheight-22"Zhangding.net" ' 自己修改X、Y坐标以及需要水印的文字

    bb=jpeg.binary

    set myjpeg=server.createobject("persits.jpeg")
    myjpeg.openbinary aa
    set logo=server.createobject("persits.jpeg")
    logo.openbinary bb
    myjpeg.drawimage 0,0,logo,0.3
    cc=myjpeg.binary
    '
    response.binarywrite cc
    myJpeg
    .Save Server.MapPath("2.jpg")
    set aa=nothing
    set bb
    =nothing
    set cc
    =nothing
    jpeg
    .close
    myjpeg
    .close
    logo
    .close 
    %>
    Demo:
     

    Attached Files:

  2. 著名混混

    著名混混 New Member

    Joined:
    Mar 22, 2006
    Messages:
    292
    Likes Received:
    1
    以上的asp代码,需要用到aspjpeg组件
     
  3. herryli

    herryli New Member

    Joined:
    Jun 29, 2006
    Messages:
    2
    Likes Received:
    0
    非常不错,谢谢楼主提供!
     
  4. herryli

    herryli New Member

    Joined:
    Jun 29, 2006
    Messages:
    2
    Likes Received:
    0
    非常不错,谢谢楼主提供!感谢!
     
  5. 天天都想要你的爱_我的心由你猜

    Joined:
    May 29, 2006
    Messages:
    62
    Likes Received:
    0
  6. cody

    cody New Member

    Joined:
    Jan 11, 2006
    Messages:
    291
    Likes Received:
    1
    可是我现在不用ASP了,用PHP了
     
  7. 著名混混

    著名混混 New Member

    Joined:
    Mar 22, 2006
    Messages:
    292
    Likes Received:
    1
    水印!水印!水印!aspjpge立功了,aspjpge立功了!不要给PHP任何的机会。

      ——伟大的aspjpge!他继承了asp啥都需要组件得光荣的传统。jmail、aspupload在这一刻灵魂附体!

    aspjpge组件悠久的历史和传统,在这一刻他不是一个组件在战斗,他不是一个组件!
     
  8. shizhou

    shizhou New Member

    Joined:
    Sep 5, 2005
    Messages:
    5
    Likes Received:
    0
    晕,伟大的ASP万岁,意大利万岁