--- title: "plussa +1" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/12779-plussa-1" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "hacktheplanet" published: "2001-11-20T22:05:00.000Z" updated: "2001-11-22T21:04:00.000Z" replies: 35 views: 316 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/12779-plussa-1" --- # plussa +1 _Sida 1 av 2._ ## #1 — hacktheplanet, 2001-11-20T22:05Z Hur gör jag så att det inte plussas på 1 poäng om medlemen har redan loggat in?? Men han kan få +1 nästa dag. ``` strSQL="UPDATE members SET poang = poang + 1 WHERE ID = " & RecSet("id") ``` Permalänk: https://www.webforum.nu/p/12779 ## #2 — Skarre, 2001-11-20T22:09Z Kan du inte ha en kolumn där du lägger datumet då han senast fick en poäng. Om det datumet stämmer med den aktuella dagen får han ingen poäng. Bara en tanke, det finns säkert en smidigare metod. Permalänk: https://www.webforum.nu/p/295449 ## #3 — LarsG, 2001-11-20T22:14Z **Välkommen till WF** Du behöver en datumkolumn i tabellen som visar när senaste uppdateringen gjordes. Datum hanteras ju lite olika i olika databaser, så här kan du göra i Access till exempel. ``` strsql = "update members set poang = poang + 1, uDatum = now() " & _ " where datediff('d',uDatum,now()) <> 0 and id = " recset("ID") connect.execute strsql,,128 ``` Permalänk: https://www.webforum.nu/p/295450 ## #4 — hacktheplanet, 2001-11-20T22:16Z tackar :-) Permalänk: https://www.webforum.nu/p/295451 ## #5 — hacktheplanet, 2001-11-20T22:17Z kan man inte använda senaste inloggad istället ???? Permalänk: https://www.webforum.nu/p/295452 ## #6 — LarsG, 2001-11-20T22:21Z Vad menar du med senastinloggad? Är det något som du sparar i en cookie? I så fall går det ju bra att använda datediff för att se om användaren har varit där samma dag. ``` if datediff("d",request.Cookies("senastinloggad",date) <> 0 then 'utför update 'tilldela cookie nytt värde ``` Permalänk: https://www.webforum.nu/p/295453 ## #7 — hacktheplanet, 2001-11-20T22:22Z funkar ej " where datediff('d',Datum,now()) \<\> 0 and id = " RecSet("id") \-------------------------------------------------^ Permalänk: https://www.webforum.nu/p/295454 ## #8 — hacktheplanet, 2001-11-20T22:22Z nope går bra med datum Permalänk: https://www.webforum.nu/p/295455 ## #9 — hacktheplanet, 2001-11-20T22:27Z satte in & men +1 endå Permalänk: https://www.webforum.nu/p/295456 ## #10 — LarsG, 2001-11-20T22:27Z Nu förstår jag inte vad du menar. Får du något felmeddelande? Permalänk: https://www.webforum.nu/p/295457 ## #11 — hacktheplanet, 2001-11-20T22:29Z nope men det plussas forfarande om man loggat in engång Permalänk: https://www.webforum.nu/p/295458 ## #12 — hacktheplanet, 2001-11-20T22:32Z får inget felmeddelande ingenting händer Permalänk: https://www.webforum.nu/p/295459 ## #13 — hacktheplanet, 2001-11-20T22:33Z datum fältet i databasen ändras när man loggar in är det den man ska koppla till???? ``` strsql = "update members set poang = poang + 1, Datum = now() " & _ " where datediff('d',Datum,now()) <> 0 and id = " & RecSet("id") connect.execute strsql,,128 ``` Permalänk: https://www.webforum.nu/p/295460 ## #14 — LarsG, 2001-11-21T09:57Z Då jag inte vet hur dina tabeller ser ut och vad du gör annars på sidan så begriper jag inte vad du menar när du säger senastinloggad. Du får förklara lite mer ingående och inte vara så kortfattad. Hur använder du kolumnen datum annars? Permalänk: https://www.webforum.nu/p/295461 ## #15 — hacktheplanet, 2001-11-21T10:54Z jag har en tabell där den uppdateras som senaste inloggad asså användaren Permalänk: https://www.webforum.nu/p/295462 ## #16 — hacktheplanet, 2001-11-21T11:00Z så här ser login_check.asp ``` RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic Do Until RecSet.EOF if lcase(recset("username")) = lcase(request.form("username")) and lcase(recset("losen")) = lcase(request.form("losen")) then RecSet("datum") = Now RecSet("status") = "online" RecSet.Update Session("namn") = RecSet("fnamn") & " " & RecSet("enamn") Session("fnamn") = RecSet("fnamn") Session("enamn") = RecSet("enamn") Session("Username") = RecSet("Username") Session("login") = "ok" Session("id") = RecSet("id") Session("status") = "online" Session("epost") = RecSet("epost") Session.TimeOut = 40 strsql = "update members set poang = poang + 1, Datum = now() " & _ " where datediff('d',Datum,now()) <> 0 and id = " & RecSet("id") connect.execute strsql,,128 strSQL="UPDATE members SET loggatin = loggatin + 1 WHERE ID = " & RecSet("id") Connect.execute (strSQL) RecSet.Close Connect.Close Set RecSet = nothing Set Connect = nothing Response.Redirect "defaultx.asp" End If ``` Permalänk: https://www.webforum.nu/p/295463 ## #17 — jboy_87, 2001-11-21T21:55Z LarsG snälla :-( Permalänk: https://www.webforum.nu/p/295464 ## #18 — hacktheplanet, 2001-11-21T21:58Z ja kom igen LarsG Permalänk: https://www.webforum.nu/p/295465 ## #19 — icaaq, 2001-11-21T22:08Z ``` RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic Do Until RecSet.EOF if lcase(recset("username")) = lcase(request.form("username")) and lcase(recset("losen")) = lcase(request.form("losen")) then RecSet("datum") = Now RecSet("status") = "online" RecSet.Update Session("namn") = RecSet("fnamn") & " " & RecSet("enamn") Session("fnamn") = RecSet("fnamn") Session("enamn") = RecSet("enamn") Session("Username") = RecSet("Username") Session("login") = "ok" Session("id") = RecSet("id") Session("status") = "online" Session("epost") = RecSet("epost") Session.TimeOut = 40 strsql = "update members set poang = poang + 1, Datum = now() " & _ " where datediff('d',Datum,now()) <> 0 and id = " & [b]Session("id")[/b] connect.execute strsql,,128 strSQL="UPDATE members SET loggatin = loggatin + 1 WHERE ID = " & [b]Session("id")[/b] Connect.execute (strSQL) RecSet.Close Connect.Close Set RecSet = nothing Set Connect = nothing Response.Redirect "defaultx.asp" End If ``` tycker detta ser allmänt snurrigt ut men ni kan ju testa så där ;) Permalänk: https://www.webforum.nu/p/295466 ## #20 — hacktheplanet, 2001-11-21T22:19Z nope funkar ej Permalänk: https://www.webforum.nu/p/295467 --- Tråden på webben: https://www.webforum.nu/amne/asp/12779-plussa-1 Nästa sida: https://www.webforum.nu/amne/asp/12779-plussa-1/page2.md