Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Online i en databas?

Postades av 2003-03-04 20:35:57 - André Andersson, i forum asp - allmänt, Tråden har 8 Kommentarer och lästs av 495 personer

Jag har ett inloggnings script som ändrar de olika "users" till "online" eller "offline" i ett tabelnamn "status".

Vad jag nu undrar är hur räknar man antalet "online" i den databasen, jag vill få det i visat i siffror på sidan.


Svara

Sv: Online i en databas?

Postades av 2003-03-04 21:26:35 - Jimmy Mattsson

Finns 2 möjligheter

<code>
Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT count(*) As Antal FROM status WHERE users = 'online'"
rs.Open SQL, strConnect, adOpenStatic, adLockOptimistic

Response.Write(rs("Antal"))
</code>

eller

<code>
Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM FROM status WHERE users = 'online'"
rs.Open SQL, strConnect, adOpenStatic, adLockOptimistic

Response.Write(rs.RecordCount)
</code>


Svara

Sv: Online i en databas?

Postades av 2003-03-04 21:46:46 - André Andersson

den skriver: "Parametrarna är felaktiga, ligger utanför tillåtet intervall eller skapar en inbördes konflikt. Rad 12"

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("inside/db/login.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM users WHERE status = 'online'"
rs.Open Addera, Connect, adOpenStatic, adLockOptimistic <--rad 12

%>


Svara

Sv: Online i en databas?

Postades av 2003-03-04 21:50:29 - Jonnie De Paul

Prova detta
<code>
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "SELECT * FROM status WHERE users=online", strConnect, 1, 3

Response.Write rs.RecordCount
</code>
Lycka till!
mvh
//Jonnie



Svara

Sv: Online i en databas?

Postades av 2003-03-04 21:57:22 - André Andersson

funkar inte :(

Parametrarna är felaktiga, ligger utanför tillåtet intervall eller skapar en inbördes konflikt.


Svara

Sv: Online i en databas?

Postades av 2003-03-04 22:08:26 - Ulf Elfving

Heter din tabell "status"?
Heter ditt fält "users"
Beskriv din tabell, kolumnnamn mm


Svara

Sv: Online i en databas?

Postades av 2003-03-04 22:12:52 - André Andersson

Tabellen heter users.
Fältet heter status.

Där är ett fält som heter status där det står antingen "online" eller "offline", och om det står "online" vill jag veta hur många i databasen som har det.


Svara

Sv: Online i en databas?

Postades av 2003-03-04 23:29:03 - Robert Jansson

<!-- #include file="adovbs.inc"-->


<%
sql= "SELECT status FROM users WHERE status= 'online'"
rs.Open sql, conn, adOpenKeyset, adLockOptimistic
rs.MoveLast
antal= rs.RecordCount
rs.Close
Response.Write antal
%>


För att använda RecordCount måste du inkludera filen "adovbs.inc".
Du har den förmodligen på din hårddisk.
Jag hittade den i Program-Vanliga filer-system-ado
Annars kan du göra en sökning.
Kopiera den och lägg den i samma mapp som dina filer.

Lycka till/ Robert


Svara

Sv: Online i en databas?

Postades av 2003-03-05 05:22:08 - Eric Herlitz

Tja, eller om man nu vill förenkla allting ännumer så kan man ju använda en helt vanlig counter...
<code>
set rs = Connect.execute("SELECT status FROM users WHERE status= 'online'")

If not rs.bof then ' om ingen är påloggad så kör inte
rs.MoveFirst
counter = 0
while not rs.eof
counter = counter + 1
rs.MoveNext
wend
end if

Response.Write counter
rs.Close
set rs = nothing
</code>
I det här inlägget så är felet...
---
den skriver: "Parametrarna är felaktiga, ligger utanför tillåtet intervall eller skapar en inbördes konflikt. Rad 12"
<code>
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("inside/db/login.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM users WHERE status = 'online'"
rs.Open Addera, Connect, adOpenStatic, adLockOptimistic <--rad 12
' här sätter du Addera som SQL information
' vilket uteslutande leder till ett fel
skriv om rad 12 till
rs.Open SQL, Connect, adOpenStatic, adLockOptimistic 'notera att Addera är utbytt mot SQL
</code>

För lite extra stabilitet i din db uppkoppling så rekomenderar jag att du sätter lite konstanter även (alltid bra att deklarera). Lägg till dessa innan Set Connect = Server...
<code>
const adLockOptimistic = 3
const adOpenStatic = 3
</code>

Lycka till!

// eric herlitz



Svara

Nyligen

  • 08:28 Butiksskyltar: Hur upplever utbude
  • 22:31 Slappna av
  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 808
27 960
271 761
481
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies