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

locutis78
Starting Member

2 Posts

Posted - 06 August 2004 :  13:43:41  Show Profile
I am looking for a more robbust Text mod. something that will let me change to more fonts as well as make forum titles in bold and italics. there anyone out there that has something like that?

cripto9t
Average Member

USA
881 Posts

Posted - 08 August 2004 :  10:32:08  Show Profile
locutis78, borg Just kidding.

To use forum code in forum subjects you'll have to use the formatStr function.
In default.asp find this around line 515
Response.Write	""">" & chkString(ForumSubject,"display") & "</a><br />" & _

Change it to this (the parts in red)
Response.Write	""">" & formatStr(chkString(ForumSubject,"message")) & "</a><br />" & _


if you want the same thing for category titles there are 3 places in default.asp around lines 393,477 and 479
Find this code in the lines
" & ChkString(CatName,"display") & "

and change it to this
" & formatStr(ChkString(CatName,"message")) & "


You'll also need to do the same thing on other pages that display the title. Like in the menu tree.

In forum.asp around line 376 for the forum title, line 365 for category title.
Response.Write	" <a href=""forum.asp?" & ArchiveLink & "FORUM_ID=" & Forum_ID & """>" & ChkString(Forum_Subject,"display") & "</a></font></td>" & vbNewLine & _

change to
Response.Write	" <a href=""forum.asp?" & ArchiveLink & "FORUM_ID=" & Forum_ID & """>" & formatStr(ChkString(Forum_Subject,"message")) & "</a></font></td>" & vbNewLine & _

For category
Response.Write	" <a href=""default.asp?CAT_ID=" & Cat_ID & """>" & ChkString(Cat_Name,"display") & "</a><br />" & vbNewLine & _

Change to
Response.Write	" <a href=""default.asp?CAT_ID=" & Cat_ID & """>" & formatStr(ChkString(Cat_Name,"message")) & "</a><br />" & vbNewLine & _


You'll find similar code in post.asp, post_info.asp, active.asp and maybe some others.

Also you will probably need to increase the character amount in post.asp (it's set to 50) around line 816
"                <td bgColor=""" & strPopUpTableColor & """><input maxLength=""50"" name=""Subject"" value=""" & Trim(ChkString(TxtSub,"edit")) & """ size=""40""></td>" & vbNewLine & _

Change the part in red to what you think is right. this is also the topic title, so members will be able to post topic titles at this lenght


As for more fonts, look in "inc_post_buttons", you can see how they are added to the drop down box.



    _-/Cripto9t\-_
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.32 seconds. Powered By: Snitz Forums 2000 Version 3.4.07