Compteur visites site

youn29380 Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   -  
 Youn -

bonjour à toutes et à tous.

Son mon site web j'ai mis un compteur de visites. Il semble fonctionner sous edge mais pas avec chrome ( encadrement sans rien). quelqu'un a une idée ?

Merci

2 réponses

  1. Bruno83200_6929 Messages postés 725 Date d'inscription   Statut Membre Dernière intervention   170
     

    Bonjour,

    Est-ce que tu n'as pas une extension genre bloquer de publicités qui fait bugger le compteur, cela arrive fréquemment !


    2
    1. youn29380 Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   1
       

      Merci, Bruno.

      C'est le bloqueur, bien vu.

      1
  2. Utilisateur anonyme
     

    Bonjour,

    Si tu as un problème avec chrome et pa edge cela signifie que l'incrementaton ce fait côté client ce qui ne constitue pas un vrai décompte de visite du site.

    Il faut que le décompte de visite ce face côté serveur, soit à l'ouverture de la session.

    <%'ASP
    Session.Timeout = 20 ' (minutes) - durée de la session
    
    If Session("visite_comptabilisee") <> True Then
        Session("visite_comptabilisee") = True
    
        ' Chemin du fichier compteur
        Set fso = Server.CreateObject("Scripting.FileSystemObject")
        compteurFichier = Server.MapPath("compteur.txt")
    
        ' Lire et incrémenter le compteur
        If fso.FileExists(compteurFichier) Then
            Set fichier = fso.OpenTextFile(compteurFichier, 1)
            compteur = CLng(fichier.ReadAll)
            fichier.Close
        Else
            compteur = 0
        End If
    
        compteur = compteur + 1
    
        ' Sauvegarder le nouveau compteur
        Set fichier = fso.OpenTextFile(compteurFichier, 2, True)
        fichier.Write compteur
        fichier.Close
    
        Set fichier = Nothing
        Set fso = Nothing
    End If
    
    ' Afficher le compteur (toujours depuis le fichier)
    Set fso = Server.CreateObject("Scripting.FileSystemObject")
    Set fichier = fso.OpenTextFile(Server.MapPath("compteur.txt"), 1)
    visites = fichier.ReadAll
    fichier.Close
    Set fichier = Nothing
    Set fso = Nothing
    
    Response.Write "Nombre total de visites (uniques par session) : " & visites
    %>
    <?php
    session_start(); // Démarre ou reprend une session
    
    // Vérifie si l'utilisateur a déjà été compté
    if (!isset($_SESSION['visite_comptabilisee'])) {
        $_SESSION['visite_comptabilisee'] = true;
    
        // Incrémentation du compteur dans un fichier
        $fichier = 'compteur.txt';
    
        // Lire la valeur actuelle
        if (file_exists($fichier)) {
            $visites = (int)file_get_contents($fichier);
        } else {
            $visites = 0;
        }
    
        // Incrémenter et sauvegarder
        $visites++;
        file_put_contents($fichier, $visites);
    }
    
    // Lire la valeur pour affichage
    $visites_total = file_get_contents('compteur.txt');
    
    echo "Nombre total de visites (uniques par session) : " . $visites_total;
    ?>
    0
    1. Youn
       

      Demat, merci "l'anonyme".

      0