I added the online/offline status quite some time ago so I don't remember exactly what I did. But here is what I have in the inc_func_common.asp file:
'#####Online Offline Status Code#####
function AUGetOnlineMembers()
strSql ="SELECT " & strTablePrefix & "ACTIVE_USERS.MEMBER_ID "
strSql = strSql & " FROM " & strTablePrefix & "ACTIVE_USERS "
if strAUAnon and not(bolOverride) then
strSql = strSql & ", " & strTablePrefix & "MEMBERS WHERE "
strSql = strSql & strTablePrefix & "MEMBERS.MEMBER_ID = " & strTablePrefix & "ACTIVE_USERS.MEMBER_ID "
strSql = strSql & "AND " & strTablePrefix & "MEMBERS.M_AUHIDE <> '0'"
end if
set rsOnline = my_Conn.Execute(strSql)
If NOT rsOnline.EOF Then AUGetOnlineMembers = rsOnline.GetRows()
rsOnline.close
set rsOnline = nothing
end function
function AUMemberStatus(OnlineMembers, CurrentMember)
if IsArray(OnlineMembers) then
for intRow = 0 to UBound(OnlineMembers, 2)
if OnlineMembers(0,intRow) = CurrentMember then
AUMemberStatus = "<img valign=""middle"" style=""margin:1 0 1 0"" border=0 src=""" & StrImageURL & "on.gif"">"
exit function
end if
next
end if
AUMemberStatus = "<img valign=""middle"" style=""margin:1 0 1 0"" border=0 src=""" & StrImageURL & "off.gif"">"
end function
'#####Online Offline Status Code#####
Note the part in red is the image.
On my site I am only using an image to show the status. Here is a screen shot:
I hope this helps.