如何让图片自动缩放以适合界面大小

2019-11-18 17:09:17

字体：大中小

来源：转载

供稿：网友

如何让图片自动缩放以适合界面大小，拿出你的Editplus，打开c_function.asp文件，找到UBBCode函数，在第417行有如下语句

If Instr(strType,"[image]")>0  And ZC_UBB_IMAGE_ENABLE Then  '[img]    objRegExp.Pattern="(/[IMG=)([0-9]*),([0-9]*),(.*)(/])(.+?)(/[//IMG/])"    strContent= objRegExp.Replace(strContent,"<img src=""$6"" alt=""$4"" title=""$4"" width=""$2"" height=""$3""/>")    objRegExp.Pattern="(/[IMG=)([0-9]*),(.*)(/])(.+?)(/[//IMG/])"    strContent= objRegExp.Replace(strContent,"<img src=""$5"" alt=""$3"" title=""$3"" width=""$2""/>")    objRegExp.Pattern="(/[IMG/])(.+?)(/[//IMG/])"    strContent= objRegExp.Replace(strContent,"<img src=""$2"" alt="""" title=""""/>")  End If

在其中加上onload='javascript:if(this.width>400)this.width=400;',这里400是要让超过400的图片小于400,你可以自己设定宽度.

下面是已经改好的

If Instr(strType,"[image]")>0  And ZC_UBB_IMAGE_ENABLE Then  '[img]    objRegExp.Pattern="(/[IMG=)([0-9]*),([0-9]*),(.*)(/])(.+?)(/[//IMG/])"    strContent= objRegExp.Replace(strContent,"<img onload='<a href="http://www.VeVb.com/article.asp?typeid=36">Javascript</a>:if(this.width>400)this.width=400;' src=""$6"" alt=""$4"" title=""$4"" width=""$2"" height=""$3""/>")    objRegExp.Pattern="(/[IMG=)([0-9]*),(.*)(/])(.+?)(/[//IMG/])"    strContent= objRegExp.Replace(strContent,"<img onload='javascript:if(this.width>400)this.width=400;' src=""$5"" alt=""$3"" title=""$3"" width=""$2""/>")    objRegExp.Pattern="(/[IMG/])(.+?)(/[//IMG/])"    strContent= objRegExp.Replace(strContent,"<img onload='javascript:if(this.width>400)this.width=400;' src=""$2"" alt="""" title=""""/>")  End If

上一篇：用CDO.Message打造邮件发送程序

下一篇：用正则解析图片地址,并利用XMLHTTP组件将其保存

学习交流

索泰发布一款GTX 1070 Mini迷你版本:小机

索泰发布一款GTX 1070 Mini迷你版本:小机箱大爱...

热门图片

猜你喜欢的新闻

猜你喜欢的关注