| Author |
 Topic  |
|
|
psalesses
New Member
50 Posts |
 Posted - 31 July 2002 : 16:24:44
|
what do you guys think of a "Last unread post" button that would automatically jump to the last unread post in topic. When there are three or four pages in a topic, it gets annoying trying to sort thorugh and find which page I left off at...
What do you think???
|
|
|
Roland
Advanced Member
Netherlands
9335 Posts |
|
|
RichardKinser
Snitz Forums Admin
USA
16655 Posts |
Posted - 31 July 2002 : 17:01:34
|
| in v3.4 there will be a feature to jump to the last post in a thread, not necessarily the last "unread" post. We don't track what posts have actually been read. |
 |
|
|
dayve
Forum Moderator
USA
5820 Posts |
|
|
Roland
Advanced Member
Netherlands
9335 Posts |
Posted - 31 July 2002 : 17:11:41
|
quote:
in v3.4 there will be a feature to jump to the last post in a thread, not necessarily the last "unread" post. We don't track what posts have actually been read.
Oh yeah, sorry about that. I must've missed the "unread" part in the question 
Roland
http://www.frutzle.com
Snitz Exchange | Snitz Icons | Do's and Dont's |
|
|
|
richfed
Average Member
United States
999 Posts |
|
|
Beldin
Starting Member
Germany
17 Posts |
Posted - 12 September 2002 : 19:50:43
|
Hi , i made something that goes to the last Post depending on the lastheredate
from the Active-Topics Page , i modified the link.asp a little for that
and reused it in 3.4 , however the code is a little bit chaotic now , since
i had to do all my old changes again to 3.4 and didn't cared about nice coding then *sigh*
Don't know if it works for you , but you may try it ;)
In active.asp the link looks like that :
Response.Write "<span class=""spnMessageText""><a href=""link.asp?TOPIC_ID=" & Topic_ID & "&LastDate=" & LastDate &""">" & Smile(ChkString(Topic_Subject,"title")) & "</a></span> " & vbNewline
Link.asp looks like that :
%>
<!--#INCLUDE FILE="config.asp" -->
<!--#INCLUDE FILE="inc_func_common.asp" -->
<!--#INCLUDE FILE="inc_header.asp" -->
<%
server.scripttimeout=10
'* -- Insert from Jens Menke (REPLY_ID for Mail Notification) -----------
Reply_ID = replace(Request.QueryString("Reply_ID"),"3D","")
Topic_ID = replace(Request.QueryString("TOPIC_ID"),"3D","")
if Reply_ID="" then Reply_ID="0"
'* -- Insert from Jens Menke (REPLY_ID for Mail Notification) -----------
if request.querystring("LastDate") <> "" then
set my_Conn = Server.CreateObject("ADODB.Connection")
my_Conn.Open strConnString
if request.querystring("LastDate") <> "" then
d = request.querystring("LastDate")
else
d=ReadLastHereDate(strDBNTUserName)
end if
strsql = "select Reply_ID from Forum_Reply where Topic_ID = " & Topic_ID & " and r_date <= '" & d & "' order by Reply_ID"
response.write strsql
set ReplyInfo = my_Conn.Execute (StrSql)
n=0
while not ReplyInfo.eof
PageNr = int(n / strPageSize)+1
Reply_ID = ReplyInfo("Reply_ID")
ReplyInfo.movenext
n = n + 1
wend
'## Forum_SQL - Find out if the Topic is Locked or Un-Locked and if it Exists
strSql = "SELECT " & strTablePrefix & "TOPICS.CAT_ID, " & strTablePrefix & "TOPICS.FORUM_ID, " & strTablePrefix & "TOPICS.TOPIC_ID, " & strTablePrefix & "TOPICS.T_SUBJECT, " & strTablePrefix & "FORUM.F_SUBJECT "
strSql = strSql & " FROM " & strTablePrefix & "TOPICS, " & strTablePrefix & "FORUM "
strSql = strSql & " WHERE " & strTablePrefix & "TOPICS.TOPIC_ID = " & replace(Request.QueryString("TOPIC_ID"),"3D","")
strSql = strSql & " AND " & strTablePrefix & "TOPICS.FORUM_ID = " & strTablePrefix & "FORUM.FORUM_ID"
set rsTopicInfo = my_Conn.Execute (StrSql)
if (rsTopicInfo.EOF and rsTopicInfo.BOF) then
'check archive
rsTopicInfo.close
strSql = "SELECT " & strArchiveTablePrefix & "TOPICS.CAT_ID, " & strArchiveTablePrefix & "TOPICS.FORUM_ID, " & strArchiveTablePrefix & "TOPICS.TOPIC_ID, " & strArchiveTablePrefix & "TOPICS.T_SUBJECT, " & strTablePrefix & "FORUM.F_SUBJECT "
strSql = strSql & " FROM " & strArchiveTablePrefix & "TOPICS, " & strTablePrefix & "FORUM "
strSql = strSql & " WHERE " & strArchiveTablePrefix & "TOPICS.TOPIC_ID = " & replace(Request.QueryString("TOPIC_ID"),"3D","")
strSql = strSql & " AND " & strArchiveTablePrefix & "TOPICS.FORUM_ID = " & strTablePrefix & "FORUM.FORUM_ID"
set rsTopicInfo = my_Conn.Execute (StrSql)
if (rsTopicInfo.EOF and rsTopicInfo.BOF) then
Response.Redirect "default.asp"
else
'* -- Changed from Jens Menke (REPLY_ID for Mail Notification) -----------
Response.Redirect "topic.asp?ARCHIVE=true&whichpage=" & PageNr & "&TOPIC_ID=" & RsTopicInfo("TOPIC_ID") & "#" & Reply_ID
end if
else
Response.Redirect "topic.asp?whichpage=" & PageNr & "&TOPIC_ID=" & RsTopicInfo("TOPIC_ID") & "#" & Reply_ID
'* -- Changed from Jens Menke (REPLY_ID for Mail Notification) -----------
end if
elseif Request.QueryString("TOPIC_ID") <> "" and IsNumeric(Request.QueryString("TOPIC_ID")) then
Response.Redirect "topic.asp?TOPIC_ID=" & cLng(Request.QueryString("TOPIC_ID"))
elseif Request.QueryString("FORUM_ID") <> "" and IsNumeric(Request.QueryString("FORUM_ID")) then
Response.Redirect "forum.asp?FORUM_ID=" & cLng(Request.QueryString("FORUM_ID"))
else
Response.Redirect "default.asp"
end if
%> |
Edited by - Beldin on 12 September 2002 19:54:03 |
|
|
| |
Topic |
|
Topic Locked
