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