818 İnceleme
Üyelik sistemi olmayan veya üyelik sistemi ile çalışmayan sayfalar kötü niyetli kişiler tarafından kullanılabilir. mesela, yorum ekleme, guestbook gibi alanlara isteyen istedigi bilgiyi yazabilir.Bu kodlar ile küfür koruması yapabiliriz.<% badwordFilter = "Acik" Dim badword badword = "fuck|suck|***" metin = Request.Form("metin" ) strwords = Split(badword, "|" ) For I = 0 to Ubound(strwords) metin = Replace(metin, strwords(I), String(Len(strwords(I)),"*" ), 1,-1,1) next If badwordFilter= "Acik" Then Response.Write metin else Response.Write metin End If %>
