Sayfa YenileninCe Puan Geliyor

Arkadaşlar elimde bir script var.level_atla.asp'ta sorun var.Sayfayı yenileyince habire +1 puan gidiyor üyeye.Ben bunu günde 1 kere olmasını istiyorum.Nasıl yapabilirim.

Kodlar şunlar ;

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-9" />
<!-- TemplateBeginEditable name="doctitle" -->
<title>Pokemon'um</title>
<!-- TemplateEndEditable -->
<link href="resimler/css_stil.css" rel="stylesheet" type="text/css" />
<!-- TemplateBeginEditable name="head" --><!-- TemplateEndEditable -->
</head>

<body>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td colspan="2"><img src="resimler/logo.jpg" alt="header" width="806" height="146" /></td>
  </tr>
  <tr>
    <td colspan="2" bgcolor="#333333" class="menu_nav"><a href="default.asp">Anasayfa</a><a href="top100.asp">TOP 100</a><a href="iletisim.asp"> İletişim</a></td>
  </tr>
  <tr>
    <td width="176" valign="top" class="left_column"><!-- TemplateBeginEditable name="left_column" -->


<TABLE><TR>

<TD BACKGROUND="resimler/top10.jpg" width="160" height="220">

<center><b><font color="white">Çok yakında</color></b></center>
</TD></TR></TABLE> 

      <!-- TemplateEndEditable --></td>
    <td width="630" valign="top" class="right_column"><!-- TemplateBeginEditable name="right_column" -->
      <p>
<%

yasaricli=request.Cookies("yasaricli" )("ip" )
yasar=request.servervariables("REMOTE_ADDR" )

if yasaricli=yasar then

Response.Write "Daha önceden bu Pokemon'a yardım ettiniz!"
%>
<%else%>
<!-- #include file="db.asp" -->
<%
function guvenlik(veri)
veri = Replace (veri ,"`","",1,-1,1)
veri = Replace (veri ,"=","",1,-1,1)
veri = Replace (veri ,"%","",1,-1,1)
veri = Replace (veri ,"!","",1,-1,1)
veri = Replace (veri ,"#","",1,-1,1)
veri = Replace (veri ,"<","",1,-1,1)
veri = Replace (veri ,">","",1,-1,1)
veri = Replace (veri ,"","",1,-1,1)
veri = Replace (veri ,"chr(10)","",1,-1,1)
veri = Replace (veri ,"'","",1,-1,1)
veri = Replace (veri ,"Chr(34)","",1,-1,1)
veri = Replace (veri ,"Chr(39)","",1,-1,1)

guvenlik=veri
end function

id = guvenlik(request("id"))

set ekle=server.CreateObject("ADODB.recordset" )
sorgum = "Select * from kayit where id = "&id
ekle.open sorgum,baglanti,1,3
if not ekle.eof then
if ekle("level")<> "" and ekle("sayi")<> "" then
ekle("level")= ekle("level")+1
ekle("sayi") = ekle("sayi")+1
ekle.update
else
ekle("level")=1
ekle("sayi") = 1
ekle.update
end if

Response.Write "<b><center><font face=""Arial"" size=""2"" color=""#11B4EB"">Level Atladı</font></center></b>"

end if
ekle.close
set ekle = nothing 

%> 
<%end if%>

</p>
     
    <!-- TemplateEndEditable --></td>
  </tr>
  <tr>
    <td colspan="2" class="footer">Tasarım &amp; Programlama: CoderWriter <br> Images by suta-raito.com (Resimler &uuml;zerinde suta-raito.com hak sahibidir.)<br>Pokemon'um is in no way affiliated with or related to Nintendo or Game Freak.(Bu sitenin Nintendo ve Game Freak ile alakası yoktur.)</td>
  </tr>
</table>
</body>
</html>

ilk olarak aklıma gelen tarih kontrolü yapabilirsin...
eğer ay ve gün aynı ise +1 gitmesin eğer gün farklı yada ay farklı ise +1 gitsin gibi...

Hocam.ASP bilgim yok.Verdiğim kodların üzerine edit yapıp göndersen?

ben bunu hocam aspde bir script yazdım dediğinden dolayı öyle bir örnek vermiştim.
vaktim olur ise yardımcı olmaya calısacagım

Hocam.Bu açığın adı nedir.Söylermisiniz araştırayım internetten?

hocam bu bir açık değildir.
ip kontrolu yapıp ipyi kaydedip o gün içerisinde o ipden bir daha +1 eklenmemesi lazım
en basit olarak
tekil ve çoğul hit sayan sayaç örneklerine bakabilirsiniz...
en azından sistem olarak sizinkine benzeyecektir.

bu arada gözümden kaçmış...
senin zaten bunun için bir kontrolün varmış.
cookies ile

yasaricli=request.Cookies("yasaricli" )("ip" )
yasar=request.servervariables("REMOTE_ADDR" )

bu sanırım cookies yaratmıyor.
eğer yaratıyor olsaydı böyle bir sorun olmazdı.
bunu bi kontrol et istersen

Evet Cookie.asp var gördüm fakat nasıl yapılacağını bilmiyorum ASP bilgim yok.

Cookie.asp ;

 <%
Response.buffer = True
' first we put the data from the form into a variable
name = Request.Form("name")

'then we can set the cookie value using this:
Response.Cookies("name") = name
%>

Hocam bunlar cookie.asp'taki kodlar.Rica etsem ilk mesajdakini editlermisiniz buna göre?

cookie.asp yi

<%
Response.buffer = True
' first we put the data from the form into a variable
name = Request.Form("name")

'then we can set the cookie value using this:
Response.Cookies("name") = name

yasaricli=request.servervariables("REMOTE_ADDR" )
Response.Cookies("yasaricli") = yasaricli
%>

bu şekilde yapıp denermisin.