转换字符
我有一个提交页面add.asp，2个输入框a,b对应表table1的字段c,d，怎样实现这样的功能，即输入的字符（如 <   >   /   |   \   [   ]     "   '   等）提交到数据库自动转化为二进制字符，然后在show.asp读出数据的时候自动转化为原来的字符，谁可以全一点吗？

------解决方案--------------------
不是转换为2进制吧？
------解决方案--------------------
unction HTMLEncode(fString)

fString = replace(fString, "> ", "&gt; ")
fString = replace(fString, " < ", "&lt; ")
fString = Replace(fString, CHR(32), "&nbsp; ")
fString = Replace(fString, CHR(34), "&quot; ")
fString = Replace(fString, CHR(39), "&#39; ")
fString = Replace(fString, CHR(13), " ")
fString = Replace(fString, CHR(10) & CHR(10), " </P> <P> ")
fString = Replace(fString, CHR(10), " <BR> ")
fString=replace(fString, "[img] ", " <img src= 'images/UploadFile/ ")
fString=replace(fString, "[/img] ", " '> ")
fString=replace(fString, "[em] ", " <img src= 'images/em/ ")
fString=replace(fString, "[/em] ", " '> ")
HTMLEncode = fString
end function
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

这两个函数可以直接用：）