用正则替换图片名称函数,例如将/img/abc.jpg里abc.jpg替换成S_abc.jpg,效果如下:
想要替换为 /img/S_abc.jpg ，通过以下的函数可以实现.
| 以下是函数代码： function changepic(ss) Set re = New RegExp re.Pattern = "\B\/(\S+)(\.jpg|.gif|.png|.bmp)\b" re.Global = True re.IgnoreCase = True re.MultiLine = True rv = re.Replace(ss,"$1_S$2") changepic = rv end function |
关键字词:
