+ -
当前位置:首页 → 问答吧 → 如何正则替换掉2个字符之前的字符串

如何正则替换掉2个字符之前的字符串

时间:2011-11-04

来源:互联网

2个字符是 【 】

这2个字符中可能包含一些乱七八糟的字符串, 如 【uws d(sd】 等等。


Dim reg
Set reg = New RegExp
reg.Global=TRUE

reg.Pattern="..." '这里怎么写?
reg.IgnoreCase = True
str=reg.Replace(str,"")


谢谢。

作者: helloclm   发布时间: 2011-11-04

两个字符之前还是之间?

之间:
VBScript code

str = "【uws d(sd】"
Dim reg
Set reg = New RegExp
reg.Global=TRUE
reg.Pattern = "(【)([\s\S]*?)(】)"
reg.IgnoreCase = True
str = reg.Replace(str,"$1$3")
WScript.Echo str

作者: hookee   发布时间: 2011-11-04

参考:
Function RemoveHTML(strHTML) 
Dim objRegExp, Match, Matches 
Set objRegExp = New Regexp 
objRegExp.IgnoreCase = True 
objRegExp.Global = True 
'取闭合的<> 
objRegExp.Pattern = "<.+?>" 
'进行匹配 
Set Matches = objRegExp.Execute(strHTML) 
' 遍历匹配集合,并替换掉匹配的项目 
For Each Match in Matches 
strHtml=Replace(strHTML,Match.Value,"") 
Next 
RemoveHTML=strHTML 
Set objRegExp = Nothing 
End Function 

调用 RemoveHTML(Content)

作者: hefeng_aspnet   发布时间: 2011-11-04

热门下载

更多