寻asp 特殊字符转换函数需求内详.解决方案 _ASP

寻asp 特殊字符转换函数需求内详..
需要两个函数
第一个处理表单传过来的字符串如果有特殊字符转换了然后存入数据库
第二个从数据库里调出数据如果是被转换的字符串那么再转为特殊字符然后显示

------解决方案--------------------
请了解：Server.HTMLEncode() Server.HTMLDecode()
Server.HTMLEncode 就是入库前对特殊字符编码
Server.HTMLDecode 就是输出前对特殊字符解码。理论上是这样，但Server.HTMLDecode函数常常报错，所以可用以下函数代码：

VB code

 function    HTMLDecode(fString)   
   fString    =    replace(fString,    "&gt;",    ">")   
   fString    =    replace(fString,    "&lt;",    "<")   
   fString    =    Replace(fString,"&nbsp;",chr(32))   
   fString    =    Replace(fString,"&quot;",chr(34))   
   fString    =    Replace(fString,"&#39;",chr(39))   
   fString    =    Replace(fString,    "",    CHR(13))   
   fString    =    Replace(fString,    "</P><P>",    CHR(10)    &    CHR(10))   
   fString    =    Replace(fString,    "<BR>",    CHR(10))   
   HTMLDecode    =    fString   
   end    function

寻asp 特殊字符转换函数 需求内详.解决方案

寻asp 特殊字符转换函数需求内详.解决方案