关闭

关于正则表达式在access读取字符后替换的问题

27人阅读 评论(0) 收藏 举报
在网上看到的一则正则表达式,
我试了一下想把str字段中值中的../替换去掉

如想实现:
str="<div  align=center><a href='../html/ProductList.asp'><img src='../images/Ad_3.jpg' width='200' height='85' border='0' ></a></div>"
替换后为
str="<div  align=center><a href='html/ProductList.asp'><img src='images/Ad_3.jpg' width='200' height='85' border='0' ></a></div>"

出现问题:
发现从access2003中读取str=rs(2)的替换不成功,str还是原来那个带../的原始字串。
我的实现方法,就是调用下边的ReplaceTest函数,
但是,如果我就是用str="<div  align=center><a href='../html/ProductList.asp'><img src='../images/Ad_3.jpg' width='200' height='85' border='0' ></a></div>"
就可以替换掉../,请问各位,这是怎么回事。

这是我在网上找的程序实现部分:
<%
str="<div  align=center><a href='../html/ProductList.asp'><img src='../images/Ad_3.jpg' width='200' height='85' border='0' ></a></div>"

Function ReplaceTest(patrn, replStr)
  Dim regEx, face               ' 建立变量。
  face = str
  Set regEx = New RegExp               ' 建立正则表达式。
  regEx.Pattern = patrn               ' 设置模式。
  regEx.IgnoreCase = True          ' 设置是否区分大小写。
  regEx.Global = True          
  ReplaceTest = regEx.Replace(face, replStr)         ' 作替换。
End Function
response.write ReplaceTest("\.\./","")
%>
敬请高手帮助,十分谢谢!
0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:1678次
    • 积分:170
    • 等级:
    • 排名:千里之外
    • 原创:16篇
    • 转载:0篇
    • 译文:0篇
    • 评论:1条
    文章存档