aspjpeg組件通用加水印函數(shù)代碼
更新時間：2008年12月30日 00:09:39 作者：
asp下需要給圖片加水印一般就需要一些組件，aspjpeg是asp最常用的組件之一，下面的方法。
aspjpeg組件實現(xiàn)加水印函數(shù)的調(diào)用方法：
<%printwater "/images/水印圖片.gif","/uploadfile/上傳圖片.jpg") %>
function printwater(waterpath,upfilepath)
Dim Logobox,LogoPath,ogvbox
LogoPath = Server.MapPath(waterpath)
Set Logobox = Server.CreateObject("Persits.Jpeg")
Logobox.Open LogoPath
Logobox.Width = 108
Logobox.Height = 65
Set ogvbox = Server.CreateObject("Persits.Jpeg")
ogvbox.Open Trim(Server.MapPath(upfilepath))
ogvbox.Canvas.Pen.Color = &H000000 '//增加水印后圖片的邊框色彩。
ogvbox.Canvas.Pen.Width = 1 '//增加水印后圖片的邊框?qū)挾取?
ogvbox.Canvas.Brush.Solid = False '//邊框內(nèi)是否填充顏色，你可以試試看值為True時的效果^o^
ogvbox.DrawImage ogvbox.width-108, ogvbox.height-65, Logobox, 0.6
ogvbox.Canvas.Bar 0, 0, ogvbox.Width, ogvbox.Height
ogvbox.Save Server.MapPath(upfilepath)
Set Logobox=Nothing
Set ogvbox=Nothing
end function
<%printwater "/images/水印圖片.gif","/uploadfile/上傳圖片.jpg") %>
復(fù)制代碼 代碼如下:
function printwater(waterpath,upfilepath)
Dim Logobox,LogoPath,ogvbox
LogoPath = Server.MapPath(waterpath)
Set Logobox = Server.CreateObject("Persits.Jpeg")
Logobox.Open LogoPath
Logobox.Width = 108
Logobox.Height = 65
Set ogvbox = Server.CreateObject("Persits.Jpeg")
ogvbox.Open Trim(Server.MapPath(upfilepath))
ogvbox.Canvas.Pen.Color = &H000000 '//增加水印后圖片的邊框色彩。
ogvbox.Canvas.Pen.Width = 1 '//增加水印后圖片的邊框?qū)挾取?
ogvbox.Canvas.Brush.Solid = False '//邊框內(nèi)是否填充顏色，你可以試試看值為True時的效果^o^
ogvbox.DrawImage ogvbox.width-108, ogvbox.height-65, Logobox, 0.6
ogvbox.Canvas.Bar 0, 0, ogvbox.Width, ogvbox.Height
ogvbox.Save Server.MapPath(upfilepath)
Set Logobox=Nothing
Set ogvbox=Nothing
end function
您可能感興趣的文章:
- ASP組件AspJpeg(加水印)生成縮略圖等使用方法
- aspJpeg圖片水印有雜點的完美解決方法
- win2003 AspJpeg安裝圖文教程
- 基于ASPJPEG 制作了一個夢寐已久的批量水印工具步驟
- aspjpeg 添加水印教程及生成縮略圖教程
- 動網(wǎng)論壇驗證碼改進(jìn) 加法驗證碼(ASPJpeg版)
- 使用ASPJPEG出現(xiàn)0177 800401F3 錯誤的解決辦法
- asp水印組件之AspJpeg的結(jié)合代碼實例
- ASPJPEG綜合操作的CLASS類
- 結(jié)合FSO操作和Aspjpeg組件寫的Class
- 水印組件AspJpeg1.801最新官方原版下載+注冊碼
- 利用ASPUPLOAD，ASPJPEG實現(xiàn)圖片上傳自動生成縮略圖及加上水印
- ASPJPEG學(xué)習(xí)手記
- 圖片自動保存到本地并利用aspjpeg為圖片加水印
- Aspjpeg添加水印完整方法
- AspJpeg?V1.5.0?破解版使用方法
- aspjpeg組件使用方法
相關(guān)文章
寫了個正則表達(dá)式匹配的東西，用到的也就這幾個函數(shù)了2008-11-11
解決ASP（圖像）上傳漏洞的方法...2006-12-12
ASP給圖片加水印是需要組件的,常用的有aspjpeg軟件和中國人自己開發(fā)的wsImage軟件，可以上網(wǎng)搜索下載這兩個軟件，推薦使用咱們中國人自己開發(fā)的wsImage，畢竟是中文版，容易操作2012-12-12
檢查access數(shù)據(jù)庫中是否存在某個名字的表的asp代碼
首先調(diào)用adodb.connection對象中的openSchema函數(shù)，這樣會得到一個Recordset，其中每一條“紀(jì)錄”對應(yīng)著數(shù)據(jù)庫中的一張表，“紀(jì)錄”的每個“字段”包含了對應(yīng)表的某方面信息。其中TABLE_NAME字段包含了對應(yīng)表的名稱2009-06-06
Asp實現(xiàn)假靜態(tài)...2007-02-02
用ASP讀取/寫入UTF-8編碼格式的文件...2006-11-11
ASP中怎么實現(xiàn)SQL數(shù)據(jù)庫備份、恢復(fù)！
ASP中怎么實現(xiàn)SQL數(shù)據(jù)庫備份、恢復(fù)！...2007-03-03
ASP 空字符串、IsNull、IsEmpty區(qū)別分析
本文將詳細(xì)介紹ASP中空字符串、IsNull、IsEmpty之間的區(qū)別,有需要的朋友可以參考下2012-12-12
Asp無組件上傳進(jìn)度條解決方案...2007-09-09
ASP中應(yīng)用事務(wù)處理技巧...2007-08-08