--- title: "Hejsan!" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/58840-hejsan" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "DiDjo" published: "2002-11-12T17:11:16.000Z" updated: "2002-11-14T17:14:19.000Z" replies: 22 views: 471 page: 1 pages: 2 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/58840-hejsan" --- # Hejsan! _Sida 1 av 2._ ## #1 — DiDjo, 2002-11-12T17:11Z Jag har ett väldigt buggig online funktion! Glömmer man logga ut så blir man fortfarande inloggad..... Hur gör man för att de ska logga ut eller så att den sätts som offline iaf! Ska man ha en popup som dyker upp en snabbis snär man går i från sidan?? Permalänk: https://www.webforum.nu/p/58840 ## #2 — Eitraz, 2002-11-12T17:14Z Gör annars en "tidskollare" som aktiveras varje gång t ex någon ny medlemmar loggar in/ut och som "tar bort" medlemmar som varit inaktiva en viss tid. Då måste du ju iofs ha en liten kod i toppen på sidorna som uppdaterar tiden när någon är "aktiv" förstås.. \-Eitraz Permalänk: https://www.webforum.nu/p/853231 ## #3 — DiDjo, 2002-11-12T17:28Z öööö hur menar du???? Jag har en som kollar när de loggar in (datum) Men hur ska jag göra??? En session lr? Sen om man inte är kvar på vår sida da??? Då ska den ta bort de! Liksom... Varje gång en loggar in så ska den rensa bort de som inte har gjort de ordengligt! Den här koden vill inte fungera: ``` Do Until RecSet.EOF If Rs("onoff") = "online" AND DateDiff("n", Rs("datum"), Now) > 30 Then Rs("onoff") = "offline" Rs.Update End If RecSet.MoveNext Loop RecSet.Close ``` Permalänk: https://www.webforum.nu/p/853243 ## #4 — Eitraz, 2002-11-12T17:32Z Gör ett till datafält i medlems-tabellen med namnet "lastactive" eller nåt klurigt. Sen när de surfar runt på sidan sätter du lastactive till Now() t ex. Om de då sedan hoppar ut från sidan Utan att logga ut så kommer ju lastactive vara tiden då de senast var aktiva ;) Då kan du ha en liten funktion som sätter t ex datafältet "online" till "no" (eller vad du nu har) när det har gått kanske 5 min från "lastactive".. funktionen kan ju aktiveras t ex när nån annan loggar in eller nåt.. Hm... Var detta en tillräckligt flummig förklaring? ;) \-Eitraz Permalänk: https://www.webforum.nu/p/853247 ## #5 — Peeer, 2002-11-12T17:34Z Du får ha ett fält i databasen där det står när de senast var aktiva (dvs. laddade en sida, klickade på en länk mm) på din site. Detta fält måste du uppdatera varje gång besökaren gör något. Sen varje gång när någon medlem loggar in / ut, så kör du en koll och rensar bort de användarna från 'onlinetabellen' (antar att du har någon sådan?) som inte varit aktiva inom ex. de senaste 20 minutrarna. Förstår du? **r/** ajdå. Lite sent kansk ;) Permalänk: https://www.webforum.nu/p/853249 ## #6 — Eitraz, 2002-11-12T17:34Z Oj, där ändrades visst inlägget ;) Är Rs("datum") tid oxå? \-Eitraz Permalänk: https://www.webforum.nu/p/853250 ## #7 — OveRRidE, 2002-11-12T17:37Z Det är här den ofta underskattade global.asa kommer in i bilden. Jag skrev ett inlägg om det i forumet så sent som igår, och det bör läsas i sin helhet. Permalänk: https://www.webforum.nu/p/853253 ## #8 — Eitraz, 2002-11-12T17:38Z Huuu... litar inte på den filen ;D \-Eitraz Permalänk: https://www.webforum.nu/p/853254 ## #9 — DiDjo, 2002-11-12T17:39Z Eitraz... Ja! Jag la till denna kod(Igen) Då sa den: ``` ADODB.Recordset error '800a0cc1' Item cannot be found in the collection corresponding to the requested name or ordinal. /signin.asp, line 39 ``` Så här e koden: ``` <% Option Explicit Dim sql,rsUser,username,password,page,stayloggedin,LConnectString,lconn,sqlflag,active,se 'Grab the submitted variables (page is the page they've come from, set by the hidden variable at the login box) username = Request.Form("username") password = Request.Form("password") page = Request.Form("page") stayloggedin = Request.Form("stayloggedin") if page = "" then page = "index.asp" end if 'Check no s**t is trying to hack in using SQL commands if InStr(username, "'") or InStr(username, """") or InStr(username, "=") or InStr(password, "'") or InStr(password, """") or InStr(password, "=") then sqlflag = True end if 'Open connection %> <% se=request("se") if se="" then se=username end if %> <% 'Get a recordset corresponding to the submitted username and password sql = "SELECT username, statuslevel FROM status INNER JOIN users ON status.statusid = users.status WHERE username = '" & username & "' AND password = '" & password & "' AND active = True" Set rsUser = Server.CreateObject("ADODB.Recordset") rsUser.Open sql, conn, 3, 3 '----- Rensar bort sånna som inte loggat ut korrekt.. ------- Do Until Rsuser.EOF 39--> If Rsuser("onoff") = "Online" AND DateDiff("n", Rsuser("datum"), Now) > 30 Then Rsuser("onoff") = "Offline" Rsuser.Update End If Rsuser.MoveNext Loop '---------------- SLUT PÅ UTRENSNINGEN ------------------ 'If there was a valid recordset there, then send them back to the page they came from, with the username cookie set If (not rsUser.BOF) and (not rsUser.EOF) and sqlflag <> True then Response.Cookies("username") = rsUser("username") Response.Cookies("level") = rsUser("statuslevel") Set rsuser = Server.CreateObject("ADODB.Recordset") rsuser.open "users WHERE username = '" & username & "'", conn, 3, 3 rsuser("onoff") = "Online" rsuser("datum") = Now rsuser.Update Session.TimeOut = 30 '<-- Kontrollera set rsUser = nothing conn.close set conn = nothing Response.Redirect(page) end if 'Otherwise, display an invalid entry screen rsUser.close set rsUser = nothing conn.close set conn = nothing%> ``` "Onoff" är den som har offline o online! Datum ska kolla när de loggade in! Och båda finns! Varför säger den då att den inte hittar? Permalänk: https://www.webforum.nu/p/853257 ## #10 — Eitraz, 2002-11-12T17:42Z Du måste ha med dem i: SELECT username, statuslevel FROM alltså SELECT username, statuslevel,onoff,statuslevel FROM eller allt som används helt enkelt.. \-Eitraz Permalänk: https://www.webforum.nu/p/853264 ## #11 — DiDjo, 2002-11-12T18:17Z ok! Hur skriver man för att få in den där???? users och som sagt onoff kollumnen Permalänk: https://www.webforum.nu/p/853301 ## #12 — @nders, 2002-11-12T18:20Z På rad 39 försöker du göra en jämförelse på ett fält som heter datum. Du har inte med det fältet i din SELECT-lista. Permalänk: https://www.webforum.nu/p/853303 ## #13 — DiDjo, 2002-11-12T18:28Z näää jag vet! Hur skriver man in de i SELECT-listan??? Jag har inte gjort inloggnings systemet! Permalänk: https://www.webforum.nu/p/853312 ## #14 — Eitraz, 2002-11-12T18:34Z som jag skrev innan... sql = "SELECT username, statuslevel FROM status \=\> sql = "SELECT username, statuslevel,onoff,datum FROM status det ska nog räcka.. \-Eitraz Permalänk: https://www.webforum.nu/p/853317 ## #15 — DiDjo, 2002-11-12T18:35Z aha! Sorry Eitraz! Såg inte Permalänk: https://www.webforum.nu/p/853319 ## #16 — DiDjo, 2002-11-12T18:37Z Men om man la till den så kunde man inte logga in! Då säger den bara "Fel användarnamn eller lösenord" Permalänk: https://www.webforum.nu/p/853323 ## #17 — DiDjo, 2002-11-12T18:47Z azzå jag kanske förklarade otydligt..... den skippar i att kolla lösenordet och användarnamnet nu! Man kommer till sidan som säger "fel användare eller lösen" Permalänk: https://www.webforum.nu/p/853335 ## #18 — solbulle, 2002-11-12T21:42Z Hm... jag är inte riktigt med, men är det inte koden för att logga in på siten du ändrar på nu? Man kan väl inte kolla om man är inloggad innan man ens hunnit logga in. Mao, tycker det verkar fel att lägga in koden där. Permalänk: https://www.webforum.nu/p/853505 ## #19 — DiDjo, 2002-11-13T17:24Z Men koden jag jag vill ha..... Rensar bort andra som inte har loggat ut! Den fungerar på ett annat loggin script men inte till denna.... Behöver man någon Session lr nått???? Permalänk: https://www.webforum.nu/p/854043 ## #20 — DiDjo, 2002-11-13T19:22Z Är det ingen som vet?? Kan någon fixa en ny kod??? Jag vill att den resnar bort alla som inte loggat ut! Så den setter onoff = Offline! Permalänk: https://www.webforum.nu/p/854125 --- Tråden på webben: https://www.webforum.nu/amne/asp/58840-hejsan Nästa sida: https://www.webforum.nu/amne/asp/58840-hejsan/page2.md