Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

STATISTIQUES : IP / DATE & HEURE


Information sur la source

Catégorie :Base de données Classé sous : statistique, stats, access, adresseip Niveau : Débutant Date de création : 01/06/2004 Vu : 7 374

Note :
8 / 10 - par 4 personnes
8,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (6)
Ajouter un commentaire et/ou une note

Description

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

  • <%
  • 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
  • %>
<%
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

%> 

Commentaires et avis

signaler à un administrateur
Commentaire de fabrice69 le 01/06/2004 15:59:57 administrateur CS

Un grand classique mais toujours utile.

F___

signaler à un administrateur
Commentaire de actives le 11/06/2004 22:20:17

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 ?

signaler à un administrateur
Commentaire de GillesWebmaster le 01/09/2004 18:41:07

MOi aussi help sos Fabrice vient a notre secours
G_____

signaler à un administrateur
Commentaire de battleduck91 le 12/09/2004 12:20:03

Bonjour,
Vraiment un très bon script !
Mais quelle est la syntaxe a intégrer dans les autres pages ? (le fameux include...) ?

Remerciements.

signaler à un administrateur
Commentaire de dde78 le 19/11/2004 10:15:59

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".

signaler à un administrateur
Commentaire de crogiez le 13/01/2005 09:35:44

ya la mem chsoe dans les log IIS !!!

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

inserer images ds une base access [ par matt ] Comment fait on pour inserer des images ds une base de donnée Access, et ensuit les visualiser en asp???? Impossible d'accéder à une base access sous WinNT4 avec IIS [ par Phy ] Help everybody!!!!!!!!!!Bonjour à tous.Voilà le pb.Je monte un intranet pour une municipalité.Une base a été créée sous access 97.Lorsque je l'interro requete ACCESS (Jointure)/CreateParameter ASP? [ par totoche ] Bonjour,Je n'arrive pas à définir le 2éme parametre de mon code ASPJ'ai une requete stockée sous access:SELECT Salariés.Nom, Salariés.Cantons, Spécial access [ par rony ] bjr,je fais tourner mon site en local avec une base access.je souhaite vendre mon site à une entreprise.mon pbs est que j'utilise une base access et q asp/access [ par sou ] bonjourj'ai une base de données access et j'aimerai utiliser l'asp.Quelqu'un peut - il svp m'envoyer des exemples ou des turoriaux merci asp/access [ par sou ] bonjourj'ai une base de données access et j'aimerai utiliser l'asp.Quelqu'un peut - il svp m'envoyer des exemples ou des turoriaux merci Inversion du format après le 31 Mai ! - HELP ! [ par Benoit ] Si j'insere une date dans ma base donnée access (2000) dont le format est "jj/mm/aaaa" et supérieure au 31 mai, l'insertion de cette date se fait avec .mdb [ par rony ] bjr,l'utilisation d'un fichier .mdb (access 2000) est il payant sans l'utilisation d'access.merci mettre à jour de table dans access en même temps [ par jabba ] bonjour,je voudrais mettre 2 tables à jour en même temps dans access via une page asp, mais à chaque test le serveur me réponds :No Libellé de la form probleme connection Access / ASP [ par peguman ] Je suis en ASp et lors de ma requete j'ai l'erreur suivante :Microsoft OLE DB Provider for ODBC Drivers erreur '80040e10' [Microsoft][Pilote ODBC Micr


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,374 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.