?下面是Zblog的屏蔽評論中敏感關(guān)鍵字的程序代碼,主要用于替換文章評論中的敏感或非法的關(guān)鍵字
只需要修改一個(gè)文件c_system_event.asp,將其中的objComment.Content=Request.Form("inpArticle")修改為objComment.Content=WordFilter(Request.Form("inpArticle"))然后在c_system_event.asp文件尾部加入代碼
Function WordFilter(strInput) Dim i Dim strOutput Dim strFilter strFilter = Split("關(guān)鍵字1,關(guān)鍵字2,關(guān)鍵字3", ",") strOutput = strInput For i = 0 To UBound(strFilter) strOutput = Replace(strOutput, strFilter(i), String(Len(strFilter(i)), "×")) Next WordFilter = strOutput End Function來(lái)源:月光博客
請立即點(diǎn)擊咨詢(xún)我們或撥打咨詢(xún)熱線(xiàn): 18942620423,我們會(huì )詳細為你一一解答你心中的疑難。項目經(jīng)理在線(xiàn)