Show how many messages since yours IN PAGE TITLE

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.

Show how many messages since yours IN PAGE TITLE - Posted 26 May 2007 06:16 (5742 Views)

balexandre

Junior Member

Posts: 418

418

I just made this for my self as an add-on of what I did in the Forum main page (show the last 10 messages posted).
the objective was something like "GMAIL - Inbox (3)" and this is the code I uses in my page.
you can have the same in 2 steps please note that this is only to change the title of the page, the Top 10 messages that you can see in the images below ARE NOT included in this tutorial, another thing is, this only works with Access DB and MySQL above version 4.x.

ADD THIS IN inc_header.asp BEFORE the 2nd response.write function that had the tag:
Code:
```
<title>
```
(so, search for
Code:
```
<title>
```
, the 2nd one STOP and scroll up until you get the response.write, above that line, paste the include)

paste this:

Code:
```
%><!--#INCLUDE FILE="inc_showMsgNrOnTitle.asp"><%
```

in a new file called

Code:

inc_showMsgNrOnTitle.asp

paste this:

Code:

<%
' ********************************************************************************************
' SHOW NUMBER OF NEW MESSAGES IN TITLE IF LOGGED IN (MORE THAN 20, WILL OUTPUT +20)
' Built in: 26th May 2007 by Bruno Alexandre <bruno.in.dk@gmail.com>
' version: 0.0.2 | (29th May 2007) | updated with TopSQL() so it runs in mySQL as well (>4.x)
' version: 0.0.1 | (26th May 2007) | Mod Start
' ********************************************************************************************
strNewMessages = ""
intNewMessages = 0
' We only see the messages if the user is Logged In
if strDBNTUserName <> "" then
	' Get the last 20 messages order by Date
	sqlstr = "SELECT M_NAME FROM ( " & _
			"SELECT " & strTablePrefix & "TOPICS.CAT_ID, " & strTablePrefix & "TOPICS.FORUM_ID, " & strTablePrefix & "TOPICS.TOPIC_ID, " & strTablePrefix & "TOPICS.T_SUBJECT, '' AS MSG_ID, " & strTablePrefix & "TOPICS.T_MESSAGE AS MSG, " & strTablePrefix & "TOPICS.T_DATE AS MSG_DATE, " & strTablePrefix & "MEMBERS.MEMBER_ID, " & strTablePrefix & "MEMBERS.M_NAME " & _
			"FROM " & strTablePrefix & "MEMBERS INNER JOIN " & strTablePrefix & "TOPICS ON " & strTablePrefix & "MEMBERS.MEMBER_ID = " & strTablePrefix & "TOPICS.T_AUTHOR " & _
			"UNION ALL " & _
			"SELECT " & strTablePrefix & "TOPICS.CAT_ID, " & strTablePrefix & "TOPICS.FORUM_ID, " & strTablePrefix & "TOPICS.TOPIC_ID, " & strTablePrefix & "TOPICS.T_SUBJECT, " & strTablePrefix & "REPLY.REPLY_ID AS MSG_ID, " & strTablePrefix & "REPLY.R_MESSAGE as MSG, " & strTablePrefix & "REPLY.R_DATE as MSG_DATE, " & strTablePrefix & "MEMBERS.MEMBER_ID, " & strTablePrefix & "MEMBERS.M_NAME " & _
			"FROM (" & strTablePrefix & "TOPICS INNER JOIN " & strTablePrefix & "REPLY ON " & strTablePrefix & "TOPICS.TOPIC_ID = " & strTablePrefix & "REPLY.TOPIC_ID) INNER JOIN " & strTablePrefix & "MEMBERS ON " & strTablePrefix & "REPLY.R_AUTHOR = " & strTablePrefix & "MEMBERS.MEMBER_ID " & _
			") a " & _
			"ORDER BY MSG_DATE DESC;"
	
	Set objRec = Server.CreateObject ("ADODB.Recordset")
	objRec.Open TopSQL(sqlstr, 20), My_Conn
	objRec.moveFirst()
	do until objRec.EOF
		if objRec.fields("M_NAME") = strDBNTUserName then
			' Found a message from the CurrentUser, so Get out!
			exit do
		else
			' The message is not from the Current User, so let's Add it to the variable
			intNewMessages = intNewMessages + 1
		end if
	objRec.moveNext()
	loop
	
	if intNewMessages > 0 then
		' if the are new messages, let's surround it with curve brackets
		if objRec.EOF then
			' there are more than 20, so, instead of looping all we show +20
			strNewMessages = "(+" & intNewMessages & ")"
		else
			strNewMessages = "(" & intNewMessages & ")"
		end if
		strNewMessages = "(" & intNewMessages & ")"
		strScriptName = strScriptName & strNewMessages 
	end if
	
	objRec.close
	set objRec = Nothing
end if
%>

Hope you find this useful

my Forum: www.ga-paneuropean.com

Bruno Alexandre
(Strøby, DANMARK)

"a Portuguese in Danmark"

MOD's contribution to Snitz community * Facebook Module *
RSS Snitz Multiple Feed *
Online videos (Youtube, Google video, Flash, Quicktime, etc) *
Add avatar with image crop (on the fly) *
Show last messages in the forum *
Show how many messages since yours IN PAGE TITLE *
Updated version of Gender MOD *
Fly to the top instead of jumping *

an idea: iPhone version of Snitz
<mySnitzForum>GAPE</mySnitzForum>

Last edited by balexandre on 10 July 2008, 15:58

Posted 26 May 2007 06:43

AnonJr

Forum Moderator

Posts: 5768

5768

Is it something you have to be logged in to see?<

Posted 26 May 2007 07:05

balexandre

Junior Member

Posts: 418

418

only logged in you will be able to see that, cause... How can the MOD know who you are to tell you how many new messages are since your last one?

Posted 26 May 2007 07:19

AnonJr

Forum Moderator

Posts: 5768

5768

You could do like active.asp does - if you're not logged in it shows all the active topics for the last 30 days. Likewise, if not logged in you could have the number of topics for the last 30 days. Or you could just provide a generic login so we can see it in action.

Also, these forums (as in here, not in the actual base code) have a neat little undocumented feature - [scrollcode] tags. It was added so you could post huge chunks of code like that without stretching the posts. Just a friendly tip.

Last edited by AnonJr on 26 May 2007, 07:20

Posted 26 May 2007 07:36

balexandre

Junior Member

Posts: 418

418

didn't know about scrollcode

done !

humm... It's a nice ideia, but I can do that for yourself and show the code, I don't thing I'll used it cause... if you're not login, just click the Active posts link

the Objective is 2 be logged in and minimize the window or put the window in a new tab, and soon someone put's a message you can see it right away

but if you want I can add that feature! to many years under ASP / T-SQL... that's simple to implement.
By the way,
do you think I should put here the code for the Top 10 Messages MOD that I created in the forum?<

Last edited by balexandre on 26 May 2007, 07:50

Posted 26 May 2007 08:44

AnonJr

Forum Moderator

Posts: 5768

5768

Originally posted by balexandre
By the way,
do you think I should put here the code for the Top 10 Messages MOD that I created in the forum?

Sure. We try to encourage everybody post back fun code like that - it helps the community grow.

Posted 26 May 2007 10:41

balexandre

Junior Member

Posts: 418

418

never used mySQL, and I do not know what are the differences on t-sql, my world is only MS SQL

please fell free to update a T-SQL Code

about looping, yes, but my Access Database knowledge is limited and only led me to that, in MS SQL, I would use an SP, retrieve both count and sum ... easy, but not supported by Access.
But: I changed the code, so now I request the TOP 20 and if more than 20 I simple say (+20) instead of looping all the messages in the Database... this was a really issue if the user is a new member and not yet any posts

<Obrigado!>

As suggested, I will edit my post and add that message about UNION function

about the images... humm, I even added "Objective", the Top 10 messages is other MOD that I created, and like AnonJR said, I will post it as well, but right now it's codded for my Forum, and no comments or other options as 1 vertical table with all 10 messages.
to place the MOD I should, at least, place some options, like Vertical / Horizontal and how many Rows / Columns<

Last edited by balexandre on 26 May 2007, 10:58