Global.asa icinde Session_onEnd icine aşağıdaki satırlar eklendi, boylece kapanan her oturumla birlikte liste tazelensin:


Application.Lock
uyeadi=session("membername")

aranan = "
" & uyeadi & ""
if not instr(application("onlineuyeler"), aranan) > 0 then
application("onlineuyeler") = application("onlineuyeler") & "
" & uyeadi & ""
End if
Application.UnLock

A?a?ydaki kısım ise -ki yukarısı ile aynı- başarılı ?ekilde giriş yapan uyenin login olanın peşine eklendi:

uyeadi=session("membername")

'aynı uye iki kez gosterilmesin diye once
'listeye eklenip eklenmediğini arayalım.

aranan = "
" & uyeadi & ""
'Eger aranan kişi listede degil ise ekleyelim:
if not instr(application("onlineuyeler"), aranan) > 0 then
application("onlineuyeler") = application("onlineuyeler") & "
" & uyeadi & ""
End if

Oluşturulan application("onlineuyeler") stringi icinde gerekli html formatlanmasy yapylmy?, linkler verilmis ve link style işlemi yapılmştır... Elimizde bulunan bu stringi artık nereye yazarsak orada online uyeler listesi cıkacak ve her login ve logout ile bu liste tazelenecektir. Tabi listenin tazelenmesi icin sayfanın refresh edilmesi de gerekir.

asp sayfanızın uygun bir yerine yazarsanız iş biter...
__________________