Compteur de hits en asp .net (vb) - asp .net counter (vb)

Commenter

Contenu du snippet

Grâce à cette source ASP .Net (VB) vous pourrez comptabiliser le nombre de Hits de votre site Web et ceci sans utiliser de base de données !

Source / Exemple : 


<%@ Page Language="vb" %>
<%@ Import Namespace="System.IO" %>
<%@ Import Namespace="System.Web.UI.Webcontrols" %>
<%@ Import Namespace="Microsoft.VisualBasic" %>

<%
'Création des variables d'appel
Dim fichier as string
Dim objReader as StreamReader
Dim objWriter as StreamWriter

'Variable contenant le nom et l'emplacement du fichier
fichier = server.mappath("hits.txt")

'Si le fichier n'existe pas alors le créer en inscrivant le nombre 0
If not File.Exists(fichier) then 
objWriter  = File.CreateText(fichier)
objWriter.Write("0")
objWriter.Close
End if

'Lecture du fichier contenant le nombre de hits
objReader = File.OpenText(fichier)
Dim sCount as string = objReader.ReadToEnd()
objReader.Close

'Ecriture du fichier contenant le nombre de hits + 1
objWriter  = File.CreateText(fichier)
objWriter.Write(scount + 1)
objWriter.Close
scount = scount + 1

'Afficher à l'écran le nombre de hits obtenu
Response.Write (scount + " hits")
%>

Conclusion :


Script anciennement utilisé sur SeveralWays.Org

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