织梦用dede:sql实现列表页分页教程方法

if(!is_object($ctag))
{
	$ctag = $this->dtp->GetTag("list");
}

if(!is_object($ctag))
{
    $ctag = $this->dtp->GetTag("listsql");
    if(is_object($ctag))
    {
        $CQuery = $ctag->GetAtt("sql");
        //$CQuery = str_replace('~rEID~',$this->REID,$CQuery); 这是另一个客户要求的获取url第2个参数才加的。
        $CQuery = preg_replace("/SELECT(.*?)FROM/is"," SELECT count(*) as dd FROM ",$CQuery);
        $CQuery = preg_replace("/ORDER(.*?)SC/is","",$CQuery);
        $row = $this->dsql->GetOne($CQuery);
        if(is_array($row))
        {
            $this->@R_352_10586@lResult = $row['dd'];
        }
        else
        {
            $this->@R_352_10586@lResult = 0;
        }
    }
}

else if($ctag->GetName()=="Pagelist")

else if($ctag->GetName()=="listsql")
{
    $limitstart = ($this->PageNo-1) * $this->PageSize;
    $row = $this->PageSize;
    if(trim($ctag->GeTinnerText())=="")
    {
        $InnerText = GetSystemplets("list_fulllist.htm");
    }
    else
    {
        $InnerText = trim($ctag->GeTinnerText());
    }
    $this->dtp->Assign($tagid,$this->GetsqlList(
    $limitstart,$row,$ctag->GetAtt("sql"),$InnerText
    ));
}

function GetPagelistST(

function GetsqlList($limitstart = 0,$row = 10,$sql = '',$innertext)
{
    global $cfg_list_son;
    $innertext = trim($innertext);

    if ($innertext == '')
    {
        $innertext = GetSystemplets('list_fulllist.htm');
    }
    //处理sql语句
    $limitStr = " LIMIT {$limitstart},{$row}";
    $sql = str_replace('~rEID~',$sql);
    
    $this->dsql->SetQuery($sql . $limitStr);
    $this->dsql->Execute('al');
    $t2 = Exectime();

    //echo $t2-$t1;
    $sqllist = '';
    $this->dtp2->Loadsource($innertext);
    $GLOBALS['autoindex'] = 0;

    //获取字段
    while($row = $this->dsql->GetArray("al"))
    {
        $GLOBALS['autoindex']++;
        if(is_array($this->dtp2->CTags))
        {
            foreach($this->dtp2->CTags as $k=>$ctag)
            {
                if($ctag->GetName()=='array')
                {
                    //传递整个数组，在runPHP模式中有特殊作用
                    $this->dtp2->Assign($k,$row);
                }
                else
                {
                    if(isset($row[$ctag->GetName()]))
                    {
                        $this->dtp2->Assign($k,$row[$ctag->GetName()]);
                    }
                    else
                    {
                        $this->dtp2->Assign($k,'');
                    }
                }
            }
        }

        $sqllist .= $this->dtp2->GetResult();

    }//while

    $t3 = Exectime();
    //echo ($t3-$t2);
    $this->dsql->FreeResult('al');

    return $sqllist;
}