![]() |
|
|||||||
Küfür Koruması ![]() |
|
|
LinkBack | Seçenekler | Stil |
|
|
#1 |
|
Ü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.
Kod: <% badwordFilter = "Acik" Dim badword badword = "++++|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 %> |
|
|
|
|
![]() |
| Bookmarks |
| Etiketler |
| korumasi, koruması, küfür |
| Seçenekler | |
| Stil | |
|
|