如何过滤提交表单中的脚本代码？

Question

to： flyycyu(fly) 怎样做？scripts集合不是太多了吗？有没有现成的函数？

Answer 1

function DelHtmlTag(Word) {
a = Word.indexOf("<");
b = Word.indexOf(">");
len = Word.length;
c = Word.substring(0, a);
if(b == -1)
b = a;
d = Word.substring((b + 1), len);
Word = c + d;
tagCheck = Word.indexOf("<");
if(tagCheck != -1){
Word = Del(Word);
}
return Word;
} function chkStr(obj){
chkStred = DelHtmlTag(obj.value);
obj.value = chkStred
return false;
}

Answer 2

： rejobs(小嘿) DelHtmlTag函数中应用循环，否则无法处理，如：
chkStr("<table><tr><td>hello</td></tr></table>");

Answer 3

function HTMLEncode(fString)
if not isnull(fString) then
    fString = replace(fString, ">", "&gt;")
    fString = replace(fString, "<", "&lt;")    fString = Replace(fString, CHR(32), "&nbsp;")
    fString = Replace(fString, CHR(9), "&nbsp;")
    fString = Replace(fString, CHR(34), "&quot;")
    fString = Replace(fString, CHR(39), "&#39;")
    fString = Replace(fString, CHR(13), "")
    fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
    fString = Replace(fString, CHR(10), "<BR> ")    fString=ChkBadWords(fString)
    HTMLEncode = fString
end if
end function

Answer 4

把大家从验证中解放出来，以后不用写验证替换过滤脚本和html了
<style type="text/css">
TEXTAREA {

BORDER-RIGHT: 0px;
BORDER-TOP: 0px;
BORDER-LEFT: 0px; 
BORDER-BOTTOM: 0px; 
WIDTH: 100%; 
overflow : visible ;
} </style>
  <TEXTAREA 
name=textarea1
 wrap="hard"  
id=textarea1 
 Scrolling=No 
 readonly>内容<script>
alert("写啥都行，不会执行！正常显示！");
 </script></TEXTAREA>