Is this the sequel to "not enough??" http://www.aota.net/ubb/smile.gif
I will assume the free version (that's what I've got), and I would also assume that the full version would differ slightly.
I don't know the line numbers, either, because I've done a lot of HTML tweaking as well (I still say that the writers of the UBB don't know HTML like they do Perl). But anyway, here goes:
First, the tables. Open up ubb_library2.pl in your favorite text editor. Scroll down until you find this:
} # end if not stat line and not father line
} # end reply loop
} # end Count > 0 loop
Those are comments, but they're the only thing that makes this sub distinct. Scroll up a few lines to the next $ThisThread .= qq( statement. Between the ( and ) is the reply loop, meaning it gets repeated for each reply. Here's what mine looks like:
if (int($Num/2) == ($Num/2)) {
$Acol = $Cell1;
} else {
$Acol = $Cell2;
}
$Num = ($Num + 1);
$ThisThread .= qq(
<table width=$TableWidth border=0 cellpadding=2 cellspacing=2>
<tr bgcolor=$Acol>
<TD width=18% valign=top><FONT SIZE=3 face="$FontFace" color=$TextHiLite>$thisline[2]</FONT>
<font size=1 face="$FontFace">$UserType</font></td>
<TD><IMG SRC="$NonCGIURL/posticon.gif" BORDER=0>
<FONT SIZE=1 face="$FontFace">posted $ThisDate $FormatTime $TimeZone [nbsp][nbsp][nbsp]
<A HREF="$CGIURL/ubbmisc.cgi?action=getbio&UserName=$UserNameCoded" target=_new>
<IMG SRC="$NonCGIURL/profile.gif" WIDTH=22 HEIGHT=11 BORDER=0 ALT="Click Here to See the Profile for $thisline[2]"></A>$EmailString [nbsp][nbsp]</font>
<HR><font size=2 face="$FontFace">$ReplyText</FONT></td>
</tr>
</table> );
The little math evaluation is what decides which of the two alternating colors to make the background of each reply - for some reason, the table thing breaks the alternating colors, so I just did it myself. Mine is the only one I've seen with the table mod AND still having alternating BGCOLOR's.
$Cell1 and 2 are defined in Styles.file and are set to my alternating colors. There are other variables that I created too, so I hope they don't confuse you too much.
Basically, just insert <table width=95% border=0> at the beginning of that loop, and </table> at the end, and also go above this to the part that looks similar and clost that table at the end, and set it's <tr bgcolor= to $Cell2. That way the starting color is 2, the next reply is 1, etc.
Now, you'll also notice another variable in there: $UserType. This is defined a few lines above the reply sub by me, and that sets the user's status:
@thisprofile = &OpenProfile("$thisline[2].cgi");
$EmailView = $thisprofile[11];
$UserType = $thisprofile[8];
That will set the variable to the user's status and show it in the table.
You also have to open up postings.cgi and find the same subs (similar) and do the same mods, so that a new topic gets these too, not just replies.
If you are confused at all (I am) just let me know and maybe I can explain certain parts more clearly (I probably left out some details, asuming you know at least a little Perl - then again, you probably don't have an Apache server installed either http://www.aota.net/ubb/smile.gif)
I have to say that without Apache installed I would have never even attempted to modify the crap out of a script. The point is that I'm not sure if I remember each individual step:
try this, save, reload, that didn't work, cut this and paste that, save, reload, ok, that's better, maybe if that was over there, no, not quite, um, shoot, I screwed it up, ok, where did I just paste that, somewhere, ok, there it is, now if only I knew where I put that darn sub, which file was it in, too many notepads open, ok, it was one of these, not sure...
That's the programmer in me showing. I'm not the type to document every move, even in my real programs (hell, I don't even have the source to my two older versions anymore!).
Let me know (and good luck) http://www.aota.net/ubb/biggrin.gif Actually, if you want, I could just send you the files (the colors are defined by variables, the way it should have been!).
Justin
-- I think I just confused myself --