dedecms文章页面随机调用一篇文章

2012-04-17 09:54 来源:www.chinab4c.com 作者:dedecms专家

      dedecms文章页面随机调用一篇文章,我们这个时候在对dedecms开发的时候非常有必要,为了让dedecms文章页面更加的增加一些随机元素。我们可以考虑通过对dedecms二次开发来实现这个功能。

     1.增加以下dedecms自定义标签 randarc

           function lib_randarc(&$ctag , &$refObj){
 
 global $dsql;

 FillAttsDefault($ctag->CAttribute->Items ,"limit|1");
 extract($ctag->CAttribute->Items);
 $s = '';
 $tcp = new DedeTagParse();
 $tcp->SetNameSpace("field",'[',']');
 $tcp->LoadSource($ctag->GetInnerText());
 $sql = $query = "SELECT se.*,tp.typedir,tp.typename,tp.isdefault,tp.defaultname,tp.namerule,tp.namerule2,tp.ispart,tp.moresite,tp.siteurl,tp.sitepath
            FROM `dede_archives` se LEFT JOIN `dede_arctype` tp ON se.typeid=tp.id WHERE 1 order by rand() limit $limit";
 $dsql->Execute("f",$sql);
 while($row1 = $dsql->GetArray("f")){
  
  $row1['arcurl'] = GetFileUrl($row1['id'],$row1['typeid'],$row1['senddate'],$row1['title'],
        $row1['ismake'],
        $row1['arcrank'],$row1['namerule'],$row1['typedir'],$row1['money'],
        $row1['filename'],$row1['moresite'],$row1['siteurl'],$row1['sitepath']);
  foreach($tcp->CTags as $k => $v ){
   
   $tcp->Assign($k , $row1[$v->GetName()]);

  }

  $s.=$tcp->GetResult();

 }
 return $s;
}

   2:在dedecms文章模板中调用。

    {dede:randarc limit=1}<a href=[field:arcurl/]>[field:title/]</a>{/dede:randarc}

    这样很简单的就完成了dedecms文章页面随机调用一篇文章的功能。

   来源:http://www.chinab4c.com