91豆麻精品91久久久久久,中文在线资源,国产精品女视频,yw.139尤物在线精品视频

?
  歡迎訪問全國企業網站設計NO.1網站開發商平臺 付款方式
主頁 > 網站建設 > 建站知識 > DEDE自定義表單導出功能的實現詳細步驟

DEDE自定義表單導出功能的實現詳細步驟

POST TIME:2020-10-09

DEDE自定義表單導出功能的實現詳細步驟,這個代碼是通用的!加完后  你所有的自定義表單 都可以導出!


步驟:
1.打開 /dede/templets/diy_main.htm   大概在第49行的地方加上
<a href="../plus/diy.php?action=push&diyid={dede:field.diyid/}" target="_blank">導出</a>
意思就是加個導出按鈕。

2.打開 /plus/diy.php   在最下面加入以下代碼
else if($action == 'push')
{
  $row = $dsql->GetOne("Select * From dede_diyforms where diyid='$diyid'");
  $ds = file(('/dede/inc/fieldtype.txt'));
foreach($ds as $d){
$dds = explode(',',trim($d));
$fieldtypes[$dds[0]] = $dds[1];
}
$fieldset = $row['info'];
$dtp = new DedeTagParse();
$dtp->SetNameSpace("field","<",">");
$dtp->LoadSource($fieldset);
$titleArray=array();
$titleName=array();
if(is_array($dtp->CTags)){
foreach($dtp->CTags as $ctag)
{
$itname = $ctag->GetAtt('itemname');
if($itname=='') echo "沒指定";
$titleArray[] = $itname;
$titleName[]= $ctag->GetTagName();
}
}
header('Content-Type: application/vnd.ms-excel');
header('Content-Disposition: attachment; filename=demo.xls');
header('Pragma: no-cache');
header('Expires: 0');
$title =$titleArray;
include_once DEDEINC.'/datalistcp.class.php';
    if($diy->public == 2)
        $query = "SELECT * FROM `{$diy->table}` ORDER BY id DESC";
    else
        $query = "SELECT * FROM `{$diy->table}` WHERE ifcheck=1 ORDER BY id DESC";

    $datalist = new DataListCP();
    $datalist->pageSize = 10;
    $datalist->SetParameter('action', 'list');
    $datalist->SetParameter('diyid', $diyid);
    $datalist->SetSource($query);   
$rsArray = array();
$datalist->dsql->Execute('dlist',$datalist->sourceSql);
        $i = 0;
        while($arr=$datalist->dsql->GetArray('dlist'))
        {
        $i++;  
        $object = array();
        foreach ($titleName as $va){
        $object[]=$arr[$va];
        }
            $rsArray[$i] = $object;
           
        }
$data = $rsArray;
echo iconv('utf-8', 'gbk', implode("\t", $title)), "\n";
foreach ($data as $value) {
echo iconv('utf-8', 'gbk', implode("\t", $value)), "\n";
}
exit;
}



就OK了。


思路很簡單,先在列表頁搞個可以觸發導出的按鈕,然后把需要導出的表頭和內容查出來,然后以execle輸出就好了。
? 主站蜘蛛池模板: 延庆县| 长白| 高安市| 太谷县| 留坝县| 东平县| 轮台县| SHOW| 宝坻区| 吕梁市| 固安县| 普宁市| 淮北市| 顺昌县| 四川省| 宁远县| 福贡县| 色达县| 莎车县| 临沭县| 深水埗区| 三台县| 吐鲁番市| 额敏县| 古蔺县| 九台市| 湟源县| 威远县| 阳西县| 池州市| 锡林浩特市| 福安市| 黄山市| 凌海市| 峡江县| 大渡口区| 宁国市| 大田县| 南宫市| 城步| 龙陵县|