Lorsque je n'ai pas pu accéder à Internet à l'école, j'ai changé le programme de blog et ajouté un compte en ligne de blog. Avant cela, j'ai également lu plusieurs codes qui comptent les utilisateurs en ligne. J'ai senti qu'ils ne répondaient pas à mes exigences, alors j'en ai écrit un moi-même en combinaison avec le programme de blog et l'a appliqué à mon blog.
Certaines méthodes pour compter ASP le nombre d'utilisateurs en ligne sont mentionnées dans le blog de FDREAM. Pour plus de détails, veuillez consulter ici.
Afin d'équilibrer la précision et l'efficacité, j'ai utilisé une approche passive pour compter les personnes en ligne, c'est-à-dire mettre à jour le nombre de personnes en ligne lorsqu'il y a de nouveaux visiteurs. Je ne sais pas si quelqu'un a utilisé cette méthode sur Internet, mais je l'utilise maintenant exactement ce que je pense ^ _ ^.
La session est utilisée dans L-Blog pour déterminer si un visiteur est un nouveau visiteur. L'heure du délai d'expiration de la session est généralement de 20 minutes, ce qui peut être utilisé pour compter le nombre de personnes en ligne, c'est-à-dire que les visiteurs actifs dans les 20 minutes pensent en ligne.
Il y a le code suivant en commun.asp pour enregistrer les enregistrements d'accès:
La copie de code est la suivante:
'Invité_ip est l'IP de l'invité
IfSession ("invité") <> invité_ipthen
Dimguest_agent, invité_refer
'Les enregistrements d'accès invité_agent et invités doivent être utilisés
Invité_agent = trim (request.servervariables ("http_user_agent"))
Invité_refer = trim (request.servervariables ("http_referrer"))
'Ajouter un enregistrement d'accès
Conn.Execute ("insertintoblog_counter (coun_ip, coun_agent, coun_refer)
('"& Invité_ip &"', '"& invité_agent &"', '"& invité_refer &"'))
'Ajouter 1 visite
Conn.execute ("updateblog_infosetblog_visitnums = blog_visitnums1")
SQLQueryNums = SqlQueryNums2
'Enregistrez l'IP invité avec la session
Session ("invité") = invité_ip
Endire
Afin d'atteindre les statistiques des utilisateurs en ligne, j'ai apporté quelques modifications à la base de données:
1. Ajout de 1 champ Blog_onlineNums (entier) à la table blog_info, pour enregistrer le nombre actuel d'utilisateurs en ligne du site Web.
2. Ajout de la table Blog_onine, et les champs sont définis sur: OL_ID (numéro d'auto), OL_IP (caractères, 20), OL_Time (date / heure, valeur par défaut maintenant).
Le code de statistiques du site modifié est le suivant:
La copie de code est la suivante:
«Code des statistiques du site
IfSession ("invité") <> invité_ipthen
'Comptoir d'accès du site d'origine
Conn.execute ("insertintoblog_counter (coun_ip, coun_agent, coun_refer)
Valeurs ('"& invité_ip &"', '"& invité_agent &"', '"& invité_refer &"') ")
Conn.execute ("updateblog_infosetblog_visitnums = blog_visitnums + 1")
SQLQueryNums = SqlQueryNums + 2
Session ("invité") = invité_ip
'Nombre en ligne de personnes
«Déterminez simplement si le visiteur a chronométré dans la liste en ligne