Forum Home Enhancements - My Recent Posts on Forumhome

This is my first released hack, so if you have any constructive suggestions or feedback, it'd be greatly appreciated. This is still a beta version of the hack, it doesnt support phrases or have any admin options yet, and needs a bit of optimization, I will add those in a later version.

DESCRIPTION

This adds a table onto your forumhome that shows information the last 5 threads the user has posted in, including the thread title, thread starter, last post date, last post username, replies, views, and what forum it is in.


INSTALL

1) Upload product-recentposts.xml
2) Add the following code to FORUMHOME:

Find:

<!-- what's going on box -->

Replace With:

<!-- recent posts -->
<if condition="$show['recentposts']">
<table class="tborder" cellpadding="$stylevar[cellpadding]" cellspacing="$stylevar[cellspacing]" border="0" width="100%" align="center"><tbody>
 <tr>
  <td class="tcat" colspan="6">
   <a style="float:$stylevar[right]" href="#top" onclick="return toggle_collapse('forumhome_recentposts')"><img id="collapseimg_forumhome_recentposts" src="$stylevar[imgdir_button]/collapse_tcat$vbcollapse[collapseimg_forumhome_recentposts].gif" alt="" border="0" /></a>
   My Recent Posts
  </td>
 </tr>
</tbody>
<tbody id="collapseobj_forumhome_recentposts" style="$vbcollapse[collapseobj_forumhome_recentposts]">
<tr class="thead">
            <td width="20"></td>
            <td class="thead" width="40%"><b>Thread</b></td>
            <td class="thead"><b>Last Post</b></td>
            <td class="thead" align="center"><b>Replies</b></td>
            <td class="thead" align="center"><b>Views</b></td>
            <td class="thead" align="right"><b>Forum</b></td>
</tr>
 $recentpostbits
</tbody>
</table>
<!-- /recent posts-->
<br />
</if>
<!-- what's going on box -->

This will place it above the What's Going On? box, you can put this anywhere you like really.

This has only been tested on vb 3.6.4

DEMO / EXAMPLE

http://forums.ffextreme.com/
You will have to register and post to actually see it working unfortunately hehe.


MODIFY NUMBER OF THREADS SHOWN (TEMP)

I will add admin cp options in the next update, but if you want to modify how many threads are shown on the list:

1) Goto the Plugin Manager
2) Click [Edit] for the Recent Posts by You on ForumHome plugin
3) In the text box, find where it says:

PHP Code:

$getposts = $db->query_read("SELECT distinct threadid FROM post WHERE userid = $userid ORDER BY postid DESC LIMIT 5"); 


4) Change the end where it says DESC LIMIT 5, to whatever number you want to show (DESC LIMIT 10 etc)


BUGS / FIXES

0.14 --> Fixed font issues, issues involving deleted threads showing up.
0.13 --> Change font size to smallfont
0.12 --> Changed userid variable to proper variable, added alternating column colours.
0.11 --> Added TABLE_PREFIX to the queries

[Warlord]

Any idea on when the updated version will be out with the ability to exclude forums from this hack? I may take a stab at editing my forums to do this but if the update will be released soon I will just wait on that.

Originally Posted by lnxtr

hi
i want to my user kontrol panel wiev

If you're asking to put this in your User Control Panel, I did this for my forums. (Hopefully Mistah Roth doesn't mind me posting this variation in here for people. If you do, feel free to have one of the staff delete this post.)

Create a plug in called: Recent Posts in User CP
Hook Location: usercp_complete
Plug in PHP Code:

PHP Code:

if ($vbulletin->userinfo['userid']) {
            global $vbulletin; 

$getposts = $db->query_read("SELECT distinct b.threadid FROM ". TABLE_PREFIX . "post a, ". TABLE_PREFIX . "thread b WHERE a.userid = " . $vbulletin->userinfo['userid'] . " AND b.visible = 1 AND a.threadid = b.threadid ORDER BY a.postid DESC LIMIT 5");  

while($recentpost = $db->fetch_array($getposts)) { 
    
       $tid = $recentpost['threadid']; 
       $getthreadid = $db->query_read("SELECT * FROM ". TABLE_PREFIX . "thread WHERE threadid = $tid");  
       $rpthread = $db->fetch_array($getthreadid);  
       $rpthread['date'] = vbdate($vbulletin->options['dateformat'], $rpthread['lastpost'], 1);  
       $rpthread['time'] = vbdate($vbulletin->options['timeformat'], $rpthread['lastpost']); 

       $icon = fetch_iconinfo($rpthread['iconid']);   
       $rpthread['threadiconpath'] = $icon['iconpath'];  
       $rpthread['threadicontitle'] = $icon['title'];  

       $fid = $rpthread['forumid'];  
       $getforums = $db->query_read("SELECT title FROM ". TABLE_PREFIX . "forum WHERE forumid = $fid");  
       $rpforum = $db->fetch_array($getforums);  

        

       eval("\$recentpostbits .= \"".fetch_template('forumhome_recentpostbits')."\";"); 
}
if ($tid) $show['recentposts'] = 1; 
} 


In template USERCP find:

<!-- ############## SUBSCRIBED THREADS ##############  -->

Add Above:

<!-- recent posts -->
<if condition="$show['recentposts']">
<p>
<table class="tborder" cellpadding="$stylevar[cellpadding]" cellspacing="$stylevar[cellspacing]" border="0" width="100%" align="center"><tbody>
 <tr>
  <td class="tcat" colspan="6">
   <a style="float:$stylevar[right]" href="#top" onclick="return toggle_collapse('forumhome_recentposts')"><img id="collapseimg_forumhome_recentposts" src="$stylevar[imgdir_button]/collapse_tcat$vbcollapse[collapseimg_forumhome_recentposts].gif" alt="" border="0" /></a>
   My Recent Forums Posts
  </td>
 </tr>
</tbody>
<tbody id="collapseobj_forumhome_recentposts" style="$vbcollapse[collapseobj_forumhome_recentposts]">
<tr class="thead">
            <td width="20"></td>
            <td class="thead" width="40%"><b>Thread</b></td>
            <td class="thead"><b>Last Post</b></td>
            <td class="thead" align="center"><b>Replies</b></td>
            <td class="thead" align="center"><b>Views</b></td>
            <td class="thead" align="right"><b>Forum</b></td>
</tr>
 $recentpostbits
</tbody>
</table>

<!-- /recent posts-->
</if>

[thompson]

is there a chance o do that:

need a box for forum 1-10 (good topics) say last 10 posts
and
need another box for forum 11+12 (offtopic) say last 5 posts

??

thanks

[Warlord]

Where do you want it to appear? On forumhome or the usercp? I'll try to get you the code you need when I have a little more time.

[thompson]

i want this on forumhome.

i had the alppro ajax plugin, but this only works with one box.

[Warlord]

Well bro, I tried to get this to work for you the way you wanted for over an hour but unfortunately it seems to have kicked my butt.

For some reason the two plug-ins conflict and you get a combination of both plug-ins somehow. I think I was getting close but I'm stumped. I'll attach the Product XML and post the template code I have so far and maybe Mr. Roth can take a look at it for you and find the problem. Sorry I couldn't be of more help.

FORUMHOME TEMPLATE CODE TO ADD (this would replace the forumhome code originally posted by Mr. Roth in this hack):

<!-- recent posts -->
<if condition="$show['recentposts']">
<table class="tborder" cellpadding="$stylevar[cellpadding]" cellspacing="$stylevar[cellspacing]" border="0" width="100%" align="center"><tbody>
 <tr>
  <td class="tcat" colspan="6">
   <a style="float:$stylevar[right]" href="#top" onclick="return toggle_collapse('forumhome_recentposts')"><img id="collapseimg_forumhome_recentposts" src="$stylevar[imgdir_button]/collapse_tcat$vbcollapse[collapseimg_forumhome_recentposts].gif" alt="" border="0" /></a>
   My Recent Posts
  </td>
 </tr>
</tbody>
<tbody id="collapseobj_forumhome_recentposts" style="$vbcollapse[collapseobj_forumhome_recentposts]">
<tr class="thead">
            <td width="20"></td>
            <td class="thead" width="40%"><b>Thread</b></td>
            <td class="thead"><b>Last Post</b></td>
            <td class="thead" align="center"><b>Replies</b></td>
            <td class="thead" align="center"><b>Views</b></td>
            <td class="thead" align="right"><b>Forum</b></td>
</tr>
 $recentpostbits
</tbody>
</table>
<br />
</if>
<!-- /recent posts-->


<!-- recent posts customized -->
<if condition="$show['recentposts_offtopic']">
<table class="tborder" cellpadding="$stylevar[cellpadding]" cellspacing="$stylevar[cellspacing]" border="0" width="100%" align="center"><tbody>
 <tr>
  <td class="tcat" colspan="6">
   <a style="float:$stylevar[right]" href="#top" onclick="return toggle_collapse('forumhome_recentposts_offtopic')"><img id="collapseimg_forumhome_recentposts_offtopic" src="$stylevar[imgdir_button]/collapse_tcat$vbcollapse[collapseimg_forumhome_recentposts].gif" alt="" border="0" /></a>
   My Recent Posts (Off Topic)
  </td>
 </tr>
</tbody>
<tbody id="collapseobj_forumhome_recentposts_offtopic" style="$vbcollapse[collapseobj_forumhome_recentposts_offtopic]">
<tr class="thead">
            <td width="20"></td>
            <td class="thead" width="40%"><b>Thread</b></td>
            <td class="thead"><b>Last Post</b></td>
            <td class="thead" align="center"><b>Replies</b></td>
            <td class="thead" align="center"><b>Views</b></td>
            <td class="thead" align="right"><b>Forum</b></td>
</tr>
 $recentpostbits
</tbody>
</table>
<br />
</if>
<!-- /recent posts customized-->

[thompson]

thanks bro, i will have a look at it.

[lnxtr]

don't run

[metalguy639]

Hi, I'm trying to get this to show on a different template page. Is there a way to get it to show on a page that is not the forumhome page? I'm using vb 3.8.1 maybe its not working with a different version?

[RTMdotORG]

UPDATED:

https://vborg.vbsupport.ru/showthread.php?t=215898