|
#2
zmh8862011-01-01 13:26
|
程序代码：dim kword
kword=split("fuck,傻逼,他妈的,我靠,我操,去死,我叼,or,and,exec,insert,select,delete,update,count,%22,%27,chr,mid,master,truncate,char,declare,eval",",") '屏蔽字符，用逗号“,”隔开
function killWord(s)
dim KwC,kw,kstr
for each kw in kword
kstr=""
KwC = instr(s,kword(kw-1))
if kwc>0 then
kstr=kstr+kword(kw)+","
next
killWord=kstr
end function
这函数有问题？？？循环应该没错吧？ 总说：错误的NEXT 高手帮忙改改。 kword=split("fuck,傻逼,他妈的,我靠,我操,去死,我叼,or,and,exec,insert,select,delete,update,count,%22,%27,chr,mid,master,truncate,char,declare,eval",",") '屏蔽字符，用逗号“,”隔开
function killWord(s)
dim KwC,kw,kstr
for each kw in kword
kstr=""
KwC = instr(s,kword(kw-1))
if kwc>0 then
kstr=kstr+kword(kw)+","
next
killWord=kstr
end function
