Compteur de hits avec base de donnée acess

Commenter

Contenu du snippet

Voilà
quelqu'un sur le forum avais demandé un compteur de hit
en voilà un des plus simple , on peut y inclure le nombre de pages que l'on veut

Source / Exemple : 


<%' compteur de hits par tidave

'hit = champ ou sont stocké les hits
'hits =table de la base compteur
'h=nombre de hit
' Connexion à la base de donneés compteur
database = server.mapPath("compteur_page.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" _
   & " DBQ=" & database

SQL = "SELECT * FROM hits "
RS.open SQL,Conn,3,3
h=rs("hit_page")

SQL = "UPDATE [hits] SET hit_page=" & (h+1)_
   & " WHERE hit_page=" & (h) 
conn.Execute(SQL)

L=rs("hit_page")

'fermeture 
RS.close
set rs=nothing
set conn=nothing
%>

pour lire le hit , on peut mettre cette ligne
cette page a été vue <%=L%> fois

Conclusion :


La base de donnée "compteur_page" est composée d'une table hits et du nombre de champs que l'on veut compter de pages
;dans cette exemple d'un champ hit_page

vous pouvez le voir fonctionner ici : http://www.guadadvent.org/teste_du_temperament_en_ligne.asp

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_tidave)