拿文章系统后台添加数据来说吧。就是加个过滤函数就行了。

打开admin/ks.article.asp



找到

For I=0 To Ubound(UserDefineFieldArr,2)

If UserDefineFieldArr(3,I)=10  Then   '支持HTML时

RS("" & UserDefineFieldArr(0,I) & "")=Request(UserDefineFieldArr(0,I))

else

RS("" & UserDefineFieldArr(0,I) & "")=KS.G(UserDefineFieldArr(0,I))

end if

If UserDefineFieldArr(12,I)="1"  Then

RS("" & UserDefineFieldArr(0,I) & "_Unit")=KS.G(UserDefineFieldArr(0,I)&"_Unit")

End If

Next

改成

For I=0 To Ubound(UserDefineFieldArr,2)

If UserDefineFieldArr(3,I)=10  Then   '支持HTML时

RS("" & UserDefineFieldArr(0,I) & "")=KS.FilterIllegalChar(Request(UserDefineFieldArr(0,I)))

else

RS("" & UserDefineFieldArr(0,I) & "")=KS.FilterIllegalChar(KS.G(UserDefineFieldArr(0,I)))

end if

If UserDefineFieldArr(12,I)="1"  Then

RS("" & UserDefineFieldArr(0,I) & "_Unit")=KS.FilterIllegalChar(KS.G(UserDefineFieldArr(0,I)&"_Unit"))

End If

Next





即在取数据里，加上过滤函数 KS.FilterIllegalChar,前台修改类似