%
'利用ASP查找文章里面的图片,然后用新窗口打开
PublicFunctionReplacePic(s)
Dimre
Setre=NewRegExp
re.IgnoreCase=True
re.Global=True
re.Pattern="img(.[^]*)"
ReplacePic=re.replace(s,"imgonerror=""this.innerHTML='图像无法获取...'""onclick=""window.open(this.src);""alt=""点击在新窗口中打开图片""onload=""if(this.width400)this.width=400;""class=""ContentPic""$1/")
Setre=Nothing
EndFunction
response.writeReplacePic(container)
%
meimg{width:expression(this.width650?650:true);max-width:650px;}已投稿到:阅读||||前一篇:
后一篇:评论[发评论]发评论
验证码:
发评论
0 评论:
发表评论