Statistiques : ip / date & heure

1/5 (6 avis)

Snippet vu 12 221 fois - Téléchargée 30 fois

Commenter

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

Ajouter un commentaire Commentaires
crogiez Messages postés 86 Date d'inscription lundi 8 décembre 2003 Statut Membre Dernière intervention 27 décembre 2011
13 janv. 2005 à 09:35
ya la mem chsoe dans les log IIS !!!
dde78 Messages postés 2 Date d'inscription lundi 11 octobre 2004 Statut Membre Dernière intervention 19 novembre 2004
19 nov. 2004 à 10:15
Merci pour ce code !
pour ceux qui ont l'erreur "....engine error..." penser à vérifier la sécurité du fichier "mabase.mdb"; l'accès doit être sur "controle totale".
battleduck91 Messages postés 3 Date d'inscription samedi 11 septembre 2004 Statut Membre Dernière intervention 21 septembre 2004
12 sept. 2004 à 12:20
Bonjour,
Vraiment un très bon script !
Mais quelle est la syntaxe a intégrer dans les autres pages ? (le fameux include...) ?

Remerciements.
GillesWebmaster Messages postés 496 Date d'inscription mercredi 30 juin 2004 Statut Membre Dernière intervention 29 juillet 2009 1
1 sept. 2004 à 18:41
MOi aussi help sos Fabrice vient a notre secours
G_____
actives Messages postés 2 Date d'inscription mardi 8 juin 2004 Statut Membre Dernière intervention 11 juin 2004
11 juin 2004 à 22:20
C'est pas mal ! Mais moi je suis confronté au problème suivant :

Microsoft JET Database Engine error '80040e09'

Mise à jour impossible. La base de données ou l'objet est en lecture seule.

... Ma base n'est pas en lecture seule, ni verrouillée. J'ai fait un coupé coller du code, j'ai juste changé le nom de la base... Any idea ?
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.