Si vous devez ajouter un filigrane aux images sous ASP, vous avez généralement besoin de certains composants. ASPJPEG est l'un des composants les plus couramment utilisés dans ASP. Le composant aspjpeg implémente la méthode d'appel de la fonction de filigrane :
<%printwater /images/watermark Picture.gif,/uploadfile/upload Picture.jpg) %>
Copiez le code comme suit :
fonction printwater (waterpath, upfilepath)
Dim Logobox, LogoPath, ogvbox
LogoPath = Server.MapPath (chemin d'eau)
Définir Logobox = Server.CreateObject (Persits.Jpeg)
Logobox.Ouvrir LogoPath
Logobox.Largeur = 108
Logobox.Hauteur = 65
Définir ogvbox = Server.CreateObject (Persits.Jpeg)
ogvbox.Open Trim (Server.MapPath (upfilepath))
ogvbox.Canvas.Pen.Color = &H000000 '//Ajoute un filigrane à la couleur de la bordure de l'image.
ogvbox.Canvas.Pen.Width = 1 '//Augmente la largeur de la bordure de l'image après le filigrane.
ogvbox.Canvas.Brush.Solid = False '//Que la bordure soit remplie de couleur, vous pouvez l'essayer pour voir l'effet lorsque la valeur est True^o^
ogvbox.DrawImage ogvbox.width-108, ogvbox.height-65, Logobox, 0.6
ogvbox.Canvas.Bar 0, 0, ogvbox.Width, ogvbox.Hauteur
ogvbox.Save Server.MapPath (chemin du fichier vers le haut)
Définir Logobox=Rien
Définir ogvbox=Rien
fonction de fin