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)
 Attn: dayve (burning souls forum)
 New Topic  Topic Locked
 Printer Friendly
Next Page
Author Previous Topic Topic Next Topic
Page: of 2

xx ENIGMA xx
Junior Member

166 Posts

Posted - 05 December 2003 :  15:39:11  Show Profile  Send xx ENIGMA xx an AOL message
I dont know really where this should be placed but
I know I saw it here somewhere but cannot find it now
after much looking.

I would like to do a mod on my forum like yours under
the moderator column (+ click to view - click to close) etc.

can someone help me out where I can get the code for this?

thanks for any help...


<<moved to correct forum>>


my little forum playground


Edited by - Nikkol on 05 December 2003 15:43:23

snaayk
Senior Member

USA
1061 Posts

Posted - 05 December 2003 :  16:03:57  Show Profile  Visit snaayk's Homepage  Send snaayk an AOL message  Send snaayk an ICQ Message  Send snaayk a Yahoo! Message
Check out this post: http://forum.snitz.com/forum/topic.asp?TOPIC_ID=49067
Go to Top of Page

weeweeslap
Senior Member

USA
1077 Posts

Posted - 05 December 2003 :  16:10:31  Show Profile  Visit weeweeslap's Homepage  Send weeweeslap an AOL message  Send weeweeslap a Yahoo! Message
noo go here
http://forum.snitz.com/forum/topic.asp?TOPIC_ID=49487

coaster crazy
Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts

Posted - 05 December 2003 :  16:49:19  Show Profile  Visit dayve's Homepage
well then, that takes care of that

Go to Top of Page

xx ENIGMA xx
Junior Member

166 Posts

Posted - 05 December 2003 :  17:55:18  Show Profile  Send xx ENIGMA xx an AOL message
thank you thank you

my post got moved so I was sweating where it was moved to


my little forum playground


Edited by - xx ENIGMA xx on 05 December 2003 17:55:50
Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts

Posted - 05 December 2003 :  18:05:55  Show Profile  Visit dayve's Homepage
anytime you can't find one of your recent posts, go look at your profile and find the link in the recent links area.

Go to Top of Page

xx ENIGMA xx
Junior Member

166 Posts

Posted - 05 December 2003 :  18:09:22  Show Profile  Send xx ENIGMA xx an AOL message
good tip!

I'll keep that in mind

btw, great mod and some of your others are quite nice as well


my little forum playground

Go to Top of Page

xx ENIGMA xx
Junior Member

166 Posts

Posted - 05 December 2003 :  18:29:38  Show Profile  Send xx ENIGMA xx an AOL message
I seem to get errors with default.asp so I must be missing something
and I am guessing its this section?

can you explain exactly how this:
%>
		<!-- Drop Down Menu Container -->
		<DIV>
		 <DIV>
		  <TABLE class="ListNuggetHeader" cellSpacing="0" cellPadding="0" border="0" width="100%" id="menu<%=ForumID%>Header" name="menu<%=ForumID%>Header">
		   <TR>
			<TD onclick="ShowHide('menu<%=ForumID%>');" nowrap>
			<DIV>
	        <IMG  id='menu<%=ForumID%>Up' class='ListNuggetUpButton' src='images/icon_minus.gif' align='left' vspace='2' hspace='0' border='0' name='menu<%=ForumID%>Up'>
	        <IMG  id='menu<%=ForumID%>Down' src='images/icon_plus.gif' align='left' vspace='2' hspace='0' border='0' name='menu<%=ForumID%>Down'>		    
	       </DIV>
		   <font size="<%=strFooterFontSize%>" color="white">
             <strong>click to view</strong> 
	       </font>	
			</TD>
		   </TR>
		   <TR>
			<TD>
			<DIV class=ListNuggetBody style="display:none;" id="menu<%=ForumID%>Body" name="menu<%=ForumID%>Body">
			  <DIV>
			   <TABLE class="ListNuggetBody" cellSpacing="0" cellPadding="0" border="0">
				<TR>
				 <TD>
				 <font size="<%=strFooterFontSize%>" color="white">
			     <%= listForumModerators(ForumID) %>
				 </font>
				 </DIV>
				</DIV>
			   </TD>
			  </TR>
			 </TABLE>	
			</TD>
		   </TR>
		  </TABLE>		
		 </DIV>
	    <!-- Drop Down Menu Container -->
		<%


goes into my line in default.asp as I pasted it right where the red
is below and got my errors.
Response.Write	"                <td bgcolor=""" & strForumCellColor & """ align=""left"" valign=""top""><font face=""" & strDefaultFontFace & """ color=""" & strForumFontColor & """ size=""" & strFooterFontSize & """><span class=""spnMessageText"">" & listForumModerators(ForumID) & "</span></font></td>" & vbNewline


thanks for any help



my little forum playground

Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts

Posted - 05 December 2003 :  18:45:43  Show Profile  Visit dayve's Homepage
it should look like this:


		Response.Write "<font face=""" & strDefaultFontFace & """ color=""" & strForumFontColor & """ size=""" & strFooterFontSize & """><span class=""spnMessageText"">" 
	    %>
		<!-- Drop Down Menu Container -->
		<DIV>
		 <DIV>
		  <TABLE class="ListNuggetHeader" cellSpacing="0" cellPadding="0" border="0" width="100%" id="menu<%=ForumID%>Header" name="menu<%=ForumID%>Header">
		   <TR>
			<TD onclick="ShowHide('menu<%=ForumID%>');" nowrap>
			<DIV>
	        <IMG  id='menu<%=ForumID%>Up' class='ListNuggetUpButton' src='images/icon_minus.gif' align='left' vspace='2' hspace='0' border='0' name='menu<%=ForumID%>Up'>
	        <IMG  id='menu<%=ForumID%>Down' src='images/icon_plus.gif' align='left' vspace='2' hspace='0' border='0' name='menu<%=ForumID%>Down'>		    
	       </DIV>
		   <font size="<%=strFooterFontSize%>" color="white">
             <strong>click to view</strong> 
	       </font>	
			</TD>
		   </TR>
		   <TR>
			<TD>
			<DIV class=ListNuggetBody style="display:none;" id="menu<%=ForumID%>Body" name="menu<%=ForumID%>Body">
			  <DIV>
			   <TABLE class="ListNuggetBody" cellSpacing="0" cellPadding="0" border="0">
				<TR>
				 <TD>
				 <font size="<%=strFooterFontSize%>" color="white">
			     <%= listForumModerators(ForumID) %>
				 </font>
				 </DIV>
				</DIV>
			   </TD>
			  </TR>
			 </TABLE>	
			</TD>
		   </TR>
		  </TABLE>		
		 </DIV>
	    <!-- Drop Down Menu Container -->
		<%
		'listForumModerators(ForumID) & 
		Response.Write "</span></font></td>" & vbNewline


Here is a direct link to my source code:

http://www.burningsoulsforum.com/display_source.asp?page=default.asp

Go to Top of Page

xx ENIGMA xx
Junior Member

166 Posts

Posted - 05 December 2003 :  19:11:48  Show Profile  Send xx ENIGMA xx an AOL message
thanks, will try this and sorry I had such a hard
time following your original directions

EDIT: worked perfect, thanks for the help and mod


my little forum playground


Edited by - xx ENIGMA xx on 05 December 2003 19:29:14
Go to Top of Page

vmplanet
Junior Member

112 Posts

Posted - 07 December 2003 :  17:03:05  Show Profile
I get the same thing as Enigma did. But i can't get it fixed. Can someone give really clear instruction on how to install this little mod plz...

So even i can understand?
Go to Top of Page

xx ENIGMA xx
Junior Member

166 Posts

Posted - 07 December 2003 :  17:12:43  Show Profile  Send xx ENIGMA xx an AOL message
I may can help you.....

what error is it giving you?


my little forum playground

Go to Top of Page

xx ENIGMA xx
Junior Member

166 Posts

Posted - 07 December 2003 :  17:37:25  Show Profile  Send xx ENIGMA xx an AOL message
this might be of some help, of course make sure you make
a backup copy of default.asp in case install fails?

I took an un-modded default.asp for reference to maybe help you
compared to my modded version.

in your default.asp, line 544-563 approx. find this section of code just above the line:
if strShowStatistics = "1" then


							if (strShowModerators = "1") or (mlev = 4 or mlev = 3) then 
								Response.Write	"                <td bgcolor=""" & strForumCellColor & """ align=""left"" valign=""top""><font face=""" & strDefaultFontFace & """ color=""" & strForumFontColor & """ size=""" & strFooterFontSize & """><span class=""spnMessageText"">" & listForumModerators(ForumID) & "</span></font></td>" & vbNewline
							end if 
							Response.Write	"                <td bgcolor=""" & strForumCellColor & """ align=""center"" valign=""top"" nowrap>"
							if ModerateAllowed = "Y" or (lcase(strNoCookies) = "1") then 
								call ForumAdminOptions
							else
								call ForumMemberOptions
							end if
							Response.Write	"</td>" & vbNewline
							Response.Write	"              </tr>" & vbNewline
						end if ' ##### Added as part of Minimize Category Mod #####					
					else
						blnHiddenForums = true
					end if ' ChkDisplayForum() 
				end if
			next '## Next Forum
		end if
	next '## Next Category
end if


replace all the above with:

							if (strShowModerators = "1") or (mlev = 4 or mlev = 3) then 
								Response.Write	"                <td bgcolor=""" & strForumCellColor & """ align=""left"" valign=""top""><font face=""" & strDefaultFontFace & """ color=""" & strForumFontColor & """ size=""" & strFooterFontSize & """><span class=""spnMessageText""> " 
	    %>
		<!-- Drop Down Menu Container -->
		<DIV>
		 <DIV>
		  <TABLE class="ListNuggetHeader" cellSpacing="0" cellPadding="0" border="0" width="100%" id="menu<%=ForumID%>Header" name="menu<%=ForumID%>Header">
		   <TR>
			<TD onclick="ShowHide('menu<%=ForumID%>');" nowrap>
			<DIV>
	        <IMG  id='menu<%=ForumID%>Up' class='ListNuggetUpButton' src='mod_minus.gif' align='left' vspace='2' hspace='0' border='1' width='10' height='10' name='menu<%=ForumID%>Up'>
	        <IMG  id='menu<%=ForumID%>Down' src='mod_plus.gif' align='left' vspace='2' hspace='0' border='1' width='10' height='10' name='menu<%=ForumID%>Down'>		    
	       </DIV>
		   <font size="<%=strFooterFontSize%>" color="white">
              <strong>click to view</strong> 
	       </font>	
			</TD>
		   </TR>
		   <TR>
			<TD>
			<DIV class=ListNuggetBody style="display:none;" id="menu<%=ForumID%>Body" name="menu<%=ForumID%>Body">
			  <DIV>
			   <TABLE class="ListNuggetBody" cellSpacing="0" cellPadding="0" border="0">
				<TR>
				 <TD>
				 <font size="<%=strFooterFontSize%>" color="white">
			     <%= listForumModerators(ForumID) %>
				 </font>
				 </DIV>
				</DIV>
			   </TD>
			  </TR>
			 </TABLE>	
			</TD>
		   </TR>
		  </TABLE>		
		 </DIV>
	    <!-- Drop Down Menu Container -->
		<%
		'listForumModerators(ForumID) & 
		Response.Write "</span></font></td>" & vbNewline
							end if 
							Response.Write	"                <td bgcolor=""" & strForumCellColor & """ align=""center"" valign=""top"" nowrap>"
							if ModerateAllowed = "Y" or (lcase(strNoCookies) = "1") then 
								call ForumAdminOptions
							else
								call ForumMemberOptions
							end if
							Response.Write	"</td>" & vbNewline
							Response.Write	"              </tr>" & vbNewline
						end if ' ##### Added as part of Minimize Category Mod #####					
					else
						blnHiddenForums = true
					end if ' ChkDisplayForum() 
				end if
			next '## Next Forum
		end if
	next '## Next Category
end if


being as I had a hard time understanding just how to replace the
listForumModerators(ForumID) part, this should fix you up

P.S. you will need to grab the 2 images + & -
note: I added width/height tags to the above so if you ever
get a broken image, it wont make the tables all whacky


my little forum playground


Edited by - xx ENIGMA xx on 07 December 2003 17:42:07
Go to Top of Page

snaayk
Senior Member

USA
1061 Posts

Posted - 08 December 2003 :  11:07:39  Show Profile  Visit snaayk's Homepage  Send snaayk an AOL message  Send snaayk an ICQ Message  Send snaayk a Yahoo! Message
quote:
Originally posted by dayve
..... Here is a direct link to my source code:

http://www.burningsoulsforum.com/display_source.asp?page=default.asp


Dayve, what kind of script is that? I noticed you can view any page.
Go to Top of Page

xx ENIGMA xx
Junior Member

166 Posts

Posted - 08 December 2003 :  11:55:05  Show Profile  Send xx ENIGMA xx an AOL message
quote:
Originally posted by snaayk

quote:
Originally posted by dayve
..... Here is a direct link to my source code:

http://www.burningsoulsforum.com/display_source.asp?page=default.asp


Dayve, what kind of script is that? I noticed you can view any page.



yeah, everyone that does mods would probably benefit from having that display_source.asp

would save alot of code posting in posts here


my little forum playground

Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts

Posted - 08 December 2003 :  21:40:46  Show Profile  Visit dayve's Homepage
quote:
Originally posted by snaayk

quote:
Originally posted by dayve
..... Here is a direct link to my source code:

http://www.burningsoulsforum.com/display_source.asp?page=default.asp


Dayve, what kind of script is that? I noticed you can view any page.



not ANY page , but yeah, most of the pages. it just uses the FSO to read the entire document and then spits it out on a simple web page in pre-formatted text view. here is the source code if you want:

http://www.burningsoulsforum.com/display_source.asp?page=display_source.asp

it's pretty old and could use some updating, but it works for my purposes.

Go to Top of Page
Page: of 2 Previous Topic Topic Next Topic  
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 0.41 seconds. Powered By: Snitz Forums 2000 Version 3.4.07