Traquer vos visiteurs

Commenter

Contenu du snippet

Vous n'avez pas toujours la possibbilité de bénéficier d'outils statistiques performants sur votre site Web. Le programme suivant va vous permetre de générer un fichier texte cotidien, sous forme de listing, les sites d'où viennent vos visiteurs ainsi que leur adresse IP

Pour le 22 Août 2004, vous aurez un fichier nommé "22082004.log"

Il est possible d'amméliorer ce script en agoutant la langue du visiteur ou le nom de la bécanne, affaire à suivre...

Source / Exemple : 


<%
LogFileDate = Date
LogFileName = ""
If Month(LogFileDate) < 10 Then
LogFileName = "0"
End if
LogFileName = LogFileName & Month(LogFileDate)
If Day(LogFileDate) < 10 Then
LogFileName = LogFileName & "0"
End If
LogFilName = "" & LogFileName & Day(LogFileDate) & Year(LogFileDate) & ".log"
Set fs = CreateObject("scripting.FileSystemObject")
Set a = fs.OpenTextFile(server.MapPath(LogFileName), 8, True, False)
if request.ServerVariables("HTTP_REFERER")<= "" Then
Request.ServerVariables("HTTP_REFERER") = 0
else
a.Write("Dernier Site:" & Request.ServerVariables("HTTP_REFERER"))
a.Write("adresse IP:" & Request.ServerVariables("REMOTE_ADDR")) & VBcrlf
end if
%>

Conclusion :


Bon Codage...
Un Prob... Pas de prob: Webmaster@gilles4.com

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 (GillesWebmaster)