Replace后出错,可能与正则有关!谢谢 【我需要替换一个RS出来的内容,让它只留下正文之后用JS输出...】
各位:
我需要替换一个RS出来的内容,让它只留下正文之后用JS输出
现在遇到个问题我数据库中有些记录后面好想有个不知道什么的换行符一直去不掉/r/n都试过了好象都不是
我替换的函数如下(asp):
Function RemoveHTML( strText )
Dim RegEx
Set RegEx = New RegExp
'RegEx.Pattern = " <[a-zA-Z\/].*?> "
'RegEx.Pattern = " <[^> ]*> "
RegEx.Pattern = "\ <[^> ]+()\> "
RegEx.Global = True
strText = RegEx.Replace(strText, " ")
strText = Replace(strText, "“ ", " ")
strText = Replace(strText, "” ", " ")
RemoveHTML = strText
End Function
数据库中的相关条记录如下:
记录1:
<P> Cava & Amoni 精心策划,让我们再次期待一个精彩的旅程~ </P>
<P> <IMG style= "BORDER-LEFT-COLOR: #000000; FILTER: ; BORDER-BOTTOM-COLOR: #000000; WIDTH: 400px; BORDER-TOP-COLOR: #000000; HEIGHT: 300px; BORDER-RIGHT-COLOR: #000000 " height=300 alt= " " hspace=10 src= "UploadFile/20077189515722.jpg " width=400 vspace=10 border=1> </P>
记录2:
<P> 1929年,美籍探险家约瑟夫•洛克从云南丽江沿康东茶马古道进入贡嘎山地区考察,并将此次探险经历和图片发表于1930年2月的美国《国家地理杂志》上。洛克在文章中描述九龙“猛董(地名)是世界上最美丽的地方”。 <BR> </P>
<P> <FONT face=Verdana> <IMG style= "FILTER: ; WIDTH: 400px; HEIGHT: 301px " height=301 alt= " " hspace=0 src= "/upload/2007/07/29/161825.jpg " width=400 border=0> </FONT> </P>
麻烦各位了
------解决方案--------------------strText = Replace(strText,vbCrlf, " ")