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),呢?