求助一条asp的正则表达式,替换内容里面的双引号为单引号, 比如:21212121"212112 变成:比如:21212121"2
比如:21212121"212112变成比如:21212121‘212112比如:21212121"212112替换成比如:21212121‘212112...
比如:21212121"212112 变成 比如:21212121‘212112
比如:21212121"212112 替换成 比如:21212121‘212112 展开
比如:21212121"212112 替换成 比如:21212121‘212112 展开
3个回答
展开全部
Function oflink_lcasetag(str)
Dim regEx, Match, Matches '建立变量。
Set regEx = New RegExp '建立正则表达式。
regEx.Pattern = "<.+?\>" '设置模式。
regEx.IgnoreCase = true '设置是否区分字符大小写。
regEx.Global = True '设置全局可用性。
Set Matches = regEx.Execute(str) '执行搜索。
imgstrng=imgstrng
For Each Match in Matches '遍历匹配集合。
str=replace(str,"& q u o t ;","‘")'这个& q u o t ;要用半角,我打不出来,因为百度会替换掉
Next
oflink_lcasetag = str
End Function
Dim regEx, Match, Matches '建立变量。
Set regEx = New RegExp '建立正则表达式。
regEx.Pattern = "<.+?\>" '设置模式。
regEx.IgnoreCase = true '设置是否区分字符大小写。
regEx.Global = True '设置全局可用性。
Set Matches = regEx.Execute(str) '执行搜索。
imgstrng=imgstrng
For Each Match in Matches '遍历匹配集合。
str=replace(str,"& q u o t ;","‘")'这个& q u o t ;要用半角,我打不出来,因为百度会替换掉
Next
oflink_lcasetag = str
End Function
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这个需要用正则吗? Replace函数不就能解决了吗?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询