hi, i make this MOD because never remember the new topic checked for my and in a forum with a lot of topic is very important this function
here is the zip file
http://www.ilmortoquiparla.com.ar/snitz/markread.zip
and if the link dont work here is the mod:
in inc_iconfiles.asp
search this
Const strIconYahoo = "icon_yahoo.gif|16|15"
and add this (you need the .gif included in zip file)
'##markread
Const strIconFolderNewOK = "icon_folder_new_ok.gif|15|15"
Const strIconFolderNewHotOK = "icon_folder_new_hot_ok.gif|15|17"
Const strIconFolderNewStickyOK = "icon_folder_new_sticky_ok.gif|15|15"
'##markread end
in inc_func_chknew.asp
search something like that (the flang(*) is for international version, in the standar version is replaced for a text string)
Function ChkIsNew2(dt)
if Topic_Replies = "" then Topic_Replies = rs("T_REPLIES")
if dt > Session(strCookieURL & "last_here_date") then
if Topic_Replies >= intHotTopicNum and lcase(strHotTopic) = "1" Then
ChkIsNew2 = getCurrentIcon(strIconFolderNewHot,fLang(strLangInc_Func_Chknew00030),"hspace=""0""")
else
ChkIsNew2 = getCurrentIcon(strIconFolderNew,fLang(strLangInc_Func_Chknew00040),"hspace=""0""")
and change to this
Function ChkIsNew2(dt)
if Topic_Replies = "" then Topic_Replies = rs("T_REPLIES")
if dt > Session(strCookieURL & "last_here_date") then
if Topic_Replies >= intHotTopicNum and lcase(strHotTopic) = "1" Then
'##markread
if Session(strCookieURL & "topic" & Topic_ID) > dt then
ChkIsNew2 = getCurrentIcon(strIconFolderNewHotOK,fLang(strLangInc_Func_Chknew00030) & " checked","hspace=""0""")
else
'##markread end
ChkIsNew2 = getCurrentIcon(strIconFolderNewHot,fLang(strLangInc_Func_Chknew00030),"hspace=""0""")
'##markread
end if
'##markread end
else
'##markread
if Session(strCookieURL & "topic" & Topic_ID) > dt then
ChkIsNew2 = getCurrentIcon(strIconFolderNewOK,fLang(strLangInc_Func_Chknew00040) & " checked","hspace=""0""")
else
'##markread end
ChkIsNew2 = getCurrentIcon(strIconFolderNew,fLang(strLangInc_Func_Chknew00040),"hspace=""0""")
'##markread
end if
'##markread end
in default.asp
search something like that (the flang(*) is for international version, in the standar version is replaced for a text string)
sub ChkIsNew(dt)
Response.Write "<a href=""forum.asp?FORUM_ID=" & ForumID & """>"
if CatStatus <> 0 and ForumStatus <> 0 then
if dt > Session(strCookieURL & "last_here_date") and (ForumCount > 0 or ForumTopics > 0) then
Response.Write getCurrentIcon(strIconFolderNew,fLang(strLangDefault00170),"hspace=""0""") & "</a>"
and change to this
sub ChkIsNew(dt)
Response.Write "<a href=""forum.asp?FORUM_ID=" & ForumID & """>"
if CatStatus <> 0 and ForumStatus <> 0 then
if dt > Session(strCookieURL & "last_here_date") and (ForumCount > 0 or ForumTopics > 0) then
'##markread
if Session(strCookieURL & "foro" & ForumID) > dt then
Response.Write getCurrentIcon(strIconFolderNewOK,fLang(strLangDefault00170) & " checked","hspace=""0""") & "</a>"
else
'##markread end
Response.Write getCurrentIcon(strIconFolderNew,fLang(strLangDefault00170),"hspace=""0""") & "</a>"
'##markread
end if
'##markread end
in forum.asp
search this
<!--#INCLUDE FILE="inc_moderation.asp" -->
<%
and add this
'##markread
Session(strCookieURL & "foro" & Forum_ID) = (DateToStr(strForumTimeAdjust))
'##markread end
search something like that (the flang(*) is for international version, in the standar version is replaced for a text string)
if Topic_Sticky and strStickyTopic = "1" then
if Topic_LastPost > Session(strCookieURL & "last_here_date") then
Response.Write getCurrentIcon(strIconFolderNewSticky,fLang(strLangForum00190),"hspace=""0""")
and change to this
if Topic_Sticky and strStickyTopic = "1" then
if Topic_LastPost > Session(strCookieURL & "last_here_date") then
'##markread
if Session(strCookieURL & "topic" & Topic_ID) > dt then
Response.Write getCurrentIcon(strIconFolderNewStickyOK,fLang(strLangForum00190) & " checked","hspace=""0""")
else
'##markread end
Response.Write getCurrentIcon(strIconFolderNewSticky,fLang(strLangForum00190),"hspace=""0""")
'##markread
end if
'##markread end
in topic.asp
search this
<!--#INCLUDE FILE="inc_code.asp" -->
<%
and add this
'##markread
Session(strCookieURL & "topic" & Topic_ID) = (DateToStr(strForumTimeAdjust))
'##markread end
if dont work, let me now in this topic
saludos