查詢是否還有黑客代碼的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)
%>
