SMYRN acc System

merhaba beyler SMYRN account sıstemınde açık vardır kullanan arkadaslara duyrulur

index.asp yi açın

fuction satırını bulun ve bunla degıstırın

ata = Replace (data ,"=","",1,-1,1)
data = Replace (data ,"&","",1,-1,1)
data = Replace (data ,"%","",1,-1,1)
data = Replace (data ,"!","",1,-1,1)
data = Replace (data ,"#","",1,-1,1)
data = Replace (data ,"<","",1,-1,1)
data = Replace (data ,">","",1,-1,1)
data = Replace (data ,"*","",1,-1,1)
data = Replace (data ,"\","",1,-1,1)
data = Replace (data ,"/","",1,-1,1)
data = Replace (data ,"^","",1,-1,1)
data = Replace (data ,")","",1,-1,1)
data = Replace (data ,"(","",1,-1,1)
data = Replace (data ,"+","",1,-1,1)
data = Replace (data ,"é","",1,-1,1)
data = Replace (data ,"{","",1,-1,1)
data = Replace (data ,"[","",1,-1,1)
data = Replace (data ,"]","",1,-1,1)
data = Replace (data ,"}","",1,-1,1)
data = Replace (data ,"|","",1,-1,1)
data = Replace (data ,"$","",1,-1,1)
data = Replace (data ,"And","",1,-1,1)
data = Replace (data ,"'","",1,-1,1)
data = Replace (data ,";","",1,-1,1)
data = Replace (data ,":","",1,-1,1)
data = Replace (data ,"?","",1,-1,1)
data = Replace (data ,"ö","o",1,-1,1)
data = Replace (data ,"Ö","o",1,-1,1)
data = Replace (data ,"ç","c",1,-1,1)
data = Replace (data ,"s","s",1,-1,1)
data = Replace (data ,"S","s",1,-1,1)
data = Replace (data ,"I","i",1,-1,1)
data = Replace (data ,"i","i",1,-1,1)
data = Replace (data ,"ü","u",1,-1,1)
data = Replace (data ,"Ü","u",1,-1,1)
data = Replace (data ,"g","g",1,-1,1)
data = Replace (data ,"G","g",1,-1,1)
data = Replace (data ,"Chr(34)","",1,-1,1)
data = Replace (data ,"Chr(39)","",1,-1,1)
data = Replace (data ,"select","",1,-1,1)
data = Replace (data ,"join","",1,-1,1)
data = Replace (data ,"union","",1,-1,1)
data = Replace (data ,"where","",1,-1,1)
data = Replace (data ,"insert","",1,-1,1)
data = Replace (data ,"delete","",1,-1,1)
data = Replace (data ,"update","",1,-1,1)
data = Replace (data ,"like","",1,-1,1)
data = Replace (data ,"drop","",1,-1,1)
data = Replace (data ,"create","",1,-1,1)
data = Replace (data ,"modify","",1,-1,1)
data = Replace (data ,"rename","",1,-1,1)
data = Replace (data ,"alter","",1,-1,1)
data = Replace (data ,"cast","",1,-1,1)
data = Replace (data ,"admin","",1,-1,1)
data = Replace (data ,"yetkili","",1,-1,1)
data = Replace (data ,"sphere","",1,-1,1)
data = Replace (data ,"orospu","",1,-1,1)
data = Replace (data ,"kaltak","",1,-1,1)
data = Replace (data ,"gm","",1,-1,1)
data = Replace (data ,"etheria","",1,-1,1)
data = Replace (data ,"etheria_","",1,-1,1)
data = Replace (data ,"administrator","",1,-1,1)
data = Replace (data ,"edit","",1,-1,1)
data = Replace (data ,"teot","",1,-1,1)
data = Replace (data ,"owner","",1,-1,1)
data = Replace (data ,"developer","",1,-1,1)
data = Replace (data ,"worldbuilder","",1,-1,1)
data = Replace (data ,"selizar","",1,-1,1)


fuction control username'ı bulun bununla degıstırın

function controlusername(str)
controlusername = "0"
if str = "" then
errormsg = errormsg & "<span class=""style5"">Hesap ismine girilmemesi gerek kelime ve/veya karakter girdiniz!!!</span>"
controlusername = "1"
elseif len(str) < 4 then
errormsg = errormsg & "<span class=""style5"">Kullanici adiniz 4 karakterden kisa olamaz.</span>"
controlusername="1"
elseif len(str) > 10 then
errormsg = errormsg & "<span class=""style5"">Kullanici adiniz 10 karakterden uzun olamaz.</span>"
controlusername="1"
else
for i = 1 to len(str)
if instr(1,"abcdefghijklmnoprstuwxvz0123456789",mid(str,i,1),vbBinaryCompare) = "0" then
errormsg = errormsg & "<span class=""style5"">DIKKAT<br>Kayit olabilmek icin sadece Turkce Karakterlerden olusan harfler ve 0 ila 9 arasi rakamlari kullaniniz.../Selizar</span>"
controlusername = "1"
exit for
end if
next
end if
end function



bu şekilde açıgı yamayabılırsınız unutmayın CHMOD ayarlarını Read & Write verın Modify ve/veya full control vermeyın .