Statistiques : ip / date & heure

Contenu du snippet

Ce code a pour objectif de recupere l'IP, la date et l'heure, et la page visitee pour stocker ces infos dans une base access.
Copier simplement le code suivant dans un fichier apelle par exemple stats.asp.
Faire des "include" de stats.asp dans les pages que l'on souhaite tracer. Ainsi, lorsque qq1 se connecte sur une page contenant stats.asp, les infos sont envoyer vers la table stats de la base mabase.mdb. Les champs de la table stats sont date, time, ip, page.

Source / Exemple :


<%
Set conn = server.createobject("adodb.connection")
DSNtemp = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("fpdb/mabase.mdb")
conn.Open DSNtemp

SQL="SELECT * FROM [stats]"
Set RS = server.createobject("ADODB.Recordset")
RS.Open SQL,Conn , 3, 3

RS.addnew
RS("date")=FormatDateTime (now, 2)
RS("time")=FormatDateTime (now, 4)
RS("ip")=request.servervariables("REMOTE_ADDR")
RS("page")=request.servervariables("URL")
RS.update

Set RS = Conn.Execute(SQL)
Set RS = Nothing
Conn.Close

%>

A voir également

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.