<%@ Language=VBScript %>
<HTML>
<HEAD>
<TITLE>UNICODE Encoding</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>
<HTML>
<HEAD>
<TITLE>UNICODE Encoding</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>
