网络编程
位置:首页>> 网络编程>> Asp编程>> asp下为什么韩文字后面显示分号?

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

 来源:asp之家 发布时间:2011-03-10 11:07:00 

标签: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])","&#x30$1;") 
fString=unescape(fString) 
end if 
HTMLEncode=fString 
end function 

0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com