webForumDet fria alternativet

Rekord online..

ASP

8 svar · 316 visningar · startad av icaaq

Medlem sedan okt. 20005 273 inlägg
Frågan#1

hur kan jag spara hur många som varit på min sida som mest.....online asso

------------------
icaaq

man måste fråga för att lära sig något

---i suck ---

[Redigerat av icaaq den 07 feb 2001]

Medlem sedan dec. 19998 577 inlägg
#2

Du använder först koden i FAQ:n och sedan när någon kommer in på sidan så (i globa.asa) så kollar du om application("visitors") är större än fältet (eller vart du nu lagrar datat). Om det är större så updaterar du posten med det aktuella värdet ifrån application("visitors")...

Borde funka, har inte testat det dock... ;)

Mvh, Vide

------------------
Nu har du sjungit på sista refrängen
Jourhavande Vide

Medlem sedan okt. 20005 273 inlägg
#3

ska testa lite.......

------------------
icaaq

man måste fråga för att lära sig något

---i suck ---

Medlem sedan okt. 20005 273 inlägg
#4

har kommit på detta....kanske det är helt fel men jag testar mig fram

strSQL = "SELECT (just_nu) AS rekord FROM online WHERE ID = 1 "
Set objRS = objConn.execute(strSQL)
rekord = objRS("rekord")

If rekord < Application("intActive_users") Then
nytt_rekord = Application("intActive_users")
SQL = "UPDATE online SET just_nu = nytt_rekord WHERE ID = 1"
End If

jag vet det kanske inte är den bästa lösningen .....för den funkar inte som den ska...är det nån som har nått förslag

------------------
icaaq

man måste fråga för att lära sig något

---i suck ---

Medlem sedan jan. 20001 372 inlägg
#5

en tanke var att det (för mig) ser ut att det ska vara

If rekord > Application("intActive_users") Then

------------------
// David - Probably the best guy in the world

[Redigerat av DavidB den 07 feb 2001]

Medlem sedan dec. 2000399 inlägg
#6

Din sql-sats ser lite skum ut. Prova det här istället:

sql = "UPDATE online set just_nu = '" & fnamn & "' WHERE id = 1"

Hoppas det fungerar bättre så...

mvh André

Medlem sedan okt. 20005 273 inlägg
#7

Hehe....jag får det fortfarande inte att funka..den vill inte updatea. :q

strSQL = "SELECT (just_nu) AS rekord FROM online WHERE ID = 1 "
Set objRS = objConn.execute(strSQL)
rekord = objRS("rekord")

If rekord < Application("intActive_users") Then
nytt_rekord = Application("intActive_users")
sql = "UPDATE online set just_nu = '" & nytt_rekord & "' WHERE id = 1"
End If

------------------
icaaq

man måste fråga för att lära sig något

---i suck ---

Medlem sedan dec. 200012 464 inlägg
#8

Det saknas ett executeanrop som utför uppdateringen:

If rekord > Application("intActive_users") Then
nytt_rekord = Application("intActive_users")
sql = "UPDATE online set just_nu = '" & nytt_rekord & "' WHERE id = 1"
objConn.execute sql
End If

------------------
essentitia preter non sans multiplicandum

[Redigerat av LarsG den 07 feb 2001]

Medlem sedan okt. 20005 273 inlägg
#9

Nu ser det ut att funka....Tack allihopa

------------------
icaaq

man måste fråga för att lära sig något

---i suck ---

272 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
139 ms — deklarationer (db)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)
138 ms — ändringar (db)