渡されるパラメータは、処理する必要がある画像パスです。必要に応じて、コードをコピーします。
'テキストの透かし
関数 WordWatermark(画像パス)
薄暗い画像
Set Image= Server.CreateObject(Persits.Jpeg) 'オブジェクトの作成
Image.Open server.mappath(ImagePath) '画像の場所
Image.Canvas.Font.Color = &H000000 '色、ここでは黒に設定されています
Image.Canvas.Font.Family = 宋体' フォントを設定します
Image.Canvas.Font.Bold = False '太字に設定するかどうか
Image.Canvas.Font.Size = 26 'フォント サイズ
Image.Canvas.Font.Quality = 4 ' テキストの明瞭度
Image.Canvas.Print Image.OriginalWidth/2-170,Image.OriginalHeight-30, ウォーターマーク テキスト'ウォーターマーク テキスト
Image.Save server.mappath(ImagePath) 'ファイルの保存
画像を何も設定しない
終了機能
'画像の透かし
関数 ImageWatermark(ImagePath)
画像 = Server.CreateObject(Persits.Jpeg) を設定します
'ウォーターマークに追加する画像のパスを決定します
PhotoPath = Server.MapPath(ImagePath)
画像.PhotoPathを開く
'透かし画像を開く
ロゴ = Server.CreateObject(Persits.Jpeg) を設定します。
LogoPath = Server.MapPath(logo.jpg) '透かし画像
Logo.Open LogoPath
Logo.Width = 121 '透かし画像のサイズ
ロゴ.高さ = 50
トランジションカラー = &h0066cc
'アップロードした画像に透かしを入れます
Image.DrawImage Image.width-150、Image.height-59、ロゴ、1、Transition_Color、90
'ここで透かしの位置を変更できます (photo.width-210、photo.height-40、ここでは写真の右下隅に配置しました)。透かしの透明度も変更できます
'ウォーターマークを追加した後、画像を保存します
画像.保存サーバー.MapPath(ImagePath)
写真を設定 = なし
終了機能