首页 > > 网络编程 > Asp编程 >

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

2008-02-23 05:33: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='javascript: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

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有