ASP Küfür Koruması

Sisimores
FORUMSAL.NET YENİDEN ERİŞİME AÇILDI ForumSAL · Bilgilendirme

Yaşanan süreçte sabır gösteren ve yanımızda olan tüm üyelerimize teşekkür ederiz. Alternatif adreslerimiz üzerinden de bize ulaşabilirsiniz.

Alternatif erişim adreslerimiz
frmsal.com ↗ frmsal.net ↗ frmsal.org ↗
⚪ Konu yazarı en son 3734 gün önce aktifti
Ü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 = "++++|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
%>
Genişletmek için tıkla ...
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri