让SP1具有7.1完全相同的图片随鼠标滚轮\"缩放\"功能~~
<p><font color=\"#000000\">修改</font></p><p><font color=\"#000000\">inc目录下的文件Dv_ubbcode.asp</font></p><p><font color=\"#220007\">找到</font></p><p><font color=\"#220007\">Private Function bbimg(strText,ssize)<br/>Dim s<br/>s=strText<br/>re.Pattern=\"<img(.[^>]*)>\"<br/>If ssize=500 Then<br/>s=re.replace(s,\"<img$1 onload=\"\"<i>javascript</i>:if(this.width>\"& ssize &\")this.style.width=\"&ssize&\";\"\">\")<br/>Else<br/>s=re.replace(s,\"<img$1 onload=\"\"<i>javascript</i>:if(this.width>\"& ssize &\")this.style.width=\"&ssize&\";if(this.height>250)this.style.width=(this.width*250)/this.height;\"\">\")<br/>End If<br/>bbimg=s<br/>End Function</font></p><p><font color=\"#220007\">修改为</font></p><font color=\"#000000\"><div class=\"msgheader\">QUOTE:</div><div class=\"msgborder\"><p><font color=\"#000000\">Private Function bbimg(strText,ssize)<br/>Dim s<br/>s=strText<br/>re.Pattern=\"<img(.[^>]*)>\"<br/>If ssize=500 Then<br/>s=re.replace(s,\"<img$1 onmousewheel=\"\"return bbimg(this)\"\" onload=\"\"<i>javascript</i>:if(this.width>screen.width-\"&ssize&\")this.style.width=screen.width-\"&ssize&\";\"\">\")<br/>Else<br/>s=re.replace(s,\"<img$1 onmousewheel=\"\"return bbimg(this)\"\" onload=\"\"<i>javascript</i>:if(this.width>screen.width-\"&ssize&\")this.style.width=screen.width-\"&ssize&\";if(this.height>250)this.style.width=(this.width*250)/this.height;\"\">\")<br/>End If<br/>bbimg=s<br/>End Function</font></p></div></font>
页:
[1]