Contatore di accessi unici e pagine viste in ASP

ASP E-Commerce con ASP Menu Javascript Area Aziende Cocktail Registrazione domini

Home + Articoli + Contatori e Statistiche + Articolo # 161

Concesso in esclusiva a Mr.Webmaster. Vietata la riproduzione.

Nel monitoraggio delle statistiche di un sito Web è importante conoscere sia gli accessi unici al sito che il numero totale di pagine viste. In ASP possiamo realizzare un contatore capace di tracciare entrambe.

Ci baseremo su di un database. Creiamo il file "database.mdb" corredato dalla tabella "contatore" composta dai campi "accessi_unici" e "pagine_viste", entrambi di tipo numerico.

Creiamo poi un file ASP di prova in cui apriamo e chiudiamo la connessione al database ed includiamo il file "contatore.asp" che conterrà materialmente il codice del contatore

<%@LANGUAGE = VBScript%>
<%
Dim sc, cn
sc = "driver={Microsoft Access Driver (*.mdb)};"
sc = sc & "dbq=" & Server.MapPath("database.mdb")
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open sc
%>
<html>
<body>

<!--#include file="contatore.asp"-->

</body>
</html>
<%
cn.Close
Set cn = Nothing
%>

Passiamo al cuore del programma ed analizziamo il codice del file "contatore.asp"

<%
If Request.Cookies("CONTATORE") = "" Then
cn.Execute("UPDATE contatore SET accessi_unici = accessi_unici + 1")
Response.Cookies("CONTATORE") = "OK"
End If
cn.Execute("UPDATE contatore SET pagine_viste = pagine_viste + 1")
Dim rs
Set rs = cn.Execute("SELECT * FROM contatore")
With Response
.Write "Accessi unici: "
.Write rs("accessi_unici") & " - "
.Write "Pagine viste: "
.Write rs("pagine_viste")
End With
Set rs = Nothing
%>

Il funzionamento è semplice: verifichiamo con un cookie che la pagina sia già stata caricata o meno ed effettuiamo l'incremento del campo "accessi_unici" solo al caricamento della pagina e non in tutti i reload o cambi pagina della navigazione. Effettuiamo invece l'incremento del campo "pagine_viste" ad ogni reload di pagina e per tutta la durata della navigazione.