Basándome en el
Show IP in Members List Mod by Bill Nilan (Wizard)He realizado unos cambios sin importancia.
Para los admin, la última columna muestra la IP del usuario listado. Para el resto de los usuarios (en vez de borrarla) muestro la columna gráfica con el nº de posts (así los usuarios no notan cambios...

)
El problema es que algo me debe fallar porque me funciona en sólo 2 de las funciones: MLTop() y MLByLetter ()...
En MLAll () no me muestra la IP...

Posteo los fragmentos afectados por si alguien ve algo que se me escapa...
$memberlistplver="YaBB SE 1.4.1";
// initialize variables
global $txt,$cgi,$color,$img,$TopAmmount,$action,$scripturl,$MOST_POSTS,$TableHeader,$TableFooter,$username,$db_prefix;
global $settings;
$Sort = $page = $LetterLinks = $TableHeader = '';
if($username == "Guest") { fatal_error($txt[223]); }
if($action == "mlall") { $Sort .= "$txt[303] | "; } else { $Sort .= "<a href=\"$cgi;action=mlall\"><font size=2 class=\"text1\" color=\"$color[titletext]\">$txt[303]</font></a> | "; }
if($action == "mlletter") { $Sort .= "$txt[304] | "; } else { $Sort .= "<a href=\"$cgi;action=mlletter\"><font size=2 class=\"text1\" color=\"$color[titletext]\">$txt[304]</font></a> | "; }
if($action == "mltop") { $Sort .= "$txt[305] $txt[411] $TopAmmount $txt[306]"; } else { $Sort .= "<a href=\"$cgi;action=mltop\"><font size=2 class=\"text1\" color=\"$color[titletext]\">$txt[305] $txt[411] $TopAmmount $txt[306]</font></a>"; }
if ($settings[7] == "Administrator"){ $superman = $txt[512]; } else { $superman = $txt[21]; }
//if($action == "mlletter") {
// for ($i = 97; $i < 123; $i++)
// $LetterLinks .= "<a href=\"$scripturl?action=mlletter;letter=".chr($i)."\">".strtoupper(chr($i))."</a> ";
if($action == "mlletter") {
for ($i = 48; $i < 58; $i++)
$LetterLinks .= "<a href=\"$scripturl?action=mlletter;letter=".chr($i)."\">".strtoupper(chr($i))."</a> ";
for ($i = 97; $i < 123; $i++)
$LetterLinks .= "<a href=\"$scripturl?action=mlletter;letter=".chr($i)."\">".strtoupper(chr($i))."</a> ";
}
function MLAll (){
global $user,$txt,$start,$MembersPerPage,$settings,$allow_hide_email,$color,$TableHeader,$MOST_POSTS;
global $imagesdir,$cgi,$TableFooter,$db_prefix;
global $NUM_MEMBERS,$yytitle;
if ($MOST_POSTS==0) {$MOST_POSTS=1;}
if($user == "Guest") { fatal_error($txt[223]); }
# Get the number of members
// $result = mysql_query ("SELECT COUNT(*) as memcount FROM {$db_prefix}members");
// $row = mysql_fetch_row($result);
$memcount = $NUM_MEMBERS;
if($start == "") { $start = 0; }
// $numshown=0;
$numbegin = ($start + 1);
$numend = ($start + $MembersPerPage);
if($numend > $memcount) { $numend = $memcount; }
// $b = $start;
$yytitle = "$txt[308] $numbegin $txt[311] $numend";
template_header();
print <<<EOT
<table border=0 cellspacing=0 cellpadding="3" align="center" width="100%">
<tr>
<td bgcolor="$color[titlebg]" align="center" class="titlebg">
<font size="2" class="text1" color="$color[titletext]"><B>$txt[308] $numbegin $txt[311] $numend ($txt[309] $memcount $txt[310])</B></font>
</td>
</tr>
</table>
EOT;
print $TableHeader;
$request = mysql_query("SELECT memberName,realName,websiteTitle,websiteUrl,posts,memberGroup,ICQ,emailAddress,hideEmail FROM {$db_prefix}members WHERE 1 LIMIT $start,$MembersPerPage");
while ($row = mysql_fetch_array($request)) {
$name = $row['memberName'];
if (OnlineStatus($row['memberName']) > 0) { $online = "$txt[online6]"; } else $online = "$txt[online7]";
$Bar = "";
$ICQ = "";
$Bar = " ";
$ICQ = "";
$barchart = round(($row['posts'] / $MOST_POSTS) * 100);
if ($barchart <= 0) {$barchart = 1;}
$Bar = "<img src=\"$imagesdir/bar.gif\" width=$barchart height=15 border=\"0\">";
if(isset ($row['ICQ'])) {
$ICQ = "<a href=\"$cgi;action=icqpager;UIN=$row[ICQ]\" target=_blank><img src=\" http://web.icq.com/whitepages/online?icq=$row[ICQ]&img=5\" alt=\"$row[ICQ]\" border=0></a>";
}
$row['websiteTitle'] = isset($row['websiteTitle'])?$row['websiteTitle']:'';
$row['websiteUrl'] = isset($row['websiteUrl'])?$row['websiteUrl']:'';
$row['memberGroup'] = isset($row['memberGroup'])?$row['memberGroup']:'';
$row['memberIP'] = isset($row['memberIP'])?$row['memberIP']:'';
//Fix by Omar Bazavilvazo -- Administrator & Global Moderator position shows members description instead of membergroups description
$membergroup = $row['memberGroup']; //membergroup variable
$mg_request = mysql_query("SELECT membergroup FROM {$db_prefix}membergroups ORDER BY ID_GROUP"); //query membergroups descriptions
$membergroups = array();
while ($mg_row = mysql_fetch_row($mg_request)) //retrieve all membergroups descriptions
$membergroups[] = $mg_row[0];
if ($membergroup == 'Administrator')
$membergroup = $membergroups[0]; //admin description
elseif ($membergroup == 'Global Moderator')
$membergroup = $membergroups[7]; //Global moderator description
//End Fix by Omar Bazavilvazo
if($row['posts'] > 100000) { $row['posts'] = "$txt[683]"; }
$euser=urlencode($row['memberName']);
print <<<EOT
<tr>
<td class="windowbg" bgcolor="$color[windowbg]"><font size=2><a href="$cgi;action=viewprofile;user=$euser">$row[realName]</a></font></td>
<td class="windowbg2" bgcolor="$color[windowbg2]" align="center"><a href="$cgi;action=imsend;to=$row[memberName]"><font size=2>$online</font></td>
EOT;
if ($row['hideEmail'] && $settings[7] != "Administrator" && $allow_hide_email) { print <<<EOT
<td class="windowbg2" bgcolor="$color[windowbg2]"><font size=2><i>$txt[722]</i></font></td>
EOT;
} else { print<<<EOT
<td class="windowbg2" bgcolor="$color[windowbg2]"><font size=2><a href="mailto:$row[emailAddress]">$row[emailAddress]</a></font></td>
EOT;
}
print <<<EOT
<td class="windowbg" bgcolor="$color[windowbg]"><font size=2><a href="$row[websiteUrl]" target="_blank">$row[websiteTitle]</a></font> </td>
<td class="windowbg2" bgcolor="$color[windowbg2]" align="center"><font size=2>$row[posts]</font> </td>
<td class="windowbg" bgcolor="$color[windowbg]"><font size=2>$membergroup</font> </td>
<td class="windowbg2" bgcolor="$color[windowbg2]" align="center"><font size=2>$ICQ</font> </td>
EOT;
if ($settings[7] != "Administrator") { print <<<EOT
<td class="windowbg" bgcolor="$color[windowbg]">$Bar</td>
EOT;
} else { print<<<EOT
<td class="windowbg" bgcolor="$color[windowbg]"><font size=2><a href="http://www.nic.com/cgi-bin/whois.cgi?query=$memberIP" target="_blank">
$memberIP</font></td>
EOT;
}
print <<<EOT
</tr>
EOT;
}
print $TableFooter;
Gracias por molestarte en leer mi post....