asp下为什么韩文字后面显示分号?

复制代码 代码如下:

function HTMLEncode(fString)

fString=Replace(fString,";",";")

fString=Replace(fString,"<","<")

fString=Replace(fString,">",">")

fString=Replace(fString,"\","\")

fString=Replace(fString,"--","--")

fString=Replace(fString,CHR(9)," ")

fString=Replace(fString,CHR(10),"<br>")

fString=Replace(fString,CHR(13),"")

fString=Replace(fString,CHR(22),"")

fString=Replace(fString,CHR(32)," ")

fString=Replace(fString,CHR(34),""")'双引号

fString=Replace(fString,CHR(39),"'")'单引号

fString=ReplaceText(fString,"&#([0-9]*);","&#$1;") '解决韩文字符问题

if IsSqlDataBase=0 then '过滤片假名(日文字符)[\u30A0-\u30FF] by yuzi首创

fString=escape(fString)

fString=ReplaceText(fString,"%u30([A-F][0-F])","0$1;")

fString=unescape(fString)

end if

HTMLEncode=fString

end function