用pelace()函数替换空格和换行

在做新闻系统时，增加的新闻内容用一个textarea域来放置，但是输入的内容在前台显示时无法换行，并且没有空格，解决方法如下：

在新闻提交时，假如接收新闻的变量为content,文本域名称是content的话，则：

content=request("content")

if content<>"" then

content=replace(content," ", "&nbsp;")            '说明这一句用来把文本格式空格转换成htm格式的空格

content=replace(content,chr(10)&chr(13),"<br>">           '说明这一句用来把文本格式回车换行转换成htm格式的换行

end if

这样转换后，再把文章内容提交到数据库中即可，这样可实现简单的新闻编辑，如果要实现复杂的功能，请实现在线编辑器，推荐使用ewebedit.

使用上述方法在修改新闻时，读出的新闻内容中会包含<br>和&nbsp;这和我们输入时看到的格式不相同，如何解决呢？再进行字符替换，假如数据库中存放新闻内容的字段为content,记录集为rs,则：

content=rs("content")

if content<>"" then

content=replace(content,"&nbsp;", " ")

content=replace(content,"<br>",chr(10)&chr(13))

end if

这样转换后，再把内容读出到文本域中就可以了！