오늘, 편집자는 동일한 사용자 이름을 동시에 제한하는 방법을 소개합니다. 관심있는 친구들은 편집자와 함께 배울 것입니다!
이 문제에 대한 나의 해결책은 사용자에게 활성 시간 간격 문제가 있다는 것입니다. 이 활성 시간 간격을 초과하는 사람들은 오프라인으로 간주 될 수 있으며 후자는 로그인 할 수 있습니다. 후자가 로그인하지 않으면 전자가 다시 로그인해야한다는 의미는 아닙니다. 그의 세션은 여전히 존재하기 때문입니다. 시간 설정이 작을수록 더 정확하고 절대적 일 수는 없습니다.
코드는 저자가 참조하도록 게시됩니다.
함수 checkonline () dim ip, rsprv, sql, prvdbstateprvdbstate = falseif dbstate = false thendbopen () prvdbstate = trueend ifset rsprv = server.createObject ( "adodb.recordset") if session ( "username"). & " '"rsprv.open sql, conn, 1,3if rsprv.eof thersprv.addnewsprv ( "sessionId") = session.sessionIdrsprv ( "Groupchargelv") = -1rsprv ( "lastActTime") = now ( "userip") = getIprsprv ( "onlyeTime"). 0RSPRV ( "USERWHERE") = request.ServerVariables ( "http_Referer") ElsersPrv ( "UserWhere") = request.servervariables ( "http_referer") rsprv ( "onlineTime") = request.ServerVaribles ( "http_referer") rsprv ( "onlinetime") rsprv ( "onlineTime") + datediff ( "n", rsprv ( "lastActtime"), now ()) rsprv ( "lastActTime") = now () end ifrsprv.updatersprv.close () 'response.write "notlogin"else'response.write "sql ="select * from online "& 세션 ( "username") & " '"rsprv.open sql, conn, 1,3if rsprv.eof thersprv.adnewsprv ( "sessionid") = session.sessionidrsprv ( "username") = session ( "username") rsprv ( "groupchargelv") = rsprv ( "groupgelv"). now () rsprv ( "onlineTime") = 0RSPRV ( "userIP") = getIPRSPRV ( "USERWHERE") = request.ServerVariables ( "http_referer") elseif rsprv ( "sessionId") 세션 ( "loginset") ( "1) (1) = false wheninfoto", "thistinout." 웹 사이트에는 1 개의 ID가 있으며 나중에 로그인 할 수 있습니다 datediff ( "n", rsprv ( "lastacttime"), now ())) rsprv ( "lastacttime") = now () end ifrsprv.close () 끝 ifset rsprv = nothingif datediff ( "s", 응용 프로그램 ( "onlinelastdelete"))> int (application ( "deleteonlineed)). whenApplication.lock () 응용 프로그램 ( "onlineLastDelete") = nowApplication.unlock () conn.execute ( "온라인에서 삭제 된 [ 's', lastActtime, now ())>"& int ( "checkonlinediff") & ")) ')'x Seconds ends ends iffffclos ()) ')').
위의 것은 동일한 사용자 이름을 동시에 로그인하는 것부터 동일한 사용자 이름을 제한하는 방법에 대한 소개입니다. 나는 당신이 그것을 좋아할 수 있기를 바랍니다. 더 많은 콘텐츠를 보려면 잘못된 새로운 기술 채널의 웹 사이트에 계속주의를 기울이십시오!