Access数据字段内容去换行回车TAB符号函数

'今天发现以前添加的数据字段数值包含有个空白的好象换行的符号
以前批量添加数据代码是

FORM表单
'<textarea id="ServerName" name="ServerName"></textarea>

 表单提交的参数包含换行,使用函数

ASP处理函数
ServerNameList=trim(request("ServerName"))
ArrayServerName = Split(ServerNameList,chr(13),-1,1)
for i=0 to ubound(ArrayServerName)   
   ServerName=ArrayServerName(i)
next

发现问题解决办法

'测试函数
function HTMLEncode1(fString)
if not isnull(fString) then
fString = Replace(fString, CHR(32), "1<br>")
fString = Replace(fString, CHR(9), "2<br>")
fString = Replace(fString, CHR(34), "3<br>")
fString = Replace(fString, CHR(39), "4<br>")
fString = Replace(fString, CHR(13), "5<br>")
fString = Replace(fString, CHR(10) & CHR(10), "6<br>")
fString = Replace(fString, CHR(10), "7<br>")

HTMLEncode1 = fString
end if
end function
ServerNameList=trim(request("ServerName"))

'ArrayServerName = Split(ServerNameList,chr(13),-1,1)
ServerNameList=HTMLEncode1(ServerNameList)
ArrayServerName = Split(ServerNameList,"<br>",-1,1)
for i=0 to Ubound(ArrayServerName)
response.Write("<br>"&i&"行数据:"&Server.URLEncode(ArrayServerName(i)))
next

测试函数发现数据FORM表单提交的数据内容包含CHR(10),

现在如何去除掉ACCESS字段的CHR(10),呢?