VB6正則表達式爲空白卸妝

Question

我試圖運行這個正則表達式[\ S] +（<）|（>）[\ S] +

dim myRegExp as object 
Set myRegExp = New RegExp 
myRegExp.MultiLine = True 
myRegExp.IgnoreCase = True 
myRegExp.Global = True 
myRegExp.Pattern = "[\s]+(<)|(>)[\s]+" 
'myRegExp.Test (str) 
str = myRegExp.Replace(str, "$2$1") 

這似乎並沒有做工

你可以測試http://www.regextester.com/ 運行的正則表達式，它沒有實際的文本只是其間的HTM刪除空白工作完全

它想以去除HTML標籤的左邊和右邊的空格來優化網頁l標籤。

<br>  adsfdf </br> <img  
asdddasd  > 


sdfdsf <br>   <yah>43 3453490 
90        <tag> 
<tag> 

變成

<br>adsfdf</br><img asdddasd>sdfdsf<br><yah>43 3453490 90<tag><tag> 

爲什麼沒有在VB6/VBScript中工作？感謝

Answer 1

試試這個：

myRegExp.Pattern = "\s+(<)|(>)\s+" 
str = myRegExp.Replace(str, "$2$1") 

VB6/VBScript的正則表達式可能不喜歡在字符類\s。