你好,这需要稍改生成代码.具体在ks_cls/ks_refreshcls.asp的最后面
Function FormatImg(content)
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="(script)"
Content=re.Replace(Content,"s cript")
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
将红色删除