JSP正则表达式的问题

[655]

希望向一段html代码中的每个img标签中分别加入两个调用JS的鼠标事件，asp中是这样做的

<%
Dim re, strMatches, strMatch, tmpStr1, tmpStr2
Set re=new RegExp
re.IgnoreCase =True
re.Global=True

re.Pattern="\[img\](.*?)\[\/img\]"
Set strMatches=re.Execute(strContent)
For Each strMatch In strMatches
tmpStr1=CheckLinkStr(strMatch.SubMatches(0))
strContent=Replace(strContent,strMatch.Value,"<img src="""&tmpStr1&""" border=""0"" onload=""javascript:DrawImage(this);"" alt=""按此在新窗口打开图片"" onmouseover=""this.style.cursor='hand';"" onclick=""window.open(this.src);"" />")
Next
Set strMatches=Nothing

re.Pattern="\[img=(left|right|center|absmiddle)\](.*?)\[\/img\]"
Set strMatches=re.Execute(strContent)
For Each strMatch In strMatches
tmpStr1=strMatch.SubMatches(0)
tmpStr2=CheckLinkStr(strMatch.SubMatches(1))
strContent=Replace(strContent,strMatch.Value,"<img src="""&tmpStr2&""" align="""&tmpStr1&""" onload=""javascript:DrawImage(this);"" border=""0"" alt=""按此在新窗口打开图片"" onmouseover=""this.style.cursor='hand';"" onclick=""window.open(this.src);"" />")
Next
Set strMatches=Nothing
%>

strContent是从数据库中提出的html内容,THX!!!

[以梦为马]

up

[wangzhanlili]

我也不知道 帮顶

[fjshirley]

有什么问题可以去www.zhihuigu.com上去问,那有很多一流大虾.......高手如云..专门给人解决问题

有问必答.....各位有时间都可以去看看！！！！！！！！！！！！！！！

[655]

自己UP一下！