帝国CMS内容页调用当前文章作者信息及会员除了相关文章

<?php
$userr=sys_ShowMemberInfo(0,'');
?>
<span>会员头像：<img src="<?=$userr[userpic]?$userr[userpic]:$public_r[newsurl].'e/data/images/doimg.gif'?>"></span> <br>
<span>会员：<?=$userr[username]?></span> <br>
<span>会员ID：<?=$userr[userid]?></span> <br>
<span>注册时间：<?=$userr[registertime]==null?"":date('y-m-d',$userr[registertime])?></span> <br>
<span>会员积分：<?=$userr[userfen]?>分</span> <br>
<span>发布新闻：<?=$empire->gettotal("select count(*) as total from {$dbtbpre}ecms_news where userid='$navinfor[userid]' and ismember=1")?>条</span> <br>
<span>会员组：<?=$userr[groupname]?></span><br>
<span>作者文章列表：<a href="<?=$public_r[newsurl]?>e/space/list.php?userid=<?=$userr[userid]?>&mid=1">文章列表</a></span><br>

<?php
$sql=$empire->query("select * from {$dbtbpre}ecms_news where userid='$navinfor[userid]' and classid='$navinfor[classid]' and id<>$navinfor[id] and ismember=1 order by newstime asc limit 5");
while($r=$empire->fetch($sql))
if($navinfor[ismember]==1)
{
$titleurl=sys_ReturnBqTitleLink($r);//链接
?>
<li><a href="<?=$titleurl?>" target="_blank" title="<?=$r[title]?>" ><?=esub($r[title],40)?></a></li>
<?php
}
else
{
?>
暂时没有其他文章
<?php
}
?>

[e:loop={"select * from [!db.pre!]ecms_news where userid='$navinfor[userid]' and classid='$navinfor[classid]' and id<>$navinfor[id] and ismember=1 order by newstime desc limit 10",0,24,0}]
<?php
if($navinfor[ismember]==1)
{
?>
<li><a href="<?=$bqsr[titleurl]?>" title="<?=$bqr[title]?>"><?=esub($bqr[title],50)?></a></li>
<?php
}
else
{
?>
暂时没有其他文章
<?php
}
?>
[/e:loop]

[e:loop={'selfinfo',10,0,0,"userid='$navinfor[userid]' and classid='$navinfor[classid]' and id<>$navinfor[id] and ismember=1"}]
<?php
if($navinfor[ismember]==1)
{
?>
<li><a href="<?=$bqsr[titleurl]?>" title="<?=$bqr[title]?>"><?=esub($bqr[title],50)?></a></li>
<?php
}
else
{
?>
暂时没有其他文章
<?php
}
?>
[/e:loop]