Die jeweilig aufgerufenen Seite ist mit einem Aufrufszähler ausgestattet.
Mit dem Serverobjekt pCount lässt sich mittels Hits der aktuelle Stand abrufen. In diesem Beispiel wird
bei mehr als 10 Hits mit Reset der Zähler wieder auf Null gesetzt.
<%
Set pCount = Server.CreateObject("MSWC.PageCounter")
pCount.PageHit
response.write "Hits dieser Seite: <b>" & pCount.Hits & "</b><br>"
if pCount.Hits > 10 then
pCount.Reset
response.write "Hits dieser Seite: <b>" & pCount.Hits & "</b><br>"
end if
Set pCount = Nothing
%>
|