使用ASPJPEG添加浮水印的方法

來源:互聯網
上載者:User

  這些天研究了一下ASP的自動添加圖片浮水印的方法。

  因為原先我的圖片總是被盜鏈,因此我使用程式將圖片增加了浮水印,然而我查看了一下昨天和今天的網站日誌記錄,發現我的圖片依舊被盜鏈嚴重。

  兩天的時間,我的部落格就有20多G的訪問流量,圖片所在的目錄upload佔用了18.6G,37萬次點擊,而文章所在目錄只用了1.3G流量,4萬次點擊,從來源看,以大站盜鏈的圖片所佔流量最大,CSDN和BOKEE占前兩位,這兩個地址一共帶來4萬多次盜鏈。

  當然,如果徹底防止盜鏈,我以前也想過使用類似ISAPI Rewrite的程式來實現,但實際使用後,我發現ISAPI Rewrite將所有的外部連結全部都禁止了,但是我並不想禁用全部外部連結,因此還是最終沒有使用,不過如果現在這種盜鏈情況繼續進行的話,我不得不考慮重新啟用ISAPI Rewrite這個程式了。

  下面是我使用程式來增加浮水印的方法,雖然以我目前的使用效果看,是比較失敗的案例。

  增加浮水印使用的是一個名叫ASPJPEG的ASP組件,我是在OBlog的網站上下載的,版本是1.5版本,使用這個圖象處理組件,可以輕鬆地做出圖片的縮圖和為圖片加上浮水印功能。下面簡單介紹一下使用方法:

  先要到Oblog的下載頁面上,在“OBLOG相關組件下載”處,下載AspJpeg v1.5.0.0,然後執行下載得到的檔案,安裝該組件。

  然後在ASP代碼裡增加一點點代碼即可,增加的位置可以放在上傳圖片完成後,取得圖片地址,進行修改。對於Z-Blog的使用者,直接將下面代碼複製到c_system_lib.asp檔案的TUpLoadFile類中的Upload函數的結尾即可實現浮水印功能。

  1、為圖片加入浮水印功能

Dim Jpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")  ' 建立對象
Jpeg.Open BlogPath & "/upload/" & FileName  ' 圖片所在位置
Jpeg.Canvas.Font.Color = &H000000 ' 顏色,這裡是設定成:黑
Jpeg.Canvas.Font.Family = "方正隸變簡體"  ' 設定字型
Jpeg.Canvas.Font.Bold = False '是否設定成粗體
Jpeg.Canvas.Font.Size = 26 '字型大小
Jpeg.Canvas.Font.Quality = 4 ' 文字清晰度
Jpeg.Canvas.Print Jpeg.OriginalWidth/2-170,Jpeg.OriginalHeight-30, "WWW.WILLIAMLONG.INFO"   '浮水印文字
Jpeg.Save BlogPath & "/upload/" & FileName  ' 儲存檔案
Set Jpeg = Nothing

  2、為圖片製作縮圖

Dim Jpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")  ' 建立對象
Jpeg.Open BlogPath & "/upload/" & FileName  ' 圖片所在位置
Jpeg.Width = Jpeg.OriginalWidth / 2
Jpeg.Height = Jpeg.OriginalHeight / 2
' 設定縮圖大小(這裡比例設定為50%),也可以給他準確的數值,比如Jpeg.Width=120
Jpeg.Save BlogPath & "/upload/" & FileName  ' 儲存檔案
Set Jpeg = Nothing



相關文章

Alibaba Cloud 10 Year Anniversary

With You, We are Shaping a Digital World, 2009-2019

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。