Utilisateur present sur le site

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 826 fois - Téléchargée 36 fois

Contenu du snippet

mettez ce code sur chaque page et la vous aurez le nombre de visiteurs sur votre site.

Source / Exemple :


<script language=VBScript runat=Server>
Sub Application_OnStart
Application("active") = 0
End Sub
Sub Application_OnEnd 
'---nothing here
End Sub
Sub Session_OnStart 
Session.Timeout = 20 
'---lock Application variable before updating 
Application.Lock 
Application("active") = Application("active") + 1 
Application.Unlock
End Sub
Sub Session_OnEnd
Application.Lock
Application("active") = Application("active") - 1 
Application.Unlock
End Sub
</script>

<%=application("active")%>

A voir également

Ajouter un commentaire

Commentaires

mr_kadjaj
Messages postés
2
Date d'inscription
mardi 27 avril 2004
Statut
Membre
Dernière intervention
13 septembre 2006

Bonjour
j'aime bien avoir le projet complet parce que ça n'execute pas
Mon email:Mr_kadjaj@hotmail.com
merci
entaje
Messages postés
1
Date d'inscription
lundi 16 décembre 2002
Statut
Membre
Dernière intervention
30 décembre 2002

parfois les codes ne s'executent pas ...
incomplets
Slashgo
Messages postés
44
Date d'inscription
jeudi 18 octobre 2001
Statut
Membre
Dernière intervention
19 octobre 2002

euh .... j'ai bien l'impression que ceci est à mettre dans le fichier global.asa. Non?
Oztryker
Messages postés
7
Date d'inscription
vendredi 26 juillet 2002
Statut
Membre
Dernière intervention
26 juillet 2002

ça marche pas
!!!

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.