Question

你好！帮忙写一个asp正则表达式：字段a中像[1]替换为<img scr="1.gif">。谢谢！

Answer 1

'创建正则对象
Set regEx = New RegExp

'匹配所有结果
regEx.Global=true

'设置表达式
regEx.Pattern = "\[(\d{1,3})\]"

'要处理的文本
str = "昨天骑车摔了个大跟头，郁闷死了。[74]不过，今天彩票中了50块钱，小开心，哈哈。[888]。"

'进行替换
result = regEx.Replace(str,"<img src=$1.gif>")
%>
<textarea rows="5" cols="30"><%=result%></textarea>
<br>
<%=result%>

Answer 2

str="我是表情[1]" ‘这是需要替换的内容
if str<>"" Then
Set Re=new RegExp
Re.Global=True

Re.Pattern="\[\([0-9]+)\]"

str=Re.Replace(str,"<img src="$1.gif>")
Set Re=Nothing
Response.write str
End If