DEDECMS实现文章tag关键词自动生成列表页

    foreach($wsnew as $k=>$v)      
    {      
    if(strlen($k)>20)      
    {      
    continue;      
    }      
    $dsql->SetQuery("Insert Into `dede_keywords`(keyword,rank,sta,rpurl) Values('".addslashes($k)."','$v','1','')");      
    $dsql->Execute();      
    }

    foreach($wsnew as $k=>$v)      
    {      
    $rpurl="";      
    $myrow = $dsql->GetOne("SELECT  distinct concat(replace(b.sitepath,'{cmspath}',''),'/',(case a.filename  when '' then a.id else a.filename end),'.html') rpurl FROM  dede_archives a,dede_arctype b where a.typeid=b.id And (a.keywords='$k' or a.keywords like'$k,%' or a.keywords like'%,$k'or a.keywords like'%,$k,%') ");      
    if(is_array($myrow))      
    {      
    //注意：$GLOBALS['cfg_basehost'] 样式类似为 http://www.111com.net，后面没有反斜杠;      
    $rpurl = $GLOBALS['cfg_basehost'].trim($myrow['rpurl']);      
    }      
    $dsql->SetQuery("Insert Into `dede_keywords`(keyword,rank,sta,rpurl) Values('".addslashes($k)."','$v','1','$rpurl')");      
    $dsql->Execute();      
    } 

{dede:sql sql='Select * from dede_keywords order by aid}