7 svar · 547 visningar · startad av WebbisNet
när ingen eller en är inloggad så visar det rätt men när 2 personer är inloggade så visar det fortfarande bara 1 inloggad
<%With Response
If CInt(varInloggad) = 0 then
.Write "ingen är inloggad"
ElseIf Cint(varInloggad) = 1 then
.Write inloggad("Antal")
.Write " inloggad"
ElseIf CInt(varInloggad) => 2 Then
.Write inloggad("Antal")
.Write " inloggade"
End If
End With%>
Och var sätts varInloggad till?
Dim varInloggad
varInloggad = CLng("0" & inloggad("Antal"))
Select Case varInloggad
Case 0
Response.Write("Ingen är inloggad")
Case 1
Response.Write(varInloggad & "inloggad")
Case Else
Response.Write(varInloggad & " inloggade")
End Select
Gjorde det till en Select/switch istället för en If fråga.
Och var sätts varInloggad till?
Dim varInloggad varInloggad = CLng("0" & inloggad("Antal")) Select Case varInloggad Case 0 Response.Write("Ingen är inloggad") Case 1 Response.Write(varInloggad & "inloggad") Case Else Response.Write(varInloggad & " inloggade") End SelectGjorde det till en Select/switch istället för en If fråga.
Fick bara 1 inloggad med din kod med
Set inloggad=objConn.Execute("Select count(*) As Antal From tblUsers where inloggad=1")
varInloggad = CLng("0" & inloggad("Antal"))
Jag provade att skriva 2 i variablen varInloggad, och då får jag "2 inloggade", kolla din SQL fråga, det är där felet är och inte i din eller min kod.
ser inget fel här
Set inloggad=objConn.Execute("Select count(*) As Antal From tblUsers where inloggad=1")
Det är bara du som vet hur din databas är uppbyggd, men Antal ger inte mer än 1 tydligen. Har du kontrollerat att du har mer än en post som har inloggad som är 1?
jag loggade in med 2 konton i 2 separata webläsare på datorn och inloggade är bara en tabell med 1 eller 0 så den skulle egentligen visa 2 men inte.....får klura vidare
tack ändå för hjälpen :-)
Jag är bara trög, glömde bort att inloggad inte sätts till 1 när jag som admin loggar in och jag kollade aldrig databasen, utsatte mig själv för onödigt arbete och frustration :-)