رمز وظيفة العلامة المائية العامة لمكون aspjpeg

إذا كنت بحاجة إلى إضافة علامة مائية إلى الصور ضمن ASP، فستحتاج بشكل عام إلى بعض المكونات. يعد ASPJPEG أحد المكونات الأكثر استخدامًا في ASP. يتم استخدام الطريقة التالية. يطبق مكون aspjpeg طريقة استدعاء وظيفة العلامة المائية:

<%printwater /images/watermark الصورة.gif,/uploadfile/upload الصورة.jpg) %>

انسخ رمز الكود كما يلي:

وظيفة printwater (مسار الماء، مسار upfilepath)

خافت Logobox، LogoPath، ogvbox

LogoPath = Server.MapPath(مسار الماء)

تعيين Logobox = Server.CreateObject(Persits.Jpeg)

Logobox.فتح LogoPath

عرض مربع الشعار = 108

صندوق الشعار. الارتفاع = 65

تعيين ogvbox = Server.CreateObject(Persits.Jpeg)

ogvbox.Open Trim(Server.MapPath(upfilepath))

ogvbox.Canvas.Pen.Color = &H000000 '// أضف علامة مائية إلى لون حدود الصورة.

ogvbox.Canvas.Pen.Width = 1 '// زيادة عرض حدود الصورة بعد وضع العلامة المائية.

ogvbox.Canvas.Brush.Solid = False '// سواء كانت الحدود مملوءة بالألوان، يمكنك تجربتها لمعرفة التأثير عندما تكون القيمة True^o^

ogvbox.DrawImage ogvbox.width-108، ogvbox.height-65، Logobox، 0.6

ogvbox.Canvas.Bar 0، 0، ogvbox.العرض، ogvbox.الارتفاع

ogvbox.Save Server.MapPath(upfilepath)

تعيين Logobox = لا شيء

تعيين ogvbox=لا شيء

وظيفة النهاية