[Beyaz Tahribat] Asp Replace
-
sizlere nasıl replace kullanacağımızı göstereceğim şimdi. bununla ne yapabiliriz ?
türkçe karakter sorunlarını çözebiliriz
pis kötü kaka karakterleri paklayabiliriz
form dan alınan bilgilerde smiley çıkarabilirz vs vs
anlıycağınızı baya bişiler yapabliyoruz , hayal gücünüzü çalıştırıp dahada birşeyler yapabilirsiniz
öncelikle kodumuzu yazalım...--------- K o d - B a şl a n g ı ç ----------------
<%
Function cevir(metin)
metin = Replace(metin,"asp","ASP", 1, -1)
metin = Replace(metin,"ş","s", 1, -1)
metin = Replace(metin,"Ş","S", 1, -1)
metin = Replace(metin,"ç","c", 1, -1)
metin = Replace(metin,"ğ","g", 1, -1)
metin = Replace(metin,"Ğ","G", 1, -1)
metin = Replace(metin,"İ","I", 1, -1)
metin = Replace(metin,"ı","i", 1, -1)
metin = Replace(metin,"ç","b", 1, -1)
metin = Replace(metin,"Ç","C", 1, -1)
metin = Replace(metin,"ö","o", 1, -1)
metin = Replace(metin,"Ö","O", 1, -1)
metin = Replace(metin,"ü","u", 1, -1)
metin = Replace(metin,"Ü","U", 1, -1)
metin = Replace(metin,"U","U", 1, -1)
cevir = metin
End Function
%>-------- K o d - B i t i ş -----------------
şimdi bu kodumuzu yazdık bununla ben türkçe karakter sorunumu çözüyorum mesela ğ ı ş gibi karakterler çıkmıyo diğer sitemde onun için mesela böyle bişi yazdım.
şimdi nasıl kullancaz ? çok basit
<%=cevir(foxxly("baslik"))%> bu şekilde çalışacaktır.
döküman tarafımca yazılmıştır.
[Beyaz Tahribat]
-
ayrıyetten replace ile sağladığım güvenlik kodu.
<%
Function PostKontrol(yazi)
yazi = Replace(yazi, "<", "<", 1, -1, 0)
yazi = Replace(yazi, ">", ">", 1, -1, 0)
yazi = Replace(yazi, "script", "script", 1, -1, 0)
yazi = Replace(yazi, "SCRIPT", "SCRIPT", 1, -1, 0)
yazi = Replace(yazi, "Script", "Script", 1, -1, 0)
yazi = Replace(yazi, "script", "Script", 1, -1, 1)
yazi = Replace(yazi, "object", "object", 1, -1, 0)
yazi = Replace(yazi, "OBJECT", "OBJECT", 1, -1, 0)
yazi = Replace(yazi, "Object", "Object", 1, -1, 0)
yazi = Replace(yazi, "object", "Object", 1, -1, 1)
yazi = Replace(yazi, "applet", "applet", 1, -1, 0)
yazi = Replace(yazi, "APPLET", "APPLET", 1, -1, 0)
yazi = Replace(yazi, "Applet", "Applet", 1, -1, 0)
yazi = Replace(yazi, "applet", "Applet", 1, -1, 1)
yazi = Replace(yazi, "embed", "embed", 1, -1, 0)
yazi = Replace(yazi, "EMBED", "EMBED", 1, -1, 0)
yazi = Replace(yazi, "Embed", "Embed", 1, -1, 0)
yazi = Replace(yazi, "embed", "Embed", 1, -1, 1)
yazi = Replace(yazi, "event", "event", 1, -1, 0)
yazi = Replace(yazi, "EVENT", "EVENT", 1, -1, 0)
yazi = Replace(yazi, "Event", "Event", 1, -1, 0)
yazi = Replace(yazi, "event", "Event", 1, -1, 1)
yazi = Replace(yazi, "document", "document", 1, -1, 0)
yazi = Replace(yazi, "DOCUMENT", "DOCUMENT", 1, -1, 0)
yazi = Replace(yazi, "Document", "Document", 1, -1, 0)
yazi = Replace(yazi, "document", "Document", 1, -1, 1)
yazi = Replace(yazi, "cookie", "cookie", 1, -1, 0)
yazi = Replace(yazi, "COOKIE", "COOKIE", 1, -1, 0)
yazi = Replace(yazi, "Cookie", "Cookie", 1, -1, 0)
yazi = Replace(yazi, "cookie", "Cookie", 1, -1, 1)
yazi = Replace(yazi, "form", "form", 1, -1, 0)
yazi = Replace(yazi, "FORM", "FORM", 1, -1, 0)
yazi = Replace(yazi, "Form", "Form", 1, -1, 0)
yazi = Replace(yazi, "form", "Form", 1, -1, 1)
yazi = Replace(yazi, "on", "on", 1, -1, 0)
yazi = Replace(yazi, "ON", "ON", 1, -1, 0)
yazi = Replace(yazi, "On", "On", 1, -1, 0)
yazi = Replace(yazi, "on", "on", 1, -1, 1)
yazi = Replace(yazi, "document.cookie", "Document.cookie", 1, -1, 1)
yazi = Replace(yazi, "javascript:", "javascript ", 1, -1, 1)
yazi = Replace(yazi, "vbscript:", "vbscript ", 1, -1, 1)
yazi = Replace(yazi, "", "")
yazi = Replace(yazi, "'", " ")
yazi = Replace(yazi, "?", " ")
yazi = Replace(yazi, vbCrLf, "")
PostKontrol = yazi
End Function
%>kullanım :
veri=postkontrol(request.form("veri"))
<%=veri%>
-
<%
Function suz(kelime)
kelime = Replace (kelime ,"`","",1,-1,1)
kelime = Replace (kelime ,"=","",1,-1,1)
kelime = Replace (kelime ,"&","",1,-1,1)
kelime = Replace (kelime ,"%","",1,-1,1)
kelime = Replace (kelime ,"!","",1,-1,1)
kelime = Replace (kelime ,"#","",1,-1,1)
kelime = Replace (kelime ,"<","",1,-1,1)
kelime = Replace (kelime ,">","",1,-1,1)
kelime = Replace (kelime ,"*","",1,-1,1)
kelime = Replace (kelime ,"/","",1,-1,1)
kelime = Replace (kelime ,"\","",1,-1,1)
kelime = Replace (kelime ,"And","",1,-1,1)
kelime = Replace (kelime ,"'","",1,-1,1)
kelime = Replace (kelime ,"Chr(34)","",1,-1,1)
kelime = Replace (kelime ,"Chr(39)","",1,-1,1)
kelime = Replace(kelime, "script", "script", 1, -1, 0)
kelime = Replace(kelime, "SCRIPT", "SCRIPT", 1, -1, 0)
kelime = Replace(kelime, "Script", "Script", 1, -1, 0)
kelime = Replace(kelime, "script", "Script", 1, -1, 1)
kelime = Replace(kelime, "object", "object", 1, -1, 0)
kelime = Replace(kelime, "OBJECT", "OBJECT", 1, -1, 0)
kelime = Replace(kelime, "Object", "Object", 1, -1, 0)
kelime = Replace(kelime, "object", "Object", 1, -1, 1)
kelime = Replace(kelime, "applet", "applet", 1, -1, 0)
kelime = Replace(kelime, "APPLET", "APPLET", 1, -1, 0)
kelime = Replace(kelime, "Applet", "Applet", 1, -1, 0)
kelime = Replace(kelime, "applet", "Applet", 1, -1, 1)
kelime = Replace(kelime, "embed", "embed", 1, -1, 0)
kelime = Replace(kelime, "EMBED", "EMBED", 1, -1, 0)
kelime = Replace(kelime, "Embed", "Embed", 1, -1, 0)
kelime = Replace(kelime, "embed", "Embed", 1, -1, 1)
kelime = Replace(kelime, "event", "event", 1, -1, 0)
kelime = Replace(kelime, "EVENT", "EVENT", 1, -1, 0)
kelime = Replace(kelime, "Event", "Event", 1, -1, 0)
kelime = Replace(kelime, "event", "Event", 1, -1, 1)
kelime = Replace(kelime, "document", "document", 1, -1, 0)
kelime = Replace(kelime, "DOCUMENT", "DOCUMENT", 1, -1, 0)
kelime = Replace(kelime, "Document", "Document", 1, -1, 0)
kelime = Replace(kelime, "document", "Document", 1, -1, 1)
kelime = Replace(kelime, "cookie", "cookie", 1, -1, 0)
kelime = Replace(kelime, "COOKIE", "COOKIE", 1, -1, 0)
kelime = Replace(kelime, "Cookie", "Cookie", 1, -1, 0)
kelime = Replace(kelime, "cookie", "Cookie", 1, -1, 1)
kelime = Replace(kelime, "form", "form", 1, -1, 0)
kelime = Replace(kelime, "FORM", "FORM", 1, -1, 0)
kelime = Replace(kelime, "Form", "Form", 1, -1, 0)
kelime = Replace(kelime, "form", "Form", 1, -1, 1)
kelime = Replace(kelime, "on", "on", 1, -1, 0)
kelime = Replace(kelime, "ON", "ON", 1, -1, 0)
kelime = Replace(kelime, "On", "On", 1, -1, 0)
kelime = Replace(kelime, "on", "on", 1, -1, 1)
kelime = Replace(kelime, "document.cookie", "Document.cookie", 1, -1, 1)
kelime = Replace(kelime, "javascript:", "javascript ", 1, -1, 1)
kelime = Replace(kelime, "vbscript:", "vbscript ", 1, -1, 1)
suz=kelime
End Function
%>bende böyle yapıyorum usta ' <> falna koymasınlar diye kayıttır şudur budur.Sondakileri sendne arkaladım :D
