Rekord online..

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

ska testa lite.......

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

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

If rekord > Application("intActive_users") Then

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é

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

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

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

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