สถิติแบบพาสซีฟเกี่ยวกับจำนวนผู้ใช้ออนไลน์ของเว็บไซต์

เมื่อฉันไม่สามารถเข้าถึงอินเทอร์เน็ตในโรงเรียนได้ฉันเปลี่ยนโปรแกรมบล็อกและเพิ่มจำนวนบล็อกออนไลน์ ก่อนหน้านี้ฉันยังอ่านรหัสหลายรหัสที่นับผู้ใช้ออนไลน์ ฉันรู้สึกว่าพวกเขาไม่ตรงตามข้อกำหนดของฉันดังนั้นฉันจึงเขียนด้วยตัวเองร่วมกับโปรแกรมบล็อกและนำไปใช้กับบล็อกของฉัน

วิธีการบางอย่างสำหรับ ASP นับจำนวนผู้ใช้ออนไลน์ถูกกล่าวถึงในบล็อกของ FDREAM สำหรับรายละเอียดโปรดดูที่นี่

เพื่อสร้างสมดุลระหว่างความแม่นยำและประสิทธิภาพฉันใช้วิธีการแฝงเพื่อนับคนออนไลน์นั่นคืออัปเดตจำนวนคนออนไลน์เมื่อมีผู้เข้าชมใหม่ ฉันไม่รู้ว่ามีใครใช้วิธีนี้บนอินเทอร์เน็ต แต่ตอนนี้ฉันใช้มันอย่างที่ฉันคิดว่า ^_ ^

เซสชั่นใช้ใน L-Blog เพื่อตรวจสอบว่าผู้เข้าชมเป็นผู้เข้าชมใหม่หรือไม่ เวลาหมดเวลาของเซสชั่นคือ 20 นาทีซึ่งสามารถใช้เพื่อนับจำนวนคนออนไลน์นั่นคือผู้เข้าชมที่ใช้งานภายใน 20 นาทีคิดว่าออนไลน์

มีรหัสต่อไปนี้ใน Compon.asp เพื่อบันทึกการเข้าถึงบันทึก:

การคัดลอกรหัสมีดังนี้:

'Guest_ip เป็น IP ของแขก

ifsession ("GuestIp") <> guest_ipthen

dimguest_agent, guest_refer

ควรใช้เร็กคอร์ด Guest_Agent และ Guest_Refer Access

guest_agent = trim (request.serverVariables ("http_user_agent")))))

guest_refer = trim (request.serverVariables ("http_referer"))))))))))))))

'เพิ่มบันทึกการเข้าถึง

conn.execute ("insertintoBlog_counter (coun_ip, coun_agent, coun_refer) ค่า

('"& guest_ip &"', '"& guest_agent &"', '"& guest_refer &"'))

'เพิ่ม 1 การเยี่ยมชม

conn.execute ("UpdateBlog_infosetBlog_VisitNums = blog_visitnums1")

sqlQueryNums = sqlQueryNums2

'บันทึก IP ของแขกด้วยเซสชัน

เซสชั่น ("guestip") = guest_ip

endif

เพื่อให้บรรลุสถิติผู้ใช้ออนไลน์ฉันได้ทำการเปลี่ยนแปลงบางอย่างในฐานข้อมูล:

1. เพิ่ม 1 field blog_onlinenums (จำนวนเต็ม) ลงในตาราง blog_info เพื่อบันทึกจำนวนผู้ใช้ออนไลน์ปัจจุบันของเว็บไซต์

2. เพิ่ม Table Blog_onine และฟิลด์ถูกตั้งค่าเป็น: OL_ID (หมายเลขอัตโนมัติ), OL_IP (อักขระ, 20), OL_TIME (วันที่/เวลา, ค่าเริ่มต้นตอนนี้)

รหัสสถิติเว็บไซต์ที่แก้ไขมีดังนี้:

การคัดลอกรหัสมีดังนี้:

'รหัสสถิติไซต์

ifsession ("GuestIp") <> guest_ipthen

'เคาน์เตอร์เข้าถึงไซต์ดั้งเดิม

conn.execute ("insertintoblog_counter (coun_ip, coun_agent, coun_refer)

ค่า ('"& guest_ip &"', '"& guest_agent &"', '"& guest_refer &"') "

conn.execute ("UpdateBlog_infosetBlog_VisitNums = blog_visitnums+1")

sqlQueryNums = sqlQueryNums+2

เซสชั่น ("guestip") = guest_ip

'จำนวนคนออนไลน์

'เพียงตรวจสอบว่าผู้เข้าชมหมดเวลาในรายการออนไลน์