CMPS Module - Latest or Hot Links

[AndyA]

Thanks for that.

I now have this installed but the links module isn't collapseable, can anyone advise ?

My site

Andy

[eden]

How can we use this with 3.5 ?

[terrymason]

I'd like to have a new version too!

[Lance Carbuncle]

Will this work with 3.5x? any news on when it will be upgraded if so?

Thanks, Allen

[Benjamini]

Originally Posted by Lance Carbuncle

Will this work with 3.5x? any news on when it will be upgraded if so?

Thanks, Allen

same question here

[IndyWebDesign]

Here is a modified version I did to work with vb 3.5.3 and CMPS 2.1.0.

I have it working here:

http://www.rchangout.com

[Benjamini]

Originally Posted by IndyWebDesign

Here is a modified version I did to work with vb 3.5.3 and CMPS 2.1.0.

I have it working here:

http://www.rchangout.com

thank you very much!!!

edit:

The file you have uploaded is not a valid module file.

whats wrong? i have a vb 3.5.2 & CMPS 2.0.0

[Benjamini]

Here are the manually from your .module.

now it works, but i think there is a littele problem with the template or any other thing...



"title" "Random Links"
"identifier" "latestlinks"
"filename" "latestlinks.php"
"templatelist" "adv_portal_latestlinks, adv_portal_linkbits"

"adv_portal_latestlinks"

<table align="center" border="0" cellpadding="$stylevar[cellpadding]" cellspacing="$stylevar[cellspacing]" class="tborder" width="100%">
	<thead>
	<tr>
		<td class="tcat">
		<a style="float:$stylevar[right]" href="#top" onclick="return toggle_collapse('latestlinks')"><img id="collapseimg_latestlinks" 

src="$stylevar[imgdir_button]/collapse_tcat$collapseimg_latestlinks.gif" alt="" border="0" /></a>
		<span class="smallfont"><strong>$vba_style[portal_blockbullet] $mods[title]</strong></span></td>
	</tr>
	</thead>
	<tbody id="collapseobj_latestlinks" style="$collapseobj_latestlinks">

$linkbits

</table>
<br />

"adv_portal_linkbits"

<tr>
		<td class="$getbgrow">
<div><a href="$linkurl/showlink.php?$session[sessionurl]do=showdetails&amp;l=$link[linkid]">$link[name]</a></div>
<div class="smallfont">
$vbphrase[by] 
<if condition="$link['userid']"><a href="$vboptions[bburl]/member.php?$session[sessionurl]u=$link[userid]">$link[username]</a>
<else />
$vbphrase[guest]
</if><br />
$link[date] <span class="time">$link[time]</span><br />
<a href="$linkurl/browselinks.php?$session[sessionurl]c=$link[catid]">$link[catname]</a><br />
$link[posts] $vbphrase[replies], $link[views] $vbphrase[views]

</div>
	</td>
	</tr>

latestlinks.php

PHP Code:

<?php
// ++=========================================================================++
// || vBadvanced CMPS 1.0.0 - Latest Links for vBa Links Directory            ||
// || © 2003-2004 vBadvanced.com & PlurPlanet, LLC - All Rights Reserved      ||
// || This file may not be redistributed in whole or significant part.        ||
// || http://vbadvanced.com                                                   ||
// ++ ========================================================================++
// || Modified to work with CMPS 2.1.0 and vB 3.5.3                      ||
// || Added option for Random Links                              ||
// ++ ========================================================================++

// The order you would like to pull the links in. 
// Enter 1 for newest, 2 for most viewed, 3 for most comments, 4 for highest rated, 5 for random
$order = 5;

// Enter the number of links you would like to display here
$limit = 5;

// The URL to your links directory with NO trailing slash '/'
$linkurl = 'http://www.yoursite.com/links';

// Maximum characters of the links name before the rest will be replaced with '...'
// Set this to 0 to disable it.
$maxnamechars = 0;

// No further editing necessary


switch($order)
{
    case 2:
        $orderby = 'views DESC';
        break;
    case 3:
        $orderby = 'posts DESC';
        break;
    case 4:
        $votequery = 'IF(votenum >= ' . $vboptions['showvotes'] . ', votenum, 0) AS votenum, IF(votenum >= ' . $vboptions['showvotes'] . ' AND votenum> 0, votetotal / votenum, 0) AS voteavg,';
        $orderby = 'voteavg DESC, votenum DESC';
        break;
    case 5:
        $orderby = 'RAND()';
        break;
    default:
        $orderby = 'dateline DESC';
}

// Get private directories
if ($catinfo = unserialize($datastore['links_d_cache']))
{
    $privcatids = array();
    foreach ($catinfo as $cats)
    {
        if ($cats['private'])
        {
            $privcatids[] = $cats['catid'];
        }
    }
    $privcats = 'AND links.catid NOT IN (' . implode(',', $privcatids) . ')';
}

$getlinks = $db->query("
    SELECT $votequery links.*, links_categories.title FROM " . TABLE_PREFIX . "links AS links
    LEFT JOIN " . TABLE_PREFIX . "links_categories AS links_categories ON (links.catid = links_categories.catid)
    WHERE valid = 1 AND suspended = 0 $privcats
    ORDER BY $orderby
    LIMIT $limit
");
while ($link = $db->fetch_array($getlinks))
{
    $link['catname'] = stripslashes($link['title']);
    $link['name'] = fetch_trimmed_title(stripslashes($link['name']), $maxnamechars);
    $link['username'] = stripslashes($link['username']);
    $link['date'] = vbdate($vboptions['dateformat'], $link['dateline']);
    $link['time'] = vbdate($vboptions['timeformat'], $link['dateline']);
    $link['posts'] = number_format($link['posts']);
    $link['replies'] = number_format($link['replies']);

    $getbgrow = exec_switch_bg();
    eval('$linkbits .= "' . fetch_template('adv_portal_linkbits') . '";');
}

$collapseobj_latestlinks = $vbcollapse['collapseobj_latestlinks'];
$collapseimg_latestlinks = $vbcollapse['collapseimg_latestlinks'];

eval('$home[$mods[\'modid\']][\'content\'] = "' . fetch_template('adv_portal_latestlinks') . '";');

?>

[Benjamini]

... nobody can help? here are a lot of vbadvanced users and nobody got a running hotest link module?

[Torqued]

Anyone else figure this one out?

[orphan]

Originally Posted by RetroDreams

Is this not functional with 3.5? When I attempt to run it, I get the following error:

Fatal error: Call to a member function on a non-object in /home/dukecoun/public_html/indy/forums/modules/latestlinks.php on line 56

Got the same when trying this module on 3.6
Seems to be SQL related but cant really figure it out

[rolando]

I tried Benjiman's latest codes from above, check all characters, but got this, Parse error: parse error, unexpected T_CONSTANT_ENCAPSED_STRING in /var/www/vhosts/glamour1.com/htdocs/forums/modules/latestlinks.php on line 20

I checked, and this is what I have on the PHP file,

//*The*order*you*would*like*to*pull*the*links*in.*
//*Enter*1*for*newest,*2*for*most*viewed,*3*for*most*comments,*4*for*highest*rated,*5*for*random
$order*=*5;

//*Enter*the*number*of*links*you*would*like*to*display*here
$limit*=*5;

//*The*URL*to*your*links*directory*with*NO*trailing*slash
$linkurl*=*'http://www.glamour1.com/links';

//*Maximum*characters*of*the*links*name*before*the*rest*will*be*replaced*with*'...'
//*Set*this*to*0*to*disable*it.
$maxnamechars*=*0;

//*No*further*editing*necessary

Any ideas? I'd love to make it work, thanks, rg.

[rolando]

I don't have *'s it printed this way on the post, it should be

//*The*order*you*would*like*to*pull*the*links*in.*
//*Enter*1*for*newest,*2*for*most*viewed,*3*for*most*comments,*4*for*highest*rated,*5*for*random
$order*=*5;

//*Enter*the*number*of*links*you*would*like*to*display*here
$limit*=*5;

//*The*URL*to*your*links*directory*with*NO*trailing*slash
$linkurl*=*'http://www.glamour1.com/links';

//*Maximum*characters*of*the*links*name*before*the*rest*will*be*replaced*with*'...'
//*Set*this*to*0*to*disable*it.
$maxnamechars*=*0;

//*No*further*editing*necessary

[ncangler]

Try plugging this in:

// The order you would like to pull the links in.
// Enter 1 for newest, 2 for most viewed, 3 for most comments, 4 for highest rated, 5 for random
$order=5;

// Enter the number of links you would like to display here
$limit=5;

// The URL to your links directory with NO trailing slash
$linkurl='http://www.glamour1.com/links';

// Maximum characters of the links name before the rest will be replaced with '...'
// Set this to 0 to disable it.
$maxnamechars=0;

// No further editing necessary

I just removed the *'s.

[rolando]

got it, thanks. Found the problem after I posted. Now, I'd like to break it into columns for the center colum where you could add the thumbnail...working it, thanks, rg.

[interfx]

Anyone get this working with 3.6.1? I've tried above, but doesn't work... Not sure what I am doing wrong... (or if it even works with 3.6.1)

Thanks -
InterFX

[ang2el]

I am also looking for random links in the CMPS page please let me know if 3.6.1 with CMPS v2.2.0. is there

Thanks for the help.

[Nuguru]

Originally Posted by Brian

For all of those running both the CMPS and the links directory, here's a module that will allow you to display the latest, highest rated, most viewed, or most replied to links on your CMPS pages. To install, first add these two templates:

adv_portal_latestlinks

<table align="center" border="0" cellpadding="$stylevar[cellpadding]" cellspacing="$stylevar[cellspacing]" class="tborder" width="100%">
	<tr>
		<td class="tcat"><span class="smallfont"><strong>$vba_options[portal_blockbullet] $mods[title]</strong></span></td>
	</tr>

	$linkbits

</table>
<br />

adv_portal_linkbits

<tr>
<td class="$getbgrow">
<div><a href="$linkurl/showlink.php?$session[sessionurl]do=showdetails&amp;l=$link[linkid]">$link[name]</a></div>
<div class="smallfont">
$vbphrase[by] 
<if condition="$link['userid']"><a href="$vboptions[bburl]/member.php?$session[sessionurl]u=$link[userid]">$link[username]</a>
<else />
$vbphrase[guest]
</if><br />
$link[date] <span class="time">$link[time]</span><br />
<a href="$linkurl/browselinks.php?$session[sessionurl]c=$link[catid]">$link[catname]</a><br />
$link[posts] $vbphrase[replies], $link[views] $vbphrase[views]

</div>
</td>
</tr>

Then download the latestlinks.php attachement below. In the first few lines of the file you will see a place to set the different options. Once you have them set as you would like, upload the file to your /forum/modules directory.

Now add a new module with the following information:

Module Title: Latest Links (or whatever you would like to call this module on your CMPS)
File to Include: latestlinks.php
Templates Used: adv_portal_latestlinks, adv_portal_linkbits

Save the module and you're done.

Hello Everyone,

This looks like a really good mod but I am wondering if it will work with vb3.5.4 and 3.5.5?

If so, is there anything special that has to be done (other than following the given directions) to get it working in those 2 vb editions?


Thank You,

Nuguru

[Nuguru]

Originally Posted by Nuguru

Hello Everyone,

This looks like a really good mod but I am wondering if it will work with vb3.5.4 and 3.5.5?

If so, is there anything special that has to be done (other than following the given directions) to get it working in those 2 vb editions?


Thank You,

Nuguru

Hello,

Does anyone know?

[drewbe121212]

V 3.6:

http://www.vbadvanced.com/forum/showthread.php?t=18416