Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/O Code)
 Addition to Last Post Info
 New Topic  Topic Locked
 Printer Friendly
Previous Page | Next Page
Author Previous Topic Topic Next Topic
Page: of 4

wii
Free ASP Hosts Moderator

Denmark
2632 Posts

Posted - 14 March 2003 :  03:04:10  Show Profile
dayve, I rather keep the forum private, but I can see the same in your forum:

here´s an example:

213 of 595 Members have made 34729 posts in 13 forums, with the last post on
14 Mar 2003 08:34:47 by: wii.

There´s an extra lineshift after on

it should show like this:

213 of 595 Members have made 34729 posts in 13 forums, with the last post on 14 Mar 2003 08:34:47 by: wii.
Go to Top of Page

Image
Average Member

Canada
574 Posts

Posted - 14 March 2003 :  19:05:56  Show Profile  Visit Image's Homepage  Send Image an ICQ Message
quote:
Originally posted by dayve

Image, that is a little redudant, David showed where the optimal placement for the code was in his previous post.


I don't think it is redundant because if I apply only to ForumLastPostReplyID then the 16 chrs won't apply to ForumLastPostTopicID, but with the change I posted both the topic and the reply will limit to 16 chrs.
Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts

Posted - 14 March 2003 :  19:14:37  Show Profile  Visit dayve's Homepage
quote:
Originally posted by OneWayMule

It doesn't work when there are no replies. You could use this:

Function DoLastPostLink(showicon)
        if len(ForumTopicSubject) > 35 then 
		ForumTopicSubject = left(ForumTopicSubject,35) & "..."
	end if
	if ForumLastPostReplyID <> 0 then
		PageLink = "whichpage=-1&"
		AnchorLink = "&REPLY_ID="
		DoLastPostLink = "<br><a href=""topic.asp?" & PageLink & "TOPIC_ID=" & ForumLastPostTopicID & AnchorLink & ForumLastPostReplyID & """>"
		if (showicon = true) then DoLastPostLink = DoLastPostLink & getCurrentIcon(strIconLastpost,"Jump to Last Post","align=""absmiddle""") & " <i>" &  ForumTopicSubject & "</i></a><br>"
	elseif ForumLastPostTopicID <> 0 then
		DoLastPostLink = "<br><a href=""topic.asp?TOPIC_ID=" & ForumLastPostTopicID & """>"
		if (showicon = true) then DoLastPostLink = DoLastPostLink & getCurrentIcon(strIconLastpost,"Jump to Last Post","align=""absmiddle""") & " <i>" &  ForumTopicSubject & "</i></a><br>"
	else
		DoLastPostLink = ""
	end if
end function



^^^^^

Image, your coding is redundant, but I was more referring to the fact that OneWayMule
already pointed out this issue. As you can see it is resolved in less lines of code
as well (above code).


Edited by - dayve on 14 March 2003 19:15:24
Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts

Posted - 14 March 2003 :  19:17:10  Show Profile  Visit dayve's Homepage
quote:
Originally posted by wii

dayve, I rather keep the forum private, but I can see the same in your forum:

here´s an example:

213 of 595 Members have made 34729 posts in 13 forums, with the last post on
14 Mar 2003 08:34:47 by: wii.

There´s an extra lineshift after on

it should show like this:

213 of 595 Members have made 34729 posts in 13 forums, with the last post on 14 Mar 2003 08:34:47 by: wii.



that's weird, because this code should have nothing to do with the statistics area.
I will take a closer look.

Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 14 March 2003 :  19:27:16  Show Profile
The last poster info shown in the statistics area is retrieved while the category/forum tables are being built, so if you are modifying that info there, it will be modified in the statistics area also.
Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts

Posted - 14 March 2003 :  22:50:54  Show Profile  Visit dayve's Homepage
quote:
Originally posted by RichardKinser

The last poster info shown in the statistics area is retrieved while the category/forum tables are being built, so if you are modifying that info there, it will be modified in the statistics area also.



ahhh, you Sneaky Snitzers!!!

okay, this will fix it

replacement code:

Function DoLastPostLink(showicon)
 if len(ForumTopicSubject) > 35 then 
   ForumTopicSubject = left(ForumTopicSubject,35) & "..."
 end if
	if ForumLastPostReplyID <> 0 then
		PageLink = "whichpage=-1&"
		AnchorLink = "&REPLY_ID="
		DoLastPostLink = "<a href=""topic.asp?" & PageLink & "TOPIC_ID=" & ForumLastPostTopicID & AnchorLink & ForumLastPostReplyID & """>"
		if (showicon = true) then DoLastPostLink = DoLastPostLink & getCurrentIcon(strIconLastpost,"Jump to Last Post","align=""middle""") & " <font color='orange'>" &  ForumTopicSubject & "</font></a><br>"
	elseif ForumLastPostTopicID <> 0 then
		DoLastPostLink = "<a href=""topic.asp?TOPIC_ID=" & ForumLastPostTopicID & """>"
		if (showicon = true) then DoLastPostLink = DoLastPostLink & getCurrentIcon(strIconLastpost,"Jump to Last Post","align=""middle""") & " <font color='orange'>" &  ForumTopicSubject & "</font></a><br>"
	else
		DoLastPostLink = ""
	end if
end function



then find this line:

if strJumpLastPost = "1" then strLastUser = strLastUser & "&nbsp;" & DoLastPostLink(true)


and change it to this:

if strJumpLastPost = "1" then strLastUser = strLastUser & "&nbsp;<br />" & DoLastPostLink(true)


Edited by - dayve on 14 March 2003 23:58:53
Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 14 March 2003 :  22:51:47  Show Profile
sneaky, yes, but it does reduce the hits to the database by doing it that way...
Go to Top of Page

PeeWee.Inc
Senior Member

United Kingdom
1893 Posts

Posted - 15 March 2003 :  04:40:47  Show Profile  Visit PeeWee.Inc's Homepage
It's fixed it on your forum dayve so, thats a good sign

De Priofundus Calmo Ad Te Damine
Go to Top of Page

wii
Free ASP Hosts Moderator

Denmark
2632 Posts

Posted - 15 March 2003 :  06:28:35  Show Profile
Yeah, just one thing:

<font color='orange'>

how do I change it to default link color?
Go to Top of Page

PeeWee.Inc
Senior Member

United Kingdom
1893 Posts

Posted - 15 March 2003 :  06:36:37  Show Profile  Visit PeeWee.Inc's Homepage
Use strLinkColor

Response.Write "<font color=""" & strLinkColor & """>" & vbNewline & _


De Priofundus Calmo Ad Te Damine

Edited by - PeeWee.Inc on 15 March 2003 06:47:23
Go to Top of Page

wii
Free ASP Hosts Moderator

Denmark
2632 Posts

Posted - 15 March 2003 :  06:49:17  Show Profile
Hmm, that will mess it up, how should the line look exactly?
Go to Top of Page

PeeWee.Inc
Senior Member

United Kingdom
1893 Posts

Posted - 15 March 2003 :  06:52:42  Show Profile  Visit PeeWee.Inc's Homepage
I am not sure where the code is you are looking to edit.
Can you post the code? (about 20 lines of code that are around it)

De Priofundus Calmo Ad Te Damine
Go to Top of Page

wii
Free ASP Hosts Moderator

Denmark
2632 Posts

Posted - 15 March 2003 :  06:55:46  Show Profile
Function DoLastPostLink(showicon)
if len(ForumTopicSubject) > 35 then
ForumTopicSubject = left(ForumTopicSubject,35) & "..."
end if
if ForumLastPostReplyID <> 0 then
PageLink = "whichpage=-1&"
AnchorLink = "&REPLY_ID="
DoLastPostLink = "<a href=""topic.asp?" & PageLink & "TOPIC_ID=" & ForumLastPostTopicID & AnchorLink & ForumLastPostReplyID & """>"
if (showicon = true) then DoLastPostLink = DoLastPostLink & getCurrentIcon(strIconLastpost,"Jump to Last Post","align=""middle""") & " <font color='orange'>" & ForumTopicSubject & "</font></a><br>"
elseif ForumLastPostTopicID <> 0 then
DoLastPostLink = "<a href=""topic.asp?TOPIC_ID=" & ForumLastPostTopicID & """>"
if (showicon = true) then DoLastPostLink = DoLastPostLink & getCurrentIcon(strIconLastpost,"Jump to Last Post","align=""middle""") & " <font color='orange'>" & ForumTopicSubject & "</font></a><br>"
else
DoLastPostLink = ""
end if
end function
Go to Top of Page

PeeWee.Inc
Senior Member

United Kingdom
1893 Posts

Posted - 15 March 2003 :  06:59:25  Show Profile  Visit PeeWee.Inc's Homepage
Function DoLastPostLink(showicon)
if len(ForumTopicSubject) > 35 then 
ForumTopicSubject = left(ForumTopicSubject,35) & "..."
end if
if ForumLastPostReplyID <> 0 then
PageLink = "whichpage=-1&"
AnchorLink = "&REPLY_ID="
DoLastPostLink = "<a href=""topic.asp?" & PageLink & "TOPIC_ID=" & ForumLastPostTopicID & AnchorLink & ForumLastPostReplyID & """>"
if (showicon = true) then DoLastPostLink = DoLastPostLink & getCurrentIcon(strIconLastpost,"Jump to Last Post","align=""middle""") & " <font color=""" & strLinkColor & """>" & ForumTopicSubject & "</font></a><br>"
elseif ForumLastPostTopicID <> 0 then
DoLastPostLink = "<a href=""topic.asp?TOPIC_ID=" & ForumLastPostTopicID & """>"
if (showicon = true) then DoLastPostLink = DoLastPostLink & getCurrentIcon(strIconLastpost,"Jump to Last Post","align=""middle""") & " <font color=""" & strLinkColor & """>" & ForumTopicSubject & "</font></a><br>"
else
DoLastPostLink = ""
end if
end function


It should work.

De Priofundus Calmo Ad Te Damine

Edited by - PeeWee.Inc on 15 March 2003 07:06:18
Go to Top of Page

wii
Free ASP Hosts Moderator

Denmark
2632 Posts

Posted - 15 March 2003 :  07:04:11  Show Profile
Thanks...
Go to Top of Page
Page: of 4 Previous Topic Topic Next Topic  
Previous Page | Next Page
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 2.9 seconds. Powered By: Snitz Forums 2000 Version 3.4.07