代碼如下:
<%@ Import Namespace="System" %>
<%@ Import Namespace="System.IO" %>
<%@ Import Namespace="System.Drawing" %>
<%@ Page language="vb" %>
<script runat="server">
Dim FilePath As String = Server.MapPath("FengEr.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("華文行楷", 30)
Dim b As Brush = new SolidBrush(Color.Green)
Dim s As String = Request.QueryString("Str")
g.DrawString(s, f, b, 20, 290)
image.Save(Response.OutputStream, System.Drawing.Imaging.ImageFormat.Jpeg)
g.Dispose()
image.Dispose()
End Sub
</script>
只要把這個代碼存成一個aspx文件,比如Test.aspx。然後放到wwwroot裡面(假設你的虛擬目錄是默認的)。再做一個Test.jpg的圖片,就可以在(20, 290)這個位置打印出“華文行楷”這種字體的文字了。調用方法很簡單:
http://localhost/Test.aspx?Str=Dicky's Blog!
對於打印的位置和字體還有圖片文件都是可以自己設定的。另外,如果出現了以英文作為參數就可以正常顯示,而對於中文就無法顯示的情況,是因為Asp.net的web.config設置不正確造成了,需要進行如下設置:
<?xml version="1.0" encoding="utf-8"?>
<configuration>
<system.web>
<globalization requestEncoding="gb2312" responseEncoding="gb2312" culture="zh-CN" fileEncoding="gb2312"/>
</system.web>
</configuration>
這樣,就可以正常顯示了。