Sitenizi küfürden koruma kodu

**SrKn** · 13.09.2018, 13:22

Sitenizi küfürden koruma kodu

<%
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
%>

alıntı

**Fency** · 02.11.2018, 09:36

Denene bilir

13.09.2018, 13:22	#1 (permalink)
SrKn ultrAslan Kullanıcıların profil bilgileri misafirlere kapatılmıştır.	Sitenizi küfürden koruma kodu Sitenizi küfürden koruma kodu <% 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 %> alıntı Benzer Konular Yandex Metrica İle Sitenizi Kontrol Edin... Çevre koruma haftası hakkında şiirler, Çevre koruma haftası şiirleri... Sitenizi Akismet İle Spam Yorumlardan korumak... Web sitenizi indexletme... Paylaş Share this post on Twitter MeLodi beğendi. Follow @Forumaski __________________ Fitness Eğitmeni

02.11.2018, 09:36	#2 (permalink)
Fency Yeni Üye Kullanıcıların profil bilgileri misafirlere kapatılmıştır.	Cevap: Sitenizi küfürden koruma kodu Denene bilir Paylaş Share this post on Twitter Follow @Forumaski