contatore visite

[pagu]

Ciao a tutti

Ho un problema di questo tipo:
vorrei che un contatore di visite, quando passo la variabile, mi incrementi il dato senza redirect o senza lanciare nuove pagine, praticamente mando la variabile tramite POST.

ecco il codice

<%
  SiteURL = Request.QueryString("URL")
  If Len(SiteURL) > 0 Then
    Set objConn = CreateObject("ADODB.Connection")
    objConn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("mdb-database/clicks.mdb"))
    
    ' If the URL is already in the database an error will be thrown and we perform an UPDATE
    ' Instead of a INSERT.
    on error resume next
    objConn.Execute "INSERT INTO SiteClicks(URL,ClickCount) VALUES('" & SiteURL & "',1)"
    If Err.Number <> 0 Then
        objConn.Execute "UPDATE SiteClicks SET ClickCount = ClickCount + 1 WHERE URL='" & SiteURL & "'"
    End If
    objConn.Close
    Set objConn= Nothing
    ' Response.redirect SiteURL
  End If
%> 

praticamente un contatore nascosto, se avete qualcos'altro di utile vi ringrazio in anticipo

Grazie 1000.
Alberto

[GabbOne]

cut

[cmsaspnet.com]

Non mettere il contatore nella pagina ma in global.asa

Inoltre valuta di definire objConn come statico e lo assegni all'avvio applicazione, chiudi poi chiudi il database con l'evento application end. (in modo da avere una applicazione performante).