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

 All Forums
 Help Groups for Snitz Forums 2000 Users
 Help: MOD Implementation
 Subforums MOD - Help required		  New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

DarrenLuxton
Junior Member

184 Posts
Posted - 23 December 2008 :  15:35:50  Show Profile
All

I've recently tried to install the SubForums mod, as downloaded here

http://www.snitzbitz.com/mods/details.asp?Version=All&mid=224

Only problem is, the changed to Post_info.asp aren't clear, especially when you have multiple mods installed, i was wondering if i could get any help on this please ?

heres a link to my current post_info.asp
http://www.shadowknights.com/forum/post_info.txt

Any help is much appreciated.

Thanks in advance<

AnonJr
Moderator

United States
5768 Posts
Posted - 23 December 2008 :  15:53:59  Show Profile  Visit AnonJr's Homepage
Which other MODs have you installed?

... its been ages since I last looked at that code, and I've had the best of intentions in getting it out of beta...<
Go to Top of Page

ruirib
Snitz Forums Admin

Portugal
26364 Posts
Posted - 23 December 2008 :  16:19:46  Show Profile  Send ruirib a Yahoo! Message
quote:
Originally posted by AnonJr

Which other MODs have you installed?

... its been ages since I last looked at that code, and I've had the best of intentions in getting it out of beta...

If you want to get it out of beta, I've found a couple isses that I can report, so that they are fixed...

Apart from that, the mod works pretty well.<

Snitz 3.4 Readme | Like the support? Support Snitz too
Go to Top of Page

DarrenLuxton
Junior Member

184 Posts
Posted - 23 December 2008 :  16:42:48  Show Profile
Yeah, i know the mod works well, just i'm finding it rather difficult to read the instructions correctly, example, part of the readme tells you to look for 3 End If's around line 1220 (example) but it doesn't say what should be above that, reason being, i have 3 sections of code with that exact search string. but because i have loads of mods (way too many to mention) i'm unsure exactly which seacrh string it is.<
Go to Top of Page

Carefree
Advanced Member

Philippines
4207 Posts
Posted - 23 December 2008 :  16:55:02  Show Profile
Try this: post_info.txt<
Go to Top of Page

AnonJr
Moderator

United States
5768 Posts
Posted - 23 December 2008 :  20:18:15  Show Profile  Visit AnonJr's Homepage
quote:
Originally posted by ruirib

If you want to get it out of beta, I've found a couple isses that I can report, so that they are fixed...
Post the issues back in the original thread. I know of a couple myself, the biggest thing has been time. Fortunately, I really needed it for a project at work so I had the opportunity to work on it at work and at home which is how it got to where it is. Unfortunately, when it was "good enough" for the project at work I wasn't afforded the time to work on it at work and I haven't had time to work on it at home....<
Go to Top of Page

Carefree
Advanced Member

Philippines
4207 Posts
Posted - 23 December 2008 :  21:58:21  Show Profile
Here, AnonJr. I created a bottom-to-top instruction for post_info.asp; maybe it'll save you some work.

quote:
Starting at the end of Post_Info.asp:
 
	(1) Look for the lines marked O (old) at the line numbers provided.

	(2) Replace them with the lines marked N (new).
1520	
O
		strSql = strSql & " SET CAT_ID = " & cLng("0" & Request.Form("Category"))
N
		'	#### Sub-Forums Mod ####
		strSql = strSql & " SET CAT_ID = " & cLng("0" & intSetCategory)
		'	#### Sub-Forums Mod ####

1516
O
	if Err_Msg = "" then
N
	if Err_Msg = "" then
		'	#### Sub-Forums Mod ####
		'Update parent id
		if isnull(intSetParent) = FALSE then
				strSQL = "UPDATE " & strTablePrefix & "FORUM SET F_PARENT = " & intSetParent & " WHERE FORUM_ID = " & Forum_ID
		else
				strSQL = "UPDATE " & strTablePrefix & "FORUM SET F_PARENT = NULL WHERE FORUM_ID = " & Forum_ID
		end if
		my_Conn.Execute(strSQL)
		'End parent mod code -- JUST MAKE SURE YOU CHANGE THAT request.form variable!
		'	#### Sub-Forums Mod ####


1450
O
			strSql = strSql & " SET CAT_ID = " & cLng("0" & Request.Form("Category"))
N
		'	#### Sub-Forums Mod ####
			strSql = strSql & " SET CAT_ID = " & cLng("0" & intSetCategory)
		'	#### Sub-Forums Mod ####

1442
O
			strSql = strSql & " SET CAT_ID = " & cLng("0" & Request.Form("Category"))
N
		'	#### Sub-Forums Mod ####
			strSql = strSql & " SET CAT_ID = " & cLng("0" & intSetCategory)
		'	#### Sub-Forums Mod ####

1435
O
			strSql = strSql & " SET CAT_ID = " & cLng("0" & Request.Form("Category"))
N
		'	#### Sub-Forums Mod ####
			strSql = strSql & " SET CAT_ID = " & cLng("0" & intSetCategory)
		'	#### Sub-Forums Mod ####

1418
O
			strSQL = strSQL & " WHERE CAT_ID=" & cLng("0" & Request.Form("Category"))
N
		'	#### Sub-Forums Mod ####
			strSql = strSql & " WHERE CAT_ID = " & cLng("0" & intSetCategory)
		'	#### Sub-Forums Mod ####

1390
O
		strSql = strSql & " SET CAT_ID = " & cLng("0" & Request.Form("Category"))
N
		'	#### Sub-Forums Mod ####
		strSql = strSql & " SET CAT_ID = " & cLng("0" & intSetCategory)
		'	#### Sub-Forums Mod ####

1384
O
		bolCatIDChanged = (cSTr(rsCatIDCheck("CAT_ID")) <> ChkString(Request.Form("Category"), "SQLString"))
N
		'	#### Sub-Forums Mod ####
		bolCatIDChanged = (cSTr(rsCatIDCheck("CAT_ID")) <> ChkString(intSetCategory, "SQLString"))
		'	#### Sub-Forums Mod ####

1377
O
	if Err_Msg = "" then
N
	if Err_Msg = "" then
		'	#### Sub-Forums Mod ####
		'Parent Location Stuff MOD
		'## Forum_SQL - Update forum parent and cat_id in db
		'We changed lines from request.form("Category") to intSetCategory
		'Update parent id
		if isnull(intSetParent) = FALSE then
 		 	strSQL = "UPDATE " & strTablePrefix & "FORUM SET F_PARENT = " & intSetParent & " WHERE FORUM_ID = " & Forum_ID
		else
			strSQL = "UPDATE " & strTablePrefix & "FORUM SET F_PARENT = NULL WHERE FORUM_ID = " & Forum_ID
		end if
		my_Conn.Execute(strSQL)
		'End parent mod code -- JUST MAKE SURE YOU CHANGE THAT request.form variable!
		'	#### Sub-Forums Mod ####

1289
O
		strSql = strSql & Cat_ID
N
		'	#### Sub-Forums Mod ####
			strSql = strSql & intSetCategory
		if isnull(intSetParent) = FALSE then
			strSql = strSql & ", " & intSetParent
		end if
		'	#### Sub-Forums Mod ####

1270
O
		strSql = strSql & "(CAT_ID"
N
		strSql = strSql & "(CAT_ID"
		'	#### Sub-Forums Mod ####
		if isnull(intSetParent) = FALSE then
				strSql = strSql & ", " & intSetParent
		end if
		'	#### Sub-Forums Mod ####

1168
O
		strSql = strSql & Cat_ID
N
		'	#### Sub-Forums Mod ####
		strSql = strSql & intSetCategory
		if isnull(intSetParent) = FALSE then
				strSql = strSql & ", " & intSetParent
		end if
		'	#### Sub-Forums Mod ####

1146
O
		strSql = strSql & "(CAT_ID"
N
		strSql = strSql & "(CAT_ID"
		'	#### Sub-Forums Mod ####
		if isnull(intSetParent) = FALSE then
				strSql = strSql & ", F_PARENT"
		end if
		'	#### Sub-Forums Mod ####

1108-1110
O
		end if
	end if
end if
N
		end if
	end if
end if
'	#### Sub-Forums Mod ####
'Parent Location Stuff MOD
strParent = replace(request.form("Parent"), "'", "''")
if strParent <> "" then
		strParentType = left(strParent, 1)
		strParentValue = right(strParent, len(strParent) - 1)
end if
if strParentType = "F" then
		'## Forum_SQL - Find the CAT_ID if forum is now a subforum
		strSQL = "SELECT CAT_ID FROM " & strTablePrefix & "FORUM WHERE FORUM_ID = " & strParentValue & ";"
		set rsFindCat = my_Conn.Execute(strSQL)
		if not rsFindCat.eof then
				intCategoryValue = rsFindCat("CAT_ID")
		end if
		set rsFindCat = Nothing
		intSetParent = strParentValue
		intSetCategory = intCategoryValue
else
		intSetParent = NULL
		intSetCategory = strParentValue
end if
'End parent location stuff mod - Change variables below for adding a forum
'	#### Sub-Forums Mod ####
<
Edited by - Carefree on 23 December 2008 22:00:22
Go to Top of Page

AnonJr
Moderator

United States
5768 Posts
Posted - 23 December 2008 :  22:09:28  Show Profile  Visit AnonJr's Homepage
Do me a big favor and like I asked rui, post it in that MOD's topic. I've got 10 different projects going on right now, but when I get the time to work on it I'm going to run through that topic for all the fixes plus those things I know need to be fixed. By leaving your work here I may miss it - and I'd rather not miss any help I can get. <
Go to Top of Page

DarrenLuxton
Junior Member

184 Posts
Posted - 24 December 2008 :  06:23:15  Show Profile
Much appreciated for your help with this one, Carefree, your post info file was invaluable, it allowed me to cross reference the specific modifications for this mod.

Once again, thanks to all<
Go to Top of Page

Carefree
Advanced Member

Philippines
4207 Posts
Posted - 24 December 2008 :  08:14:02  Show Profile
You're welcome.<
Go to Top of Page

Andy Humm
Average Member

United Kingdom
908 Posts
Posted - 28 December 2008 :  05:17:58  Show Profile
Are there any live demos of the mod in operation please
Happy New Year.<
Go to Top of Page

AnonJr
Moderator

United States
5768 Posts
Posted - 28 December 2008 :  11:37:04  Show Profile  Visit AnonJr's Homepage
I used to have it up on one of my forums, but too many people were confused about how it worked so I consolidated the number of forums. I'm probably going to further prune it down when I do the next upgrade.<
Go to Top of Page

Classicmotorcycling
Development Team Leader

Australia
2084 Posts
Posted - 29 December 2008 :  01:47:56  Show Profile
It is at Darren's site at: http://www.shadowknights.com/forum/forum.asp?forum_id=31
quote:
Originally posted by Andy Humm

Are there any live demos of the mod in operation please
Happy New Year.
I also have it working on a site I have at: http://www.anz-banking.com/forums/
<
Cheers,

David Greening
Go to Top of Page

Andy Humm
Average Member

United Kingdom
908 Posts
Posted - 29 December 2008 :  05:38:06  Show Profile
Thanks David, I'll have a good butchers..<
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.57 seconds. Powered By: Snitz Forums 2000 Version 3.4.07