<% bolum=guvenlik(request("bolum")) sql="SELECT * FROM haber WHERE bolum=" & guvenlik(request("bolum")) Set rs=cilem.Execute(sql) %> <%bolum=guvenlik(request("bolum")) puan=request("puan") if Request.Cookies("cilemnet")(bolum) = "Son" then %> <%else%> <% Set rs = Server.CreateObject("ADODB.Recordset") sql="SELECT * FROM haber WHERE bolum=" & guvenlik(request("bolum")) rs.Open sql,cilem,1,3 rs("puan")=rs("puan")+puan rs.update Response.Cookies("cilemnet")(bolum) = "Son" Response.Cookies("cilemnet").Expires = Now() + 365 %> <%end if%>