Snitz Forums 2000 - where has this code come from?

Snitz Forums 2000

Username:	Password:
Save Password
Forgot your Password?

All Forums

Help Groups for Snitz Forums 2000 Users

Help: General / Classic ASP versions(v3.4.XX)

where has this code come from?

New Topic

Topic Locked

Printer Friendly

Author

Topic

GarethMoore1979
Junior Member

United Kingdom
220 Posts

Posted - 05 August 2004 : 08:38:13

ActiveTopicCount = -1
if IsEmpty(Session(strCookieURL & "last_here_date")) then
Session(strCookieURL & "last_here_date") = ReadLastHereDate(strDBNTUserName)
end if
if not IsNull(Session(strCookieURL & "last_here_date")) then
if not blnHiddenForums then

'## Forum_SQL - Get ActiveTopicCount from DB
strSql = "SELECT COUNT(" & strTablePrefix & "TOPICS.T_LAST_POST) AS NUM_ACTIVE "
strSql = strSql & "FROM " & strTablePrefix & "TOPICS "
strSql = strSql & "WHERE (((" & strTablePrefix & "TOPICS.T_LAST_POST)>'"& Session(strCookieURL & "last_here_date") & "'))"
strSql = strSql & " AND " & strTablePrefix & "TOPICS.T_STATUS <= 1"

set rs = my_Conn.Execute(strSql)

if not rs.EOF then
ActiveTopicCount = rs("NUM_ACTIVE")
else
ActiveTopicCount = 0
end if
end if
end if

Its in my previous forum of snitz which was modded (in inc_header.asp) but its not in the newest version and I cant see that it has come from any mods either!
so where is it from?

Edited by - GarethMoore1979 on 05 August 2004 12:46:10

davemaxwell
Access 2000 Support Moderator