พารามิเตอร์ที่ส่งผ่านคือเส้นทางรูปภาพที่ต้องประมวลผล คุณสามารถปรับพารามิเตอร์หรือเพิ่มพารามิเตอร์อื่น ๆ ได้ตามต้องการ คัดลอกโค้ดดังนี้:
'ลายน้ำข้อความ
ฟังก์ชั่น WordWatermark (ImagePath)
ภาพสลัว
ตั้งค่ารูปภาพ = 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 ' ความชัดเจนของข้อความ
รูปภาพ.Canvas.พิมพ์รูปภาพ.OriginalWidth/2-170,รูปภาพ.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.เปิด LogoPath
Logo.Width = 121 'ขนาดของภาพลายน้ำ
โลโก้.ความสูง = 50
Transition_Color = &h0066cc
'ใส่ลายน้ำในภาพที่อัพโหลด
Image.DrawImage Image.width-150, Image.height-59, โลโก้, 1, Transition_Color, 90
'ที่นี่คุณสามารถเปลี่ยนตำแหน่งของลายน้ำได้ (photo.width-210, photo.height-40 ที่นี่ฉันวางไว้ที่มุมขวาล่างของภาพ) และคุณยังสามารถเปลี่ยนความโปร่งใสของลายน้ำได้
'บันทึกภาพหลังจากเพิ่มลายน้ำ
Image.Save Server.MapPath (ImagePath)
ตั้งค่ารูปภาพ = ไม่มีเลย
ฟังก์ชันสิ้นสุด