查询是否还有黑客代码的asp.net函数，非常适合留言簿、bbs、聊天室
<%@ page language="vb"%>
<script runat="server">
dim heike(2) as string
dim i as integer
'定义黑客代码
public sub heikeword(a as string)
heike(0)="1234"
heike(1)="125"
dim re as system.text.regularexpressions.regex
for i=0 to 1
re=new system.text.regularexpressions.regex(heike(i))
if(re.match(a).success)
response.write (heike(i)+" ")
response.write ("success")
end if
next
end sub
</script>
<%
dim a as string="1234345" '就是要检测的内容
heikeword(a)
%>
