如果指定页面的字符集为UFT-8
是不是所有需要显示的中文字都需要用函数转换?
Function chinese2unicode(Str_Text)
  dim h
  dim Str_Text_one
  dim Str_Text_unicode
  for h=1 to len(Str_Text)
      Str_Text_one=Mid(Str_Text,h,1)
      Str_Text_unicode=Str_Text_unicode&chr(38)
      Str_Text_unicode=Str_Text_unicode&chr(35)
      Str_Text_unicode=Str_Text_unicode&chr(120)
      Str_Text_unicode=Str_Text_unicode& Hex(ascw(Str_Text_one))
      Str_Text_unicode=Str_Text_unicode&chr(59)
   next
   Response.write Str_Text_unicode
end function

http://www.designer5.net/article/article_more.asp?type=9
我这里有一些相关的解释，你参考一下