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)
 post change
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

philsbbs
Junior Member

United Kingdom
397 Posts

Posted - 27 December 2003 :  16:50:54  Show Profile
Hi,

I want to add a extra field in :-

philsbbs
Junior Member

XXXXXXXXXXX <---- what to show M_LNEWS (it will only be one line
as ive changed the register and profiles.
United Kingdom
144 Posts

How can I get M_LNEWS to appear at the side of posts.

Phil

laser
Advanced Member

Australia
3859 Posts

Posted - 27 December 2003 :  17:55:47  Show Profile
on the left side with the other info ?

Look thru topic.asp, you'll need to change the SQL code (possibly), then add the field to display in the location you want (let me know where you want and I can help)
Go to Top of Page

philsbbs
Junior Member

United Kingdom
397 Posts

Posted - 27 December 2003 :  18:08:42  Show Profile
Theres over 1000 lines of code and im not running any mods.

Could you please help pin point for me.

Phil
Go to Top of Page

laser
Advanced Member

Australia
3859 Posts

Posted - 27 December 2003 :  18:40:20  Show Profile
quote:
Originally posted by philsbbs

Theres over 1000 lines of code and im not running any mods.

Could you please help pin point for me.


My topic.asp has 1200+ lines, but there are quite a few mods in there. OK, follow the steps :

Step 1.

Find :


	strSql = strSql & ", R.R_LAST_EDITBY, R.R_SIG, R.R_STATUS, R.R_DATE, M.M_DATE"
	if CanShowSignature = 1 then
		strSql = strSql & ", M.M_SIG"
	end if


and change to :


	strSql = strSql & ", R.R_LAST_EDITBY, R.R_SIG, R.R_STATUS, R.R_DATE, M.M_DATE"
	if CanShowSignature = 1 then
		strSql = strSql & ", M.M_SIG"
	end if


Step 2 :

Find :


		rR_STATUS = 22
		rR_DATE = 23
		rM_MDATE = 24
		if CanShowSignature = 1 then
			rM_SIG = 25
		end if


and change to (WATCH THE NUMBERS !!!!!) :


		rR_STATUS = 22
		rR_DATE = 23
		rM_MDATE = 24
		rM_LNEWS = 25
		if CanShowSignature = 1 then
			rM_SIG = 26
		end if


Step 3 :

Find :


			if CanShowSignature = 1 then
				Reply_MemberSig = trim(arrReplyData(rM_SIG, iForum))
			end if


and change to :


			if CanShowSignature = 1 then
				Reply_MemberSig = trim(arrReplyData(rM_SIG, iForum))
			end if
			Reply_LNews = arrReplyData(rM_LNEWS, iForum)


Step 4 (bit different here .... ) :

Find :


			if strCountry = "1" and trim(Reply_MemberCountry) <> "" then


3 lines down should be a Response.Write, mine looks like :


			Response.Write	"                <font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><small>" & Reply_MemberPosts & " Posts<br><nobr>joined " & Replace(Replace(ChkDate(Join_Date, " : " ,false), " 20", " "), " "," ") & "</nobr><br>" & Reply_LNews & "</small></font></p></td>" & vbNewLine & _


You only need the red bit.

Do that bit, I'm just working on getting the first post to do the same
Go to Top of Page

laser
Advanced Member

Australia
3859 Posts

Posted - 27 December 2003 :  18:49:21  Show Profile
ah ! ..easy ...

Step 5 :

Find :


	", F.F_STATUS, F.FORUM_ID, F.F_SUBSCRIPTION, F.F_SUBJECT, F.F_MODERATION, T.T_MESSAGE"


Change to :


	", F.F_STATUS, F.FORUM_ID, F.F_SUBSCRIPTION, F.F_SUBJECT, F.F_MODERATION, T.T_MESSAGE, M.M_LNEWS"


Step 6 :

Find :


	Topic_Message = rsTopic("T_MESSAGE")


After that line ADD :


	Member_LNews = rsTopic("M_LNEWS")


Step 7 (same as Step 4) :

Find :


if strCountry = "1" and trim(Member_Country) <> "" then


3 lines below, change as desired.

Demo URL :

http://www.v8central.com/snitz3403/topic5.asp?TOPIC_ID=5084
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.27 seconds. Powered By: Snitz Forums 2000 Version 3.4.07