mark topic/forum read - Snitz™ Forums 2000

The Forum has been Updated

The code has been upgraded to the latest .NET core version. Please check instructions in the Community Announcements about migrating your account.

mark topic/forum read - Postet den 29 Nov 2000 (5762 Views)

JohnO

Starting Member

Innlegg: 21

This may well have been suggested before but I would like to put a different "slant" on it. If you do not finish reading all new posts, then close the browser, upon re-opening, all unread posts are assumed to have been read. It is difficult to then pick out which posts you didn't get to read on the previous visit. Having played with the EZboard forums, I particularly like the "mark forum read" and "mark all forums read" feature. This means that any unread forums are still marked as such next time you visit. The user decides whether to mark a forum as read or not. Are there plans for a similar feature (or does it already exist and I am just missing it)?
John

<

Postet den 29 Nov 2000

HuwR

Forum Admin

Innlegg: 20611

20611

if you try http://forum.snitz.com/forum/active2.asp you can choose different options for viewing the active topics

'Resistance is futile'<

Postet den 29 Nov 2000

JohnO

Starting Member

Innlegg: 21

Thanks HuwR,

Nearly but not quite...
Maybe it's just a case of being used to the way EZBoards work. I assume you know the features I am referring to?
John

<

Postet den 01 Jun 2003

bud_dadude

Starting Member

Innlegg: 21

JohnO,
I have just discovered that you CAN do what you asked for. Go to the "Active Topics" page and if you have new messages, you will see a little folder that is half pink and half yellow near the left hand top corner of the table. This is the "mark all read" button.
Enjoy!

Postet den 17 May 2005

SLiPStreaM

Starting Member

Innlegg: 46

Does anyone know if it is possible to add text next to this graphic so that other users know what this link does?<

Postet den 17 May 2005

Shaggy

Support Moderator

Innlegg: 6780

6780

You'll find the icon on line 385 of active.asp:

Code:

"<acronym title=""Mark all topics as read""><input type=""image"" src=""" & strImageUrl & "icon_topic_all_read.gif"" value=""Mark all read"" id=""submit1"" name=""Mark all topics as read"" border=""0""" & dWStatus("Mark all topics as read") & "></acronym></font></td>" & vbNewLine & _

You could add some text beside to let people know what it does but you'd probably only have people wondering why they couldn't click the text. Better option would probably be to create your own icon_topic_all_read.gif with text on it.
<

Search is your friend “I was having a mildly paranoid day, mostly due to the
fact that the mad priest lady from over the river had
taken to nailing weasels to my front door again.”

Postet den 17 May 2005

StephenD

Senior Member

Innlegg: 1044

1044

You can put this before the '##Start to build the Table on line 387.

Code:

'### Start modified 'Mark All Read' code
If recActiveTopicsCount <> "" and (mLev > 0) then
	Response.Write	"        <form name=""MarkRead"" action=""active.asp"" method=""post"">" & vbNewline & _
		"      <table border=""0"" width=""100%"" cellspacing=""0"" cellpadding=""0"" align=""center"">" & vbNewLine & _
		"        <tr>" & vbNewLine & _
		"              <td valign=""bottom"">" & vbNewline & _
		"                <input type=""hidden"" name=""AllRead"" value=""Y"">" & vbNewline & _
		"                <input type=""hidden"" name=""BuildTime"" value=""" & DateToStr(strForumTimeAdjust) & """>" & vbNewline & _
		"                <input type=""hidden"" name=""Cookie"" value=""2"">" & vbNewLine
	if strGfxButtons = "1" then
		Response.Write	"                <acronym title=""Mark all topics as read""><input type=""image"" src=""" & strImageUrl & "button_mark_all_read.gif"" value=""Mark all Topics as read"" id=""submit1"" name=""Mark all Topics as read"" border=""0""" & dWStatus("Mark all Topics as read") & " tabindex=""-1""></acronym></td>" & vbNewLine
	else
		Response.Write	"                <input type=""submit"" value=""Mark all Topics as read"" id=""submit1"" name=""Mark all Topics as read"" tabindex=""-1""></td>" & vbNewLine
	end if
	Response.Write	"        </tr>" & vbNewLine & _
		"      </table>" & vbNewLine & _
		"        </form>" & vbNewline
End if
'### End modified 'Mark All Read' code

Here's a crap button I made as an example:

Can't remember who contributed this code but it was almost 3 years ago.<

Sist redigert av