Snitz Forums 2000 - Directory Tree placement

Snitz Forums 2000

Username:	Password:
Save Password
Forgot your Password?

All Forums

Snitz Forums 2000 MOD-Group

MOD Add-On Forum (W/O Code)

Directory Tree placement

New Topic

Reply to Topic

Printer Friendly

Author

Topic

Andy Humm
Average Member

United Kingdom
908 Posts

Posted - 09 July 2008 : 12:12:33

I am in the process of altering my Email all members mod, and have removed the pop-up notion. The file works okay but I am trying to add a directory tree at the top of the input form/table and can not see where to insert the code.

I believe this could be some code for the tree
Response.Write "<p><font face=" & strDefaultFontFace & " size=" & strDefaultFontSize & ">" & _
getCurrentIcon(strIconFolderOpen,"","align=""absmiddle""") & " <a href=""default.asp"">" & "All Forums</a><br />" & _
getCurrentIcon(strIconBar,"","align=""absmiddle""") & getCurrentIcon(strIconFolder,"","align=""absmiddle""") & " <a href=""admin_pop_mail.asp"">" & "Email All Members" & _
"</a></font></p>"

The revised admin_pop_mail file is here (txt)
Thank you andy<

Edited by - Andy Humm on 09 July 2008 12:15:32

MaD2ko0l
Senior Member

United Kingdom
1053 Posts

Posted - 09 July 2008 : 12:46:11

this is straight from pm_view.asp, it is in its own table so its a good place to start.

	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 & _
			"    " & getCurrentIcon(strIconBar,"","") & getCurrentIcon(strIconFolderOpen,"","align=""absmiddle""") & " <a href=""pm_view.asp"">Private Messages</a></font></td>" & vbNewLine & _
			"  </tr>" & vbNewLine & _
			"</table>" & vbNewLine

as for placement, i woudl put it around here.

find line

			"      <table border=""0"" width=""100%"" cellspacing=""0"" cellpadding=""0"">" & vbNewLine & _

and then add the pm_view directory tree above the <table> tag

touch wood, it will be placed more or less where u want to to go...however i havent tryed it and i have onyl had a quick look at your txt file.

post a pic of the result if its not what you want<

Andy Humm
Average Member

United Kingdom
908 Posts

Posted - 09 July 2008 : 13:28:24

Great starter for ten!
I have resolved the tree, find the else line 190 just before
Response.write " <form action=""admin_pop_mail.asp"" method=""Post"" id=""Form1""
amend to read:

else 
Response.Write	"<center>" & vbNewLine & _
	 "<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 & _
			"    " & getCurrentIcon(strIconBar,"","") & getCurrentIcon(strIconFolderOpen,"","align=""absmiddle""") & " <a href=""admin_home.asp"">Admin Section</a><br>" & vbNewLine & _
			"    " & getCurrentIcon(strIconBlank,"","align=""absmiddle""") & getCurrentIcon(strIconBar,"","") & getCurrentIcon(strIconFolderOpenTopic,"","") & " E-mail All Members</font></td>" & vbNewLine & _
			"  </tr>" & vbNewLine & _
			"</table>" & vbNewLine
		Response.write "      <form action=""admin_pop_mail.asp"" method=""Post"" id=""Form1"" name=""Form1"">" & vbNewLine & _

thank you mad2ko0l<

Edited by - Andy Humm on 09 July 2008 13:28:43

MaD2ko0l
Senior Member

United Kingdom
1053 Posts

Posted - 09 July 2008 : 15:07:29

;-) not a problem, glad i could be of assistance<

Topic

New Topic

Reply to Topic

Printer Friendly

Jump To:

Snitz Forums 2000

This page was generated in 0.12 seconds.