กุญแจสู่ความสำเร็จคือ รูปภาพลายน้ำต้องอยู่ในรูปแบบ PNG และเอฟเฟกต์จะเหมือนเดิมเมื่อลบพื้นหลังออก ฟังก์ชั่นการดำเนินงาน:
คัดลอกรหัสรหัสดังต่อไปนี้:
ฟังก์ชั่น AddWater(n)
ตั้งค่ารูปถ่าย = Server.CreateObject (Persits.Jpeg)
PhotoPath = เซิร์ฟเวอร์ MapPath (n)
ภาพถ่าย เปิด PhotoPath
ภาพถ่าย.การแก้ไข=1
ภาพถ่ายคุณภาพ=100
iWidth=ภาพถ่าย.OriginalWidth
iHeight=ภาพถ่าย.ความสูงดั้งเดิม
iiwidth=214 'ความกว้างของภาพลายน้ำ
iiheight=51 'ความสูงของภาพลายน้ำ
Photo.Canvas.DrawPNG iWidth-iiWidth-5, iHeight-iiHeight-5,Server.MapPath(Water.png) 'Water.png คือรูปภาพลายน้ำ
Photo.save Server.mappath(n) 'ส่งออกรูปภาพ
ตั้งค่ารูปภาพ = ไม่มีเลย
ฟังก์ชันสิ้นสุด
วิธีการโทร:
<% โทร AddWater (ชื่อรูปภาพ)%>