如何用htmlEncode來顯示Unicode？

%@ Language=VBScript %>
html>
head>
title>千花飛舞之UNICODE編碼/title>
/head>
body>
%
Dim strU
dim strNormal
strU= ChrW(7913)
strNormalANSI= "aiN"
%>

font face="arial" size=+1>
P>An ANSI value: %=strNormalANSI%>
P>An htmlencoded String: %=Server.htmlEncode(strU)%>
/font>