PHP很容易啊, 只要把一张小的图片 COPY 到 大的上就可以了, 设置一下透明度 就OK了

解决方案 »

  1.   

    <% server.scripttimeout=1900 %>
    <%
    UpFilePath="IMGWSF/"
    fileweb="UPLOAD/"
    nameset =1
    pathset =0
    dim i
    i=1
    %>
    <% 
    function makefilename(fname)
      fname = now()
      fname = replace(fname,"-","")
      fname = replace(fname," ","") 
      fname = replace(fname,":","")
      makefilename=fname
    end function 
    %>
    <!--#include FILE="upload_5xsoft.inc"-->
            <%
    dim upload,file,formName,iCount
    dim url,url1
    set upload=new upload_5xSoft ''建立上传对象iCount=0
    for each formName in upload.file ''列出所有上传了的文件
    set file=upload.file(formName)  ''生成一个文件对象
    if file.FileSize>0 then         ''如果 FileSize > 0 说明有文件数据
      fname = makefilename(now()) & iCount & "." & GetExtendName(file.FileName)
      file.SaveAs Server.mappath(UpFilePath&fname)   ''保存文件
      iCount=iCount+1
      response.write"<font size=""2"">图片"&i&"</font> <input type=""text"" name="""&i&""" size=""55"" style=""border-style: solid; border-width: 1"" value="""&fileweb&UpFilePath&fname&"""><br>"
      i=i+1
    set file=nothing
    end if
    next
    set upload=nothing  ''删除此对象sub HtmEnd(Msg)
    set upload=nothing
    end sub
    function GetExtendName(FileName)
    dim ExtName
    ExtName = LCase(FileName)
    ExtName = right(ExtName,3)
    ExtName = right(ExtName,3-Instr(ExtName,"."))
    GetExtendName = ExtName
    end function
     %>
      

  2.   

    '---------------------AspJpegV1.2---------------'Set Logobox = Server.CreateObject("Persits.Jpeg")
    '*添加水印图片 添加时请关闭水印字体*
    '//读取添加的图片
    'Logobox.Open LogoPath
    '//重新设置图片的大小
    'Logobox.Width = 180  '// 加入图片的原宽度
    'Logobox.Height = 60  '// 加入图片的原高度
    '*添加水印图片*Set ogvbox = Server.CreateObject("Persits.Jpeg")
    ' 读取要处理的原文件
    ogvbox.Open Trim(Server.MapPath(imagename))
      ' Open a logo file
    Set Logobox = Server.CreateObject("Persits.Jpeg")
    LogoPath = Server.MapPath("images") & "\inlogo.gif"
    Logobox.Open LogoPath
    ' resize logo image, preserve aspect ratio
    Logobox.Width = 180
    Logobox.Height = Logobox.Width * Logobox.OriginalHeight / Logobox.OriginalWidthIf ogvbox.OriginalWidth<Cint(ImageWidth) or ogvbox.Originalheight<Cint(ImageHeight) Then
      F_Viewname=""
      Set ogvbox = Nothing
      Exit Sub
    Else
      IF ImageMode<>"" and FileExt<>"gif" Then
       '//关于修改字体及文字颜色的
       ogvbox.Canvas.Font.Color = &H000000  '// 文字的颜色
       ogvbox.Canvas.Font.Family = "Arial Black" '// 文字的字体
       
       ogvbox.Canvas.Font.Size = 20   '//(文字的大小)
       
       'ogvbox.Canvas.Font.Bold = True
       ' Draw frame: black, 2-pixel width
       ogvbox.Canvas.Print 10, 10, ImageMode  '// 加入文字的位置坐标
       ogvbox.Canvas.Pen.Color  = &H000000  '// 边框的颜色
       ogvbox.Canvas.Pen.Width  = 1    '// 边框的粗细
       ogvbox.Canvas.Brush.Solid = False   '// 图片边框内是否填充颜色
       
       'ogvbox.DrawImage 10, 10, Logobox    '// 加入图片的位置价坐标(添加水印图片)可以删除去掉此效果
       ogvbox.Canvas.Bar 0, 0, ogvbox.Width, ogvbox.Height '// 图片边框线的位置坐标
       ogvbox.Save Server.MapPath(imagename)  '// 生成文件
      End If
      ogvbox.Width = ImageWidth
      ogvbox.height = ImageHeight
      'ogvbox.height = ogvbox.Originalheight*ImageWidth\ogvbox.OriginalWidth
      ogvbox.Sharpen 1, 120
      ogvbox.Save Server.MapPath(tempFilename)  '// 生成预览文件
    End If
    Set Logobox=Nothing
      

  3.   

    晕死。怎么这么多asp的爱好者喜欢客串?
      

  4.   

    对不起,前面几位老大,小弟想知道用php如何来实现,像他这个图,是在上传时候直接打上水印呢,还是在显示的时候打上水印的,谢谢了。如果老大们有源码的话,给小弟参考一下,谢谢。
      

  5.   

    让我分开回复 郁闷使用方法mouse.jpg是你要在其上添加水印的图片名称,注意包含路径名
    STXINWEI.TTF是字体文件的路径名+文件名
    这就是一个简单的测试。如果要调整更复杂的显示效果,只要修改一下类中的属性就可以了,例如把字体放大就可以
    $img->wm_text_size = 20;
    增加水印图片就可以
    $img->wm_image_name="文件名";
      

  6.   

    具体代码 看这里
    http://www.discuz.net/viewthread.php?tid=33823&fpage=10&sid=5LhYAN