Tom's Guide > Forum > Programmation > Compteur faux ?

Compteur faux ?

Forum Programmation : Compteur faux ?

TomsGuide.com : 800 000 inscrits répondent à toutes vos questions high-tech et informatique. Pour obtenir de l'aide, inscrivez-vous gratuitement !
Mot :    Pseudo :           
 

Voila j'ai deux fichiers mais il ce bloque a 500 ou 600...
Comment les faire fonctionner aussi?

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Compteurs</title>
</head>

<Body bgcolor="#6699CC">
<% Session.TimeOut=1 %>
<div align="center">
<p><font size="0,5" face="Arial" color="#FF0000"><%=Application("connectes" )%>
</font><font size="0,5" face="Arial" color="#00FFFF">visiteur(s) en ligne,</font><font size="0,5" face="Arial" color="#FF0000"><br>
<%=Application("visites" )%>
</font><font size="0,5" face="Arial" color="#00FFFF">visites depuis<br>
le 13/02/06.</font></p>
</div>

</body>

</html>

Et un autre :

<SCRIPT LANGUAGE='VBScript' RUNAT='Server'>


Sub Application_OnStart

application("connectes" )=0
application("visites" )=0

End Sub

Sub session_OnStart

Application.lock
application("connectes" ) = application("connectes" ) + 1
Application.unlock

Application.Lock
application("visites" ) = application("visites" ) + 1
intTotalVisit = application("visites" )
Application.Unlock

End Sub

Sub Session_OnEnd

Application.lock
Application("connectes" ) = application("connectes" ) - 1
Application.unlock

End Sub

</SCRIPT>

Liens sponsorisés
Inscrivez-vous ou connectez-vous pour masquer ceci.
Tom's Guide > Forum > Programmation > Compteur faux ?
Aller à :

Il y a 1349 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici.

Attention

Vous allez répondre sur un sujet resté inactif pendant plus de 6 mois.
Assurez-vous d'apporter des éléments nouveaux à la discussion avant de poursuivre.

Répondre Annuler
Liens