ASP删除img标签的style属性只保留src的正则函数

ASP去除img标签style属性只保留src

'功能:将IMG代码格式化为img src="XXX" /> 格式,只保留SRC属性，去掉IMG标签的其他属性。

Function FixImg(sString)      Dim sReallyDo, regEx, iReallyDo    Dim oMatches, cMatch    Dim tStartTime, tEndTime    If IsNull(sString) Then        FixImg = ""        ExIT Function    End If    sReallyDo = sString    On Error Resume Next    sReallyDo = Replace(sReallyDo, vbCr, " ")    sReallyDo = Replace(sReallyDo, vbLf, " ")    sReallyDo = Replace(sReallyDo, vBTab, " ")    sReallyDo = Replace(sReallyDo, "img ", vbCrLf &
     "img ", 1, -1, 1)    sReallyDo = Replace(sReallyDo, "/>
    ", " />
    ", 1, -1, 1)    sReallyDo = ReplaceAll(sReallyDo, "= ", "=", True)    sReallyDo = ReplaceAll(sReallyDo, ">
     ", ">
    ", True)    sReallyDo = Replace(sReallyDo, ">
    ", ">
    " &
     vbCrLf &
     "")    sReallyDo = Trim(sReallyDo)    On Error GoTo 0    Set regEx = New RegExp    regEx.IgnoreCase = True    regEx.Global = True    '//去除onclick,onload等脚本    regEx.Pattern = "\s[on].+?=([\""|\'])(.*?)\1"    sReallyDo = regEx.Replace(sReallyDo, "")    '//将SRC不带引号的图片地址加上引号    regEx.Pattern = "img.*?\ssrc=([^\""\'\s][^\""\'\s>
    ]*).*?>
    "    sReallyDo = regEx.Replace(sReallyDo, "img src=""$1"" />
    ")    '//正则匹配图片SRC地址    regEx.Pattern = "img.*?\ssrc=([\""\'])([^\""\']+?)\1.*?>
    "    sReallyDo = regEx.Replace(sReallyDo, "img src=""$2"" />
    ")    FixImg = sReallyDoEnd Function

上面的代码确实写得不错，原理也可以参考下面的代码

js过滤img里style属性

VAR str = "img style='ddddddddd'>
    "str = str.replace(/img[^>
    ]*>
/gi, function (match, capture) {
return match.replace(/style\s*?=\s*?([‘"])[\s\S]*?\1/ig, '')}
    ))console.LOG(str)

不是替换直接通过js设置

var is=document.images;
    for(var i=0,len=is.length;
    ilen;
i++){
is[i].style.cssText=""}
    

到此这篇关于ASP删除img标签的style属性只保留src的正则函数的文章就介绍到这了,更多相关ASP去除img的style属性内容请搜索以前的文章或继续浏览下面的相关文章希望大家以后多多支持！

声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！