http://www.52hj.org/html/45/t-1545.html你试试这样

解决方案 »

  1.   

    555感谢大家这么帮助啊!在fck的道路上走的好辛苦啊好!55
      

  2.   


    这个不行啊!我是要在fck编辑区内部控制啊!也就是说.在fck编辑器内部的图片什么的!宽度不能超过我的设置
    !或者不能超过初始化的fck的编辑区的宽度!
      

  3.   

    什么意思啊?我希望的啊:
    !宽度不能超过我的设置
    !或者不能超过初始化的fck的编辑区的宽度!你要简直里面的大小,你可以去掉那伸功能
    这个实在看不动啊!是否你的意思是去掉缩小放大功能?和移动功能?
    1.我还想保留这些功能,只是希望里面的图片不要太大否则这样发出去的文章就把,浏览页面的风格破坏了啊
      

  4.   


    555555555555555555555555不知怎么用正则替换55555哭泣中
    恨死fck拉
      

  5.   

    我举一个简单的例子:Function trans(str)
        Dim reg
    Set reg = New RegExp
    reg.Pattern = "<img(.*?)src=""(.*?)""(.*?)>"
        reg.Global = True
        reg.IgnoreCase = True
        str = reg.Replace(str, "<img src=""$2"" width=""100"" height=""100"">")
        trans=(str)
    End Function
    str="gdgdgdgdfgdfg<img src=""bg.jpg"" alt="" width=""850"" height=""700"" border=""0"" />dfgdfgdfgdfgdfgdfg"response.Write trans(str)
      

  6.   

    Function trans(str)
        Dim reg
    Set reg = New RegExp
    reg.Pattern = "<img(.*?)src=""(.*?)""(.*?)>"
        reg.Global = True
        reg.IgnoreCase = True
        str = reg.Replace(str, "<img src=""$2"" width=""100"" height=""100"">")
        trans=(str)
    End Function
    str="gdgdgdgdfgdfg<img src=""bg.jpg"" alt="" width=""850"" height=""700"" border=""0"" />dfgdfgdfgdfgdfgdfg<img src=""bg.jpg"" alt="" width=""650"" height=""300"" border=""0"" />"response.Write trans(str)