<%
'將以下內容添加您的論壇或者留言板的提交程序上進行過濾處理。
'請根據您留言板或者論壇提交頁面的輸入框字段進行設置
GuestBookTitle=trim(Request.Form("Title")) 'Title為留言本輸入框的標識名稱，根據您的實際情況進行修改。
GuestBookConntent=trim(Request.Form("Content")) 'Content為留言本輸入框留言內容字段，根據您的實際情況進行修改。
BadWord="出售迷幻藥@六合彩@高鶯鶯死亡@手機竊聽@成人小電影@激情視頻@成人電影@激情電影@出售槍支@槍支出售@大 紀 元@高鶯鶯之死@淫水@九評共產黨@淫電影@法*輪*功@真*善*忍@突 破 封 鎖@法 輪 功@九 評"
'以下代碼為檢測內容是否包含需要屏蔽的字符
'請不要修改
SplitBadWords=split(BadWord,"@")
for each SplitBadWord in SplitBadWords '循環分離出每一個非法字符
if instr(GuestBookTitle,SplitBadWord)<>0 then '判斷留言標題是否包含非法字符
Response.Write("對不起，您輸入的內容中包含非法字符,禁止提交！")
Response.end()
exit for
end if
if instr(GuestBookConntent,SplitBadWord)<>0 then '判斷留言標題是否包含非法字符
Response.Write("對不起，您輸入的內容中包含非法字符,禁止提交！")
Response.end()
exit for
end if
next
%>
