自动缩图插件 BBSXP 2007 应该可以用吧

一、打开setup.asp文件
找到：
 str=ReplaceText(str,"\[IMG\]([^"&CHR(34)&"[]*)(\[\/IMG\])","<img border=0 src=$1>")
改为：
 str=ReplaceText(str,"\[IMG\]([^"&CHR(34)&"[]*)(\[\/IMG\])","<img onload=imgresize(this) border=0 src=$1>")
 str=ReplaceText(str,"<IMG src=","<IMG onload=imgresize(this) src=")

找到：
 fString=Replace(fString,"<A href=","<A target=_blank href=") '点链接打开新窗口
在下面加上：
 fString=Replace(fString," onload=imgresize(this)","")

二、打开inc/global.js文件
在最底下加上：

//图片自动调整的模式，1为按比例调整 ，2 按大小调整。
var resizemode=1
function imgresize(o){
   if (resizemode==2 || o.onmousewheel){
   if(o.width > 500 ){
    o.style.width='500px';
   }
   if(o.height > 800){
    o.style.height='800px';
   }
  }else{
  var parentNode=o.parentNode.parentNode
  if (parentNode){
  if (o.offsetWidth>=parentNode.offsetWidth) o.style.width='100%';
  }else{
  var parentNode=o.parentNode
  if (parentNode){
   if (o.offsetWidth>=parentNode.offsetWidth) o.style.width='100%';
   }
  }
 }
 }