Utilisateur present sur le site

Soyez le premier à donner votre avis sur cette source.

Snippet vu 6 114 fois - Téléchargée 38 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
13 sept. 2006 à 11:55
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
30 déc. 2002 à 18:11
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
6 oct. 2002 à 14:02
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
26 juil. 2002 à 19:08
ç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.