
<%
'利用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;}
您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。