Question

asp怎么样去掉调用数据中的回车换行

我想调用的数据库代码里有回车和换行,怎样屏蔽掉,让我显示的数据没有回车,是一行显示.
比如我这样调用<%=rs("inc_text")%>要怎么写才能屏蔽回车换行?
还是不行啊,我调用的还是有回车,
<%省略这段代码%>
<MARQUEE scrollAmount=2 direction="left" scrolldelay="90">
<table width="100%" border="0" cellspacing="0" cellpadding="0"><tr>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select inc_text from inc_info,inc_class where inc_class.i_id=inc_info.inc_class_id and i_type='网站公告'"
rs.open sql,conn,1,3
if rs.eof and rs.bof then
response.Write("无数据！")
else
do while not rs.eof
%>

<td width="20"></td><td><%=FormatHTML(rs("inc_text"))%></td>

<%
rs.movenext
loop
rs.close
end if
%></tr>
</table>
</MARQUEE>

大哥你改的哪里?

Answer 1

16：54修改派哗闭
-----------------------
<%Function FormatHTML(fString)
If fString<>"" Then
fString = trim(fString)
fString = replace(fString, ";", "；") '分号过滤
fString = replace(fString, "--", "--") '--过滤
fString = replace(fString, "%20", "") '特殊字符过滤
fString = replace(fString, "==", "") '==过滤
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(9), " ")
fString = Replace(fString, CHR(34), """")
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), " "尘裂) '---------这行 改了
fString = Replace(fString, CHR(10), "") '---------这行 也改了
FormatHTML = fString
End If
End Function %>

然芦闷后调用的时候
<%=FormatHTML(rs("inc_text"))%>

Answer 2

c =resplace("源字陵磨符串",chr(9),"皮陪")
c=resplace(c,chr(13),"燃汪蠢")

Answer 3

使用正则表达式
在典型的搜索和替换操作中，必须提供要查找的确切文字。这种技术对于静态文本中的简单搜索和替换任务可能足够了，但是由于它缺乏灵活性，因此在搜索动态文本时就有困难了，甚至是不可能的。

使用正则表达式，就可以：

测试字符串的某个模式。例如，缓圆伏可以对一个输入字符串进行测试，看在该字符串是否存在一个电话号码模式或一个信用卡号码模式。这称为数据有效性验证。
替换文本。可以在文档中使用一个正则表达式来标识特定文字，然后可以全部将其删除，或者替换为别的文字。
根据模式匹配从字符串中提取一个子字符串。可以用来在文本或输入字段中查找特定文字。
例如，如果需要搜索整个 web 站点来删除腔告某些过时的材料并替换某些HTML 格式化标记，则可以使用正则表达式对每个文件进行测试，看在该文件中是否存在所要查找的材料或 HTML 格式化标记。用这个方法，就可以将受影响的文件范围缩小到包含要删除或更改的材料的那些文件。然后可以使用正则表达式来删除过时的材料，最后，可以再次使用正则表达式来查找并替换那些需要替换的标记。

另一个说明正则表达式非常有用的示例是一种其字符串处理能力还不为人所知的语言。VBScript 是 Visual Basic 的一个子集，具有丰富的字符串处理功能。与 C 类似的 Visual Basic Scripting Edition 则没有这一能力。正则表达式给 Visual Basic Scripting Edition 的字符串处理能力带来了明显改善。不过，可能还是扰携在 VBScript 中使用正则表达式的效率更高，它允许在单个表达式中执行多个字符串操作。