1. إنشاء جدول قاعدة بيانات
اسم الجدول على الإنترنت
اضبط الحقول التالية
يتم استخدام المعرف لتسجيل الجلسة.
name'f هو زائر ، يتم تسجيله كزائر.
على الإنترنت ، إذا كان يزور ، كل منها هو 0 إذا كان عضوًا 1
حدث DateTime'latest
اسم المستخدم لتسجيل الدخول إلى اسم المستخدم ، الزائر فارغ.
وصول Ip'Record إلى كل تسجيل الدخول IP
يكتب Head.asp 'عدد الأشخاص عبر الإنترنت إلى جدول قاعدة البيانات ، ويجب البحث في الصفحة في كل صفحة تستخدم لتصفح ASP.
<٪
setRs = server.createObject ("adodb.recordset")
ifSession ("اسم المستخدم") = "" ثم يحدد أن المستخدم لم يتم تسجيل الدخول
sql = "select*fromlineDereDyid = '" & Session.SessionId & "" "" "تحديد ما إذا كان هذا SessionId موجودًا في جدول قاعدة البيانات.
Rs.Opensql ، Conn ، 1،3
ifrs.eofthen'visitor العرض الأول
Rs.Addnew
RS ("ID") = Session.SessionId
RS ("الاسم") = "ضيف"
Rs ("عبر الإنترنت") = 0'0 يعني أنه لم يتم تسجيل الدخول إلى المستخدم وهو هوية السائح
RS ("DateTime") = الآن ()
userip = request.servervariables ("http_x_forwarded_for")
IFUSERIP = "" ثم
userip = request.servervariables ("remote_addr")
Endif
RS ("IP") = userip
آخر لا تتصفح الزوار لأول مرة
RS ("DateTime") = الآن () "تحديث وقت النشاط
Rs.update
Rs.close
Endif
آخر
sql = "select*fromlinederyid = '" & session.sessionid & "' 'oradmin ='" & session ("username") و "" "" فقط حدد أن سجل SessionId أو اسم المستخدم موجود بالفعل في جدول البيانات.
Rs.Opensql ، Conn ، 1،3
ifrs.eofthen
يدخل أعضاء Rs.Addnew الموقع لأول مرة (ربما قم بتسجيل الدخول مباشرة من الصفحة الرئيسية للموقع للدخول إلى المنتدى).
RS ("ID") = Session.SessionId
RS ("name") = الجلسة ("show") "اكتب إلى لقب المستخدم
RS ("اسم المستخدم") = الجلسة ("اسم المستخدم") "اكتب إلى اسم المستخدم تسجيل الدخول
RS ("عبر الإنترنت") = 1 "يعني أن المستخدم قد قام بتسجيل الدخول وهو عضو
RS ("DateTime") = الآن () "قم بتعيين وقت النظام الحالي كوقت تسجيل الدخول للمستخدم
userip = request.servervariables ("http_x_forwarded_for")
IFUSERIP = "" ثم
userip = request.servervariables ("remote_addr")
Endif
RS ("IP") = userip
آخر // لا يتصفح العضو الموقع لأول مرة ، ويقوم الزائر بتسجيل الدخول إلى الموقع.
RS ("Name") = Session ("show") تحديث لقب المستخدم