online üyeleri göremiyorum

[asilonline]

merhaba

aşağıdaki kodlarla online olan üyeleri görmem gerektiğine inanıyorum. fakat olmuyo. ne gibi değişiklik yapmalıyım. yardımcı olursanız sevinirim.

teşekkürler...





<%
tarihim=dateAdd("s",-60,now)
Set onlineuye = Server.CreateObject("Adodb.Recordset")
onlineuye.Open "select USERNAME from MEMBER where onlinetarihi>=#"&tarihim&"# order by puan desc", uyebaglantim, 1, 3
if not onlineuye.eof then

onlineuye.move 0
for t=1 to onlinedestem
if onlineuye.eof then exit for
%>

<td class="puan_listesi_icerik">&nbsp;<a href="javascript:uyebilgiac('uyebilgileri.asp?uyea di=<%=onlineuye("USERNAME")%>','resim','width=430; height=170');"><%if onlineuye("USERNAME")=session("uyeadi") then response.write "<font color=red>" end if%><%=onlineuye("USERNAME")%></a></td>
<tr><td background="images/nokta.gif" height="1" colspan="6"></td><tr>

<%
onlineuye.movenext
next

else
%>

<td class="puan_listesi_icerik">&nbsp;Online üye bulunmamaktadır</td>
<tr><td background="images/nokta.gif" height="1" colspan="6"></td><tr>

<%
end if
%>

<tr></tr></table>

[aliskan]

for t=1 to onlinedestem
buradaki onlinedestem nedir. kodlarda bi değer atanmamış da

[asilonline]

ayarlar dosyasında onlinedestem in değeri 10 olarak atandı. onda bi problem onun yerine 10 değeri çıkıyor.