Forum
Aktif konular
Üyeler
Kurallar
Arama
Asp Güvenlik Uygulaması - Flood A Son Asp Güvenlik Uygulaması - Flood A Son
-
<!--#include file="antiflood.asp" -->
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function YY_checkform() { //v4.66
//copyright (c)ByBuRCUVA maxasp.org
var args = YY_checkform.arguments; var myDot=true; var myV=''; var myErr='';var addErr=false;var myReq;
for (var i=1; i<args.length;i=i+4){
if (args[i+1].charAt(0)=='#'){myReq=true; args[i+1]=args[i+1].substring(1);}else{myReq=false}
var myObj = MM_findObj(args[i].replace(/\[\d+\]/ig,""));
myV=myObj.value;
if (myObj.type=='text'||myObj.type=='password'||myObj.type=='hidden'){
if (myReq&&myObj.value.length==0){addErr=true}
if ((myV.length>0)&&(args[i+2]==1)){ //fromto
var myMa=args[i+1].split('_');if(isNaN(myV)||myV<myMa[0]/1||myV > myMa[1]/1){addErr=true}
} else if ((myV.length>0)&&(args[i+2]==2)){
var rx=new RegExp("^[\\w\.=-]+@[\\w\\.-]+\\.[a-z]{2,4}$");if(!rx.test(myV))addErr=true;
} else if ((myV.length>0)&&(args[i+2]==3)){ // date
var myMa=args[i+1].split("#"); var myAt=myV.match(myMa[0]);
if(myAt){
var myD=(myAt[myMa[1]])?myAt[myMa[1]]:1; var myM=myAt[myMa[2]]-1; var myY=myAt[myMa[3]];
var myDate=new Date(myY,myM,myD);
if(myDate.getFullYear()!=myY||myDate.getDate()!=myD||myDate.getMonth()!=myM){addErr=true};
}else{addErr=true}
} else if ((myV.length>0)&&(args[i+2]==4)){ // time
var myMa=args[i+1].split("#"); var myAt=myV.match(myMa[0]);if(!myAt){addErr=true}
} else if (myV.length>0&&args[i+2]==5){ // check this 2
var myObj1 = MM_findObj(args[i+1].replace(/\[\d+\]/ig,""));
if(myObj1.length)myObj1=myObj1[args[i+1].replace(/(.*\[)|(\].*)/ig,"")];
if(!myObj1.checked){addErr=true}
} else if (myV.length>0&&args[i+2]==6){ // the same
var myObj1 = MM_findObj(args[i+1]);
if(myV!=myObj1.value){addErr=true}
}
} else
if (!myObj.type&&myObj.length>0&&myObj[0].type=='radio'){
var myTest = args[i].match(/(.*)\[(\d+)\].*/i);
var myObj1=(myObj.length>1)?myObj[myTest[2]]:myObj;
if (args[i+2]==1&&myObj1&&myObj1.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
if (args[i+2]==2){
var myDot=false;
for(var j=0;j<myObj.length;j++){myDot=myDot||myObj[j].checked}
if(!myDot){myErr+='* ' +args[i+3]+'\n'}
}
} else if (myObj.type=='checkbox'){
if(args[i+2]==1&&myObj.checked==false){addErr=true}
if(args[i+2]==2&&myObj.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
} else if (myObj.type=='select-one'||myObj.type=='select-multiple'){
if(args[i+2]==1&&myObj.selectedIndex/1==0){addErr=true}
}else if (myObj.type=='textarea'){
if(myV.length<args[i+1]){addErr=true}
}
if (addErr){myErr+='* '+args[i+3]+'\n'; addErr=false}
}
if (myErr!=''){alert('Hata Bulundu !!!:\t\t\t\t\t\n\n'+myErr)}
document.MM_returnValue = (myErr=='');
}
//-->
</script>
<form method="POST" action="foxxly.asp" name="guvenlikformu" onSubmit="YY_checkform('guvenlikformu','gkod','#gkod2','6','Yanlış Güvenlik Kodu Girdiniz,Lütfen Kontrol Ediniz.');return document.MM_returnValue">
//////////
bilgicikler buraya/////////
<tr>
<td width="18%" bgcolor="#FFFFFF">
<%
dim randnum
randnum = RndStringGen(5,1,2)
For intWriteDigitLoopCount = 1 to Len(randnum)
Response.Write("<img src=""resimler/")
Response.Write(Mid(randnum, intWriteDigitLoopCount, 1) & ".gif""")
Response.Write("alt=""" & Mid(randnum, intWriteDigitLoopCount, 1) & """>")
Next
%>
</td>
<td width="35%">
<input type="text" name="gkod" size="20"></td>
</tr>
<input name="Submit Form" id="Submit Form" value="Submit" type="submit" value="....:::: Gönder ::::...." class="forrm" >
<input name="gkod2" type="hidden" id="textfield22" value="<%=randnum%>">
</form>-----------------form.asp---------------------------
bu sayfa form u göndereceğiniz sayfa
aşağıdakide antiflood.asp sayfası
<%
Function RndStringGen(str_lenght, str_whatcase, str_numberbias) 'define function and passed parameters
If Len(str_lenght) = 0 Or IsNumeric(str_lenght) = False Then str_lenght = 10 End If
str_lenght = CLng(str_lenght)
If str_lenght < 1 Or str_lenght > 1000 Then str_lenght = 10 End If
If Len(str_numberbias) = 0 Or IsNumeric(str_numberbias) = False Then str_numberbias = 5 End If
str_numberbias = CSng(str_numberbias)
If str_numberbias < 0 Or str_numberbias > 10 Then str_numberbias = 5 End If
str_numberbias = str_numberbias / 10 'make to value below 1 so it is of the same magnatude as the random string
str_counter = 0
Do Until str_counter = str_lenght
Randomize
If rnd < str_numberbias Then
Randomize
str_chracters = str_chracters & Chr((((57 - 48) * rnd) + 48))
Else
Randomize
str_chracters = str_chracters & Chr((((122 - 97) * rnd) + 97))
End If
str_counter = CInt(str_counter) + 1
Loop
If str_whatcase = 1 Then
str_chracters_final = UCase(str_chracters)
ElseIf str_whatcase = 2 Then
For i = 1 to Len(str_chracters)
j = Mid(str_chracters, i, 1)
Randomize
If rnd < 0.5 Then
j = UCase(j)
Else
j = LCase(j)
End If
str_chracters_mixed = str_chracters_mixed & j 'add the character to the string
Next
str_chracters_final = str_chracters_mixed
Else
str_chracters_final = LCase(str_chracters)
End If
RndStringGen = str_chracters_final
End Function
%>-----------------
bu kadar dosyaları kayıt edin yeterli
http://uploaded.to/?id=art30p&lang=tr
bura kullanacağınız resimler ;)
-
php yokmu :(
-
malesef ben sadece asp biliyorum :(
-
foxxly sen webwizcisin, bunu default.asp'ye include mu edeceğiz?
ya da o diablonun yaptığı bozuk flood koruma dosyası değildir umarım bu???
-
yellowstar bunu yazdı:
-----------------------------foxxly sen webwizcisin, bunu default.asp'ye include mu edeceğiz?
ya da o diablonun yaptığı bozuk flood koruma dosyası değildir umarım bu???
-----------------------------yok yaf bu çalışıyor , bozuk değil. bugüns abah kendi forumuma entegre ettim.
bunun webwizde işin ne :) webwizin içinde zaten varki flood kourması admin panelinde.
bunu , ziyaretci defteri, üyelik , mesaj panosu vs yerlerde kullanırsın
-
haaa
ben şimdi anlamak foxxly :D
Kısayol
Şikayet
Özel Mesaj
Alıntı yap
Cevapla