2.8w+
社区成员
- 主页
asp中匹配<%%>的正则表达式怎么写
asp中匹配<%%>的正则表达式怎么写
就是要匹配asp中的<%...%>
其中会有很多个<%...%>
就是要匹配asp中的<%...%>
其中会有很多个<%...%>
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
mocom 2009-07-29
regEx.Pattern = "<" & "%([\s\S]*?)%" & ">"
aiqidai 2009-07-29
未结束的字符串常量
regEx.Pattern=" <%(.[^ <>]*)
----------------------------^
regEx.Pattern=" <%(.[^ <>]*)%>"
如果包括任何字符呢?
还是是不是要加成
regEx.Pattern=" \ <\%(.[^ <>]*)\%\>"
这样的?
regEx.Pattern=" <%(.[^ <>]*)
----------------------------^
regEx.Pattern=" <%(.[^ <>]*)%>"
如果包括任何字符呢?
还是是不是要加成
regEx.Pattern=" \ <\%(.[^ <>]*)\%\>"
这样的?
aiqidai 2009-07-29
regEx.Pattern=" <%(.[^ <>]*)%>"
如果包括任何字符呢?
还是是不是要加成
regEx.Pattern=" \<\%(.[^ <>]*)\%\>"
这样的?
如果包括任何字符呢?
还是是不是要加成
regEx.Pattern=" \<\%(.[^ <>]*)\%\>"
这样的?
shenzhenNBA 2009-07-29
regEx.Pattern="<%(.[^ <>]*)%>"
shenzhenNBA 2009-07-29
[Quote=引用楼主 aiqidai 的回复:]
asp中匹配 <%%>的正则表达式怎么写
就是要匹配asp中的 <%...%>
其中会有很多个 <%...%>
[/Quote]
Set regEx = New RegExp
regEx.Pattern="<%(.[^<>]*)%>"
...
匹配任意但不包括 < , > 符号
asp中匹配 <%%>的正则表达式怎么写
就是要匹配asp中的 <%...%>
其中会有很多个 <%...%>
[/Quote]
Set regEx = New RegExp
regEx.Pattern="<%(.[^<>]*)%>"
...
匹配任意但不包括 < , > 符号
aiqidai 2009-07-29
我是ASP里用的
aiqidai 2009-07-29
regEx.Pattern = "/<\%(.*)\
--------------------------^
--------------------------^
zpzk123 2009-07-29
"/ <\%(.*)\%>/U"
zpzk123 2009-07-29
"/<\%(.*)\%>/"
aiqidai 2009-07-29
Function ReplaceCondition(byval str)
Dim regEx, Matches, Match, TempStr,Bool
Dim FieldParam,FieldParamArr,ReturnFieldValue,I
on error resume next
Set regEx = New RegExp
regEx.Pattern = "{\$IF\([^\$]*}"
regEx.IgnoreCase = True
regEx.Global = True
Set Matches = regEx.Execute(str)
TempStr=str
For Each Match In Matches
FieldParam = Replace(Match.Value,"{$IF(","")
FieldParam =mid(FieldParam,1,(len(FieldParam)-2))
FieldParamArr = Split(FieldParam,"||")
Bool=eval(trim(FieldParamArr(0)))
If Bool="True" Then
ReturnFieldValue=FieldParamArr(1)
Else
ReturnFieldValue=FieldParamArr(2)
End If
TempStr=Replace(TempStr,"{$IF(" &FieldParam &")}",ReturnFieldValue)
Next
ReplaceCondition=TempStr
End Function
可参考 这个函数，替换文本中的｛＄if(条件||1||2)｝这样标签的
Dim regEx, Matches, Match, TempStr,Bool
Dim FieldParam,FieldParamArr,ReturnFieldValue,I
on error resume next
Set regEx = New RegExp
regEx.Pattern = "{\$IF\([^\$]*}"
regEx.IgnoreCase = True
regEx.Global = True
Set Matches = regEx.Execute(str)
TempStr=str
For Each Match In Matches
FieldParam = Replace(Match.Value,"{$IF(","")
FieldParam =mid(FieldParam,1,(len(FieldParam)-2))
FieldParamArr = Split(FieldParam,"||")
Bool=eval(trim(FieldParamArr(0)))
If Bool="True" Then
ReturnFieldValue=FieldParamArr(1)
Else
ReturnFieldValue=FieldParamArr(2)
End If
TempStr=Replace(TempStr,"{$IF(" &FieldParam &")}",ReturnFieldValue)
Next
ReplaceCondition=TempStr
End Function
可参考 这个函数，替换文本中的｛＄if(条件||1||2)｝这样标签的
