国产成人毛片视频|星空传媒久草视频|欧美激情草久视频|久久久久女女|久操超碰在线播放|亚洲强奸一区二区|五月天丁香社区在线|色婷婷成人丁香网|午夜欧美6666|纯肉无码91视频

使用ASPJpeg組件在ASP中創(chuàng)建透明文字水印

ASPJpeg組件是一種功能強大的工具,可用于在ASP應(yīng)用程序中處理圖像,并且可以輕松地實現(xiàn)透明文字水印效果。下面將介紹如何使用ASPJpeg組件在ASP中制作帶有透明文字水印的圖片,包括具體步驟和代

ASPJpeg組件是一種功能強大的工具,可用于在ASP應(yīng)用程序中處理圖像,并且可以輕松地實現(xiàn)透明文字水印效果。下面將介紹如何使用ASPJpeg組件在ASP中制作帶有透明文字水印的圖片,包括具體步驟和代碼示例。

步驟及代碼實現(xiàn)方式

1. 首先,將原始圖片數(shù)據(jù)的二進(jìn)制賦值給TempA。

2. 對文字水印處理后的圖片數(shù)據(jù)進(jìn)行二進(jìn)制賦值給TempB。

3. 使用TempB作為“圖片水印”,附加在TempA上,并調(diào)整透明度,最終輸出合成的圖片。

ASP代碼實現(xiàn)

```asp

<%

LocalFile ""

TargetFile ""

Dim Jpeg

Set Jpeg ("")

If -2147221005 Then

Response.Write "沒有這個組件,請安裝!"

'檢查是否安裝ASPJpeg組件

Response.End()

End If

(LocalFile) '打開圖片

If Then

Response.Write "打開圖片失敗,請檢查路徑!"

Response.End()

End If

Dim TempA '原始圖片的二進(jìn)制數(shù)據(jù)

Dim TempB '加了不透明文字水印的圖片

Dim TempC '最終效果

TempA '將原始數(shù)據(jù)賦給TempA

'加文字水印

HFFFFFF '水印文字顏色

"Arial" '字體

True '是否加粗

35 '字體大小

H000000 '陰影色彩

1

1

True

5 '輸出質(zhì)量

Jpeg.OriginalWidth/2-150, Jpeg.OriginalHeight/2, "水印文字" '水印位置及文字

TempB '將文字水印處理后的值賦給TempB,這時,文字水印沒有不透明度

'調(diào)整文字透明度

Set MyJpeg ("")

TempA

Set Logo ("")

TempB

MyJpeg.DrawImage 0, 0, Logo, 0.2 '0.3是透明度

TempC '將最終結(jié)果賦值給TempC,這時也可以生成目標(biāo)圖片了

TempC '將二進(jìn)輸出給瀏覽器

(TargetFile)

Set TempA Nothing

Set TempB Nothing

Set TempC Nothing

%>

```

通過以上步驟和代碼實現(xiàn),您可以在ASP應(yīng)用程序中使用ASPJpeg組件制作帶有透明文字水印的圖片,為您的網(wǎng)站或應(yīng)用程序增加視覺吸引力。

標(biāo)簽: