代碼如下:
復制代碼代碼如下:
Function ReplaceEx(strOri,replStr)
Set regEx=New RegExp
regEx.Global=True
regEx.MultiLine=True
regEx.Pattern="/r/n"
regEx.IgnoreCase=True
ReplaceEx=regEx.Replace(strOri,replStr)
End Function
shuoming=replace(rs("shuoming")," "," ")
shuoming=ReplaceEx(shuoming,"<br>")
這樣替換以后再輸出就不會出現錯誤了!我處理的時候使用replace函數替換空格可以,但是替換回車換行始終不行,只有求助于正則表達式了??!