ASP

水印的一个例子

<%

Set Jpeg = Server.CreateObject("Persits.Jpeg")

' Open source image

Jpeg.Open Server.MapPath("aa.jpg")

' Resizing is optional. None in this code sample.

' Draw text

Jpeg.Canvas.Font.Color = &HFF0000 ' Red

Jpeg.Canvas.Font.Family = "宋体"

Jpeg.Canvas.Font.Bold = True

Jpeg.Canvas.Font.Quality = 4 ' Antialiased

Jpeg.Canvas.Font.BkMode = "Opaque" ' to make antialiasing work

Jpeg.Canvas.Print 10, 572, "启网工作室"

' Draw frame: black, 2-pixel width

Jpeg.Canvas.Pen.Color = &H000000 ' Black

Jpeg.Canvas.Pen.Width = 2

Jpeg.Canvas.Brush.Solid = False ' or a solid bar would be drawn

Jpeg.Canvas.DrawBar 1, 1, Jpeg.Width, Jpeg.Height

Jpeg.Save Server.MapPath("aa.jpg")

%>

分类: ASP

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

这个站点使用 Akismet 来减少垃圾评论。了解你的评论数据如何被处理

相关文章

开始在上面输入您的搜索词,然后按回车进行搜索。按ESC取消。

返回顶部