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)
 Show Forum Tree in default.asp?CAT_ID=xx
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

gelliott
Junior Member

USA
268 Posts

Posted - 09 July 2003 :  12:56:02  Show Profile
After searching to no avail - Has anyone ever worked up the changes to default.asp to show the forum tree in the upper left instead of the select categories dropdown (if enabled)? I like the tree that shows in the post, topic, and search pages, and would like it to show in the default.asp page when it's displaying only one category (to provide a link back to the "all categories" view. I realize that clicking on the logo does this, but most users may not figure this out. I'm just trying to make it more intuitive...

* The optimist says the cup is half full. The pessimist says it's half empty. But the engineer knows the truth - the cup's design is incorrectly sized.

gelliott
Junior Member

USA
268 Posts

Posted - 09 July 2003 :  21:53:54  Show Profile
OK, since there were no immediate suggestions, I wrote it myself.
For anyone else who wants it, find the following code around line
250 in default.asp:
if Cat_ID <> "" then
	Cat_Name = allCategoryData(2,0)
	Response.Write	"      <script language=""javascript"" type=""text/javascript"">" & vbNewLine & _
			"      document.title='" & chkString(Cat_Name,"pagetitle") & " - " & chkString(strForumTitle,"pagetitle") & "';" & vbNewLine & _
			"      </script>" & vbNewLine

After this code, insert the following:
' ######  BEGIN Greg's Add Forum Tree to default.asp?CAT_ID=xx
		Response.Write	"      <table border=""0"" width=""100%"" align=""center"">" & vbNewline & _
				"        <tr>" & vbNewline & _
				"          <td width=""33%"" align=""left"" nowrap><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>" & vbNewLine & _
				"          " & getCurrentIcon(strIconFolderOpen,"","align=""absmiddle""") & " <a href=""default.asp"">All Forums</a><br />" & vbNewline
		Response.Write	"          " & getCurrentIcon(strIconBar,"","align=""absmiddle""") & getCurrentIcon(strIconFolderOpen,"","align=""absmiddle""") & " <a href=""default.asp?CAT_ID=" & Cat_ID & """>" & chkString(Cat_Name,"pagetitle") & "</a><br />" & vbNewLine
		Response.Write	"</font><BR></td>" & vbNewline & _
				"        </tr>" & vbNewline
		Response.Write	"      </table>" & vbNewLine
' ######  END Greg's Add Forum Tree to default.asp?CAT_ID=xx


* The optimist says the cup is half full. The pessimist says it's half empty. But the engineer knows the truth - the cup's design is incorrectly sized.
Go to Top of Page

jeffery
Junior Member

USA
176 Posts

Posted - 09 July 2003 :  22:03:38  Show Profile
I like it. Good job!

www.thomasforum.com
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.23 seconds. Powered By: Snitz Forums 2000 Version 3.4.07