<%
'利用ASP查找文章里面的图片,然后用新窗口打开
Public Function ReplacePic(s)
Dim re
Set re=New RegExp
re.IgnoreCase=True
re.Global=True
re.Pattern="<img(.[^>]*)>"
ReplacePic=re.replace(s,"<img onerror=""this.innerHTML='图像无法获取...'"" onclick=""window.open(this.src);"" alt=""点击在新窗口中打开图片"" onload=""if(this.width>400) this.width=400;"" class=""ContentPic"" $1 />")
Set re=Nothing
End Function
response.write ReplacePic(container)
%>
#maingame img {width:expression(this.width > 650 ? 650: true); max-width:650px;}