Ziyaretçiye bir cookie göndererek kaç saat sonra tekrar hitin yazılacağını aşağıdaki bölümden ayarlayabilirsin.
("n",12,now())


<%
if request.cookies("deneme")("hit")<>"ok" then

bugun="BUGUN"
Set RS=server.createObject("ADODB.Recordset")
sor = "select * from ziyaretci "
RS.open sor,Bag,1,3

rs.movefirst
if rs("tarih") = date then
RS.fields("ziyaret") = rs.fields("ziyaret") + 1
saybugun=rs("ziyaret")
else
rs("tarih")=date
rs("ziyaret") = 1
saybugun=1
end if
rs.getrows(1)
rs("tarih") = date
rs("ziyaret") = rs("ziyaret") + 1
saytoplam=rs("ziyaret")
RS.update
Response.Cookies("deneme")("hit")="ok"
Response.Cookies("deneme").Expires=DateAdd("n",12, now())
end if
%>