KS_Cls/KS.RCls.asp文件第1711行

在这个Function中，我如何把图片
style中的宽度和高度加进去？

  Function FormatImg(content)
           'dim re
'           Set re=new RegExp
'           re.IgnoreCase =true
'           re.Global=True
'           re.Pattern="(script)"
'           Content=re.Replace(Content,"script")
'           re.Pattern="<img.[^>]*src(=| )(.[^>]*)>"
'         Content=re.replace(Content,"<img src=$2  style=""cursor: pointer"" alt=""点此在新窗口浏览图片"" onclick=""javascript:window.open(this.src);"" onmousewheel=""return bbimg(this)"" onload=""javascript:resizepic(this)"" border=""0""/>")
'    set re = nothing
          FormatImg = content
  end function