在服务器端使用JS过滤编辑器中的多余的代码

经常会遇到这样的麻烦，客户在复制word中的内容到编辑器中，会发现有许多多余的代码，又不能直接使用remove函数将所有的格式去掉，因为里面有表格。所以想使用一个函数即可过滤不想要的内容，但又要保留下我想要的表格等内容。
<
%
================================================
显示解释函数，返回根据参数允许显示的格式字符串，具体调用方法可从后台管理获得
输入参数：
 
s_Content 
: 
要转换的数据字符串
 
sFilters: 
要过滤掉的格式集，用逗号分隔多个
================================================
Function strFilter(s_Content, sFilters)
 
Dim a_Filter, i, s_Result, s_Filters
 
strFilter = s_Content
 
If IsNull(s_Content) Then Exit Function
 
If s_Content = Then Exit Function
 
s_Result = s_Content
 
s_Filters = sFilters

 
设置默认过滤
 
If sFilters = Then s_Filters = script,object

 
a_Filter = Split(s_Filters, ,)
 
For i = 0 To UBound(a_Filter)
 
 
s_Result = strFilterDecode(s_Result, a_Filter(i))
 
Next
 
strFilter = s_Result
End Function
%>

<
Script Language=JavaScript RunAt=Server>

//===============================================
// 单个过滤
// 输入参数：
// 
s_Content 
: 
要转换的数据字符串
// 
s_Filter 
: 
要过滤掉的单个格式
//===============================================
function strFilterDecode(html, filter)
{
 
switch(filter.toUpperCase())
{
 
case SCRIPT: 
 
// 去除所有客户端脚本javascipt,vbscript,jscript,js,vbs,event,...
 
 
html = strExecReg(<
/?script[>
]*>
, , html)

 
 
html = strExecReg((javascript|jscript|vbscript|vbs):, $1：, html)

 
 
html = strExecReg(on(mouse|exit|error|click|key), <
I>
on$1<
/I>
, html)

 
 
html = strExecReg(&

#, <
I>
&

#<
/I>
, html)

 
 
break

 
case TABLE: 
 
// 去除表格<
table>
<
tr>
<
td>
<
th>

 
 
html = strExecReg(<
/?table[>
]*>
, , html)

 
 
html = strExecReg(<
/?tr[>
]*>
, , html)

 
 
html = strExecReg(<
/?th[>
]*>
, , html)

 
 
html = strExecReg(<
/?td[>
]*>
, , html)

 
 
break

 
case CLASS: 
 
// 去除样式类class=
 
 
html = strExecReg((<
[>
]) class=[ |>
]*([>
]*>
), $1 $2, html)

 
 
break

 
case STYLE: 
 
// 去除样式style=
 
 
html = strExecReg((<
[>
]) style=\[\]*\([>
]*>
), $1 $2, html)

 
 
break

 
case XML: 
 
 
// 去除XML<
?xml>

 
 
html = strExecReg(<
\\?xml[>
]*>
, , html)

 
 
break

 
case NAMESPACE: 
// 去除命名空间<
o:p>
<
/o:p>

 
 
html = strExecReg(<
\/?[a-z]:[>
]*>
, , html)

 
 
break

 
case FONT: 
 
// 去除字体<
font>
<
/font>

 
 
html = strExecReg(<
/?font[>
]*>
, , html)

 
 
break

 
case MARQUEE: 
 
// 去除字幕<
marquee>
<
/marquee>

 
 
html = strExecReg(<
/?marquee[>
]*>
, , html)

 
 
break

 
case OBJECT: 
 
// 去除对象<
object>
<
param>
<
embed>
<
/object>

 
 
html = strExecReg(<
/?object[>
]*>
, , html)

 
 
html = strExecReg(<
/?param[>
]*>
, , html)

 
 
html = strExecReg(<
/?embed[>
]*>
, , html)

 
 
break

 
case IFRAME: 
 
// 去除框架<
iframe>
<
/iframe>

 
 
html = strExecReg(<
/?iframe[>
]*>
, , html)

 
 
break

 
default:
 
}
 
return html

}

// ============================================
// 执行正则表达式替换
// ============================================
function strExecReg(re, rp, content)
{
 
oReg = new RegExp(re, ig)

 
var r = content.replace(oReg, rp)

 
return r

}
<
/script>

注意这里的<
Script Language=JavaScript RunAt=Server>
说明这个js只允许在服务器端运行，客户端是看不到

Function strFilter(s_Content, sFilters)函数中的参数是自己想要过滤的内容，具体值在下面的js函数中的case，大家根据自己的需要传入参数。