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)
 Displaying Additional Member Info in the Author Bo		  New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

o324712
Starting Member

USA
5 Posts
Posted - 22 July 2002 :  23:02:23  Show Profile
I am wanting to add the member's city and state to the author's box of a posted topic. I've searched and have not found anything yet. If anyone has done this type of thing could you please provide me with the appropriate locations to mod.

Thanks,
Rich

Roland
Advanced Member

Netherlands
9335 Posts
Posted - 22 July 2002 :  23:12:22  Show Profile
I haven't tested this, but it's an adaptation of the codes I used to add "member since" to that same box.
Please make a backup of your topic.asp before you make these changes!

Open topic.asp and go to line 113:

	strMemberTablePrefix & "MEMBERS.M_COUNTRY, " & _


Add this line right below it:

	strMemberTablePrefix & "MEMBERS.M_CITY, " & _
	strMemberTablePrefix & "MEMBERS.M_STATE, " & _


Go to line 209:

	strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.M_NAME, " & _


Add this line right below it:

		strMemberTablePrefix & "MEMBERS.M_CITY, " & _
		strMemberTablePrefix & "MEMBERS.M_STATE, " & _


Go to lines 387 t0 389:

        <br><% = getStar_Level(rsReplies("M_LEVEL"), rsReplies("M_POSTS")) %>
<%			end if %>
        <br>


Add these 3 lines right below line 398:

        <br>
        <font face="<% =strDefaultFontFace %>" size="<% =strFooterFontSize %>" color="<% =strForumFontColor %>">
<% if (rsReplies("M_CITY") <> "") then %><% =rsReplies("M_CITY") %>,<% end if %>
<% if (rsReplies("M_STATE") <> "") then %><% =rsReplies("M_STATE") %><% end if %></font><br>
        <br>


Go to lines 537 to 540:

<%		if strShowRank = 2 or strShowRank = 3 then %>
        <br><% = getStar_Level(rsTopic("M_LEVEL"), rsTopic("M_POSTS")) %>
<%		end if %>
        <br>


Add these lines right below line 540:

        <br>
        <font face="<% =strDefaultFontFace %>" size="<% =strFooterFontSize %>" color="<% =strForumFontColor %>">
<% if (rsReplies("M_CITY") <> "") then %><% =rsReplies("M_CITY") %>,<% end if %>
<% if (rsReplies("M_STATE") <> "") then %><% =rsReplies("M_STATE") %><% end if %></font><br>
        <br>

========================================================

It should work, but as I haven't tested it, I'm not 100% sure.

Roland

http://www.frutzle.com

Snitz Exchange | Snitz Icons | Do's and Dont's

Edited by - FrutZle on 22 July 2002 23:13:01
Go to Top of Page

b4rm4n
New Member

73 Posts
Posted - 25 July 2002 :  09:14:14  Show Profile
BTW that does work..... Thanks for the code.
Go to Top of Page

b4rm4n
New Member

73 Posts
Posted - 25 July 2002 :  09:24:27  Show Profile
maybe I spoke too soon. I get a error message on some of the topics, but not all of them.

error '80020009'
Exception occurred.

/forum/topic.asp, line 535

This is what I get.

<% if maxpages > 1 then %>
<table border=0>
<tr>
<td valign="top"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><b>Topic is <% =maxpages %> Pages Long: </font></td>
<td valign="top"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><% Call Paging() %></font></td>
</tr>
</table>
<-line 535-><% else %>
<td valign="top"> </td>
<% end if %>
</td>
<td align="right" nowrap>
<% if (AdminAllowed = 1) then %>
<% call AdminOptions() %>
<% else %>
 
<% end if %>
Go to Top of Page

Roland
Advanced Member

Netherlands
9335 Posts
Posted - 25 July 2002 :  17:00:56  Show Profile
Upload a .TXT version of your topic.asp and post the URL to it here. Do NOT post your topic.asp on these forums, all I need is a link to a TXT version.

Roland

http://www.frutzle.com

Snitz Exchange | Snitz Icons | Do's and Dont's
Go to Top of Page

b4rm4n
New Member

73 Posts
Posted - 29 July 2002 :  10:41:17  Show Profile
I got it to work... Thanks FrutZle
Go to Top of Page

Roland
Advanced Member

Netherlands
9335 Posts
Posted - 29 July 2002 :  16:28:10  Show Profile
Did I have an error in my codes, or did you make a mistake copying them? I'd like to know so if I tell someone to look here in the future, (s)he won't get the same problem(s) as you

Roland

http://www.frutzle.com

Snitz Exchange | Snitz Icons | Do's and Dont's
Go to Top of Page
  Previous Topic Topic Next Topic  
 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 0.25 seconds. Powered By: Snitz Forums 2000 Version 3.4.07