用Asp.net实现简单的文字水印

<%@ Import Namespace="System" %>

<%@ Import Namespace="System.IO" %>

<%@ Import Namespace="System.Drawing" %>

<%@ Page language="vb" %>

<script runat="server">

Dim FilePath As String = Server.MapPath("Talk.JPG")

Sub Page_Load(Sender As Object, E As EventArgs)

Dim image As System.Drawing.Image = System.Drawing.Image.FromFile( FilePath )

Dim g As Graphics = Graphics.FromImage(image)

g.DrawImage(image, 0, 0, image.Width, image.Height)

Dim f As Font = new Font("华文行楷", 40)

Dim b As Brush = new SolidBrush(Color.Black)

Dim s As String = Left(Request.QueryString("str"), 7)

g.DrawString(s, f, b, 20, 190)

image.Save(Response.OutputStream, System.Drawing.Imaging.ImageFormat.Jpeg)

g.Dispose()

image.Dispose()

End Sub

</script>