asp 自动去除字符中含有html代码的几个
<%Function Remove_HTML(Str)Dim ilen1, ilen2Do While InStr(1, Str, "<", 1) >0ilen1 = InStr(1, Str, "<", 1)ilen2 = InStr(1, Str, ">", 1)Str = Left(Str, ilen1 -1) & Mid(Str, ilen2 + 1)LoopRemove_HTML = StrEnd Function Function RemoveHTMLTag(fString)Dim reSet re = New RegExpre.Ignore...