Nån som vet varför detta inte fungerar?


rstActiveUsers.MoveFirst

While Not rstActiveUsers.EOF
rstActiveUsers.Edit
rstActiveUsers("id") = Session.SessionID
rstActiveUsers.Update
rstActiveUsers.MoveNext
Wend
rs.Close

Får detta felet:

Körningsfel i Microsoft VBScript fel '800a01b6'

Objektet stöder inte egenskapen eller metoden.: 'rstActiveUsers.Edit'

//global.asa, line 99

Vad jag vet så ska den raden inte vara där.

Do Until rstActiveUsers.EOF
rstActiveUsers("id") = Session.SessionID
rstActiveUsers.Update
rstActiveUsers.MoveNext
Loop
rstActiveUsers.Close

Edit använde man i DAO. I ADO behöver du inte anropa Edit utan kan direkt uppdatera fälten.
Tänk bara på att Cursorn och låsning måsta vara uppdaterbar.