| Author |
 Topic  |
|
middleweb
Junior Member
USA
230 Posts |
|
|
Beano_ie
Junior Member
Ireland
328 Posts |
 Posted - 30 October 2003 : 05:50:00
|
quote:
Originally posted by middleweb
I'm trying to customize active users to make it similar to UK-MKIVs'.
Can we get a link to this UK-MKIVs  so people know what you are trying to do. |
Steve
Drogheda, Ireland @ www.droghedatown.com |
 |
|
|
DavidRhodes
Senior Member
United Kingdom
1222 Posts |
|
|
DavidRhodes
Senior Member
United Kingdom
1222 Posts |
Posted - 30 October 2003 : 06:22:40
|
| Oh, you mean the summary bit under the menu bar? I did the code myself, i'll find it after work. |
The UK MkIVs Forum |
|
|
|
marckmcgill
Junior Member
Italy
134 Posts |
Posted - 30 October 2003 : 06:35:16
|
| Any chance to get in the forum as a guest to take a look at what you're talking about? Seems interesting... |
|
|
|
DavidRhodes
Senior Member
United Kingdom
1222 Posts |
Posted - 30 October 2003 : 06:41:01
|
quote:
Originally posted by marckmcgill
Any chance to get in the forum as a guest to take a look at what you're talking about? Seems interesting...
The link is below, you don't need to login to see it |
The UK MkIVs Forum |
|
|
|
marckmcgill
Junior Member
Italy
134 Posts |
Posted - 30 October 2003 : 06:47:31
|
quote:
Originally posted by DavidRhodes
The link is below, you don't need to login to see it
AHEM!!! toss toss... I'm not in my lucky day, apparently.
 Again! |
|
|
|
middleweb
Junior Member
USA
230 Posts |
Posted - 30 October 2003 : 20:02:44
|
Thanks David! No rush though. That is exactly what I meant, just basically changing the location/format. Thanks again!
-Gabe |
 |
|
|
|
soxc
New Member
53 Posts |
Posted - 30 October 2003 : 23:31:39
|
I also really liked the design that DavidRhodes used on his forum and coded something very similar. A couple of changes that I made were to add the active topics link to this area (with a count on new in () ) and if you are logged in I added the active users list (the test that shows the user names of people online) as a title tag for the active user link. This way people can just mouse over the link to see who is online, but it does not have to take up space all the time. This works for me since I don't have tons of online users.
|
|
|
|
Faizan
Average Member
United Kingdom
592 Posts |
Posted - 31 October 2003 : 00:02:09
|
I wanted to steal his icons once, but then thought it wouldn't be nice to use someone else's property. But really, I love your site David. 
|
»Snitz Graphics
|
|
|
|
soxc
New Member
53 Posts |
Posted - 31 October 2003 : 00:05:42
|
| I agree David's site is awesome. Very clean. |
|
|
|
middleweb
Junior Member
USA
230 Posts |
Posted - 01 November 2003 : 13:05:32
|
| David's site is great! Maybe the best I've seen. |
|
|
|
|
middleweb
Junior Member
USA
230 Posts |
Posted - 01 November 2003 : 22:12:00
|
| Got the code for me yet David? |
|
|
|
|
Faizan
Average Member
United Kingdom
592 Posts |
Posted - 02 November 2003 : 08:54:18
|
He's out on the weekend, will be back tomorrow. (I needed his help with Active Users Status, so I know this  )
|
»Snitz Graphics
|
Edited by - Faizan on 02 November 2003 08:54:52 |
|
|
|
middleweb
Junior Member
USA
230 Posts |
Posted - 04 November 2003 : 19:52:43
|
| Cool, thanks. |
|
|
|
|
DavidRhodes
Senior Member
United Kingdom
1222 Posts |
Posted - 05 November 2003 : 04:56:44
|
Try this
' Get Private Message count for display
if strDBType = "access" then
strSqL = "SELECT count(M_TO) as [pmUserCount] "
else
strSqL = "SELECT count(M_TO) as pmUserCount "
end if
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS , " & strTablePrefix & "PM "
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.M_NAME = '" & strDBNTUserName & "'"
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strTablePrefix & "PM.M_TO "
strSql = strSql & " AND " & strTablePrefix & "PM.M_READ = 0 "
Set rsPM = my_Conn.Execute(strSql)
pmUserCount = rsPM("pmUserCount")
rsPM.close
set rsPM = nothing
%><!--#include file="inc_activeusers_data.asp"--><%
'## Forum_SQL - Get newest membername and id from DB
strSql = "SELECT M_NAME, MEMBER_ID FROM " & strMemberTablePrefix & "MEMBERS " &_
" WHERE M_STATUS = 1 AND MEMBER_ID > 1 " &_
" ORDER BY MEMBER_ID desc;"
set rs = Server.CreateObject("ADODB.Recordset")
rs.open TopSQL(strSql,1), my_Conn
if not rs.EOF then
NewMember_Name = chkString(rs("M_NAME"), "display")
NewMember_Id = rs("MEMBER_ID")
else
NewMember_Name = ""
end if
rs.close
set rs = nothing
Response.Write " <table border=""0"" width=""100%"" cellspacing=""0"" cellpadding=""0"">" &vbCrLf &_
" <tr>" &vbCrLf &_
" <td bgcolor=""" & strTableBorderColor & """>" &vbCrLf &_
" <TABLE WIDTH=""100%"" BORDER=""0"" CELLSPACING=""1"" CELLPADDING=""4"">" &vbCrLf &_
" <TR>" &vbCrLf &_
" <TD align=""left"" bgcolor="""& strHeadCellColor &""" nowrap valign=""top""><font face="""& strDefaultFontFace &""" size="""& strDefaultFontSize &""" color="""& strCategoryFontColor &"""> </font></td>" &vbCrLf &_
" </TR>" &vbCrLf &_
" <TR>" &vbCrLf &_
" <TD align=""left"" bgcolor="""& strForumCellColor &""" nowrap valign=""top""><font size="""& strFooterFontSize &""">" &_
" [ <a href=""active_users.asp"">Active Users</a>: "& intActiveMembers &" | Guests: "& intActiveGuests &" ] [ Total: "& intTotalActiveUsers &" ] "
if NewMember_Name <> "" then
Response.Write "[ Newest Member: <span class=""spnMessageText"">" & profileLink(NewMember_Name,NewMember_Id) & " ]</span>" & vbNewline
end if
Response.Write "[ "
if pmUserCount >=1 then
Response.Write "<font color=""" & strActiveLinkColor & """><b>" & pmUserCount & "</b></font>"
else
Response.Write pmUserCount
end if
Response.Write " new <span class=""spnMessageText""><a href=""pm_view.asp"">message"
if pmUserCount <>1 then
Response.Write "s"
end if
Response.Write "</a></span> | <span class=""spnMessageText""><a href=""javascript:openWindowPager('pm_pop_pager.asp')"">pager</a></span> ]"
Response.Write " </font></td>" &vbCrLf &_
" </TR>" &vbCrLf &_
" </table>" &vbCrLf &_
" </td>" &vbCrLf &_
" </tr>" &vbCrLf &_
" </table>" &vbCrLf |
The UK MkIVs Forum |
|
|
|
Topic |
|
Topic Locked
