asp正則表達式 替換HTML源文件裡的鏈接地址

content="<ul><li><a href=pic_list_mb.asp?id=1&page=2>音樂之聲明星壁紙</a></li><li><a href=pic_list_mb.ASP?id=32&page=1>音樂之聲明星壁紙</a></li</ul>"

想把content的內容變成
content="<ul><li><a href=pic_list_1_2.html>音樂之聲明星壁紙</a></li><li><a href=pic_list_32_1.Html>音樂之聲明星壁紙</a></li</ul>"

<%
Function RegUrl(TheStr)
Set RegEx = New RegExp
RegEx.IgnoreCase =True
regEx.Global = True'****這一句加上是全部替換，如果不加，只替換第一個
RegEx.Pattern = "pic_list_mb\.ASP\?id=(\d*)\&page=(\d*)"
RegUrl=RegEx.replace(TheStr,"pic_list_$1_$2.Html")

End Function

content="<ul><li><a href=pic_list_mb.asp?id=1&page=2>音樂之聲明星壁紙</a></li><li><a href=pic_list_mb.ASP?id=32&page=1>音樂之聲明星壁紙</a></li</ul>"
content=RegUrl(content)

response.write content
%>