修改2个文件,让织梦自定义表单自由导出到Excel表格里。
修改教程如下:
1、\dede\templets\diy_main.htm 找到
- 前台预览</a>
在它的下面加入一行
- | <a href="diy_list.php?action=excel&diyid={dede:field.diyid/}" target="_blank">导出表单Excel</a>
2、\dede\diy_list.php 找到
- array('post', 'list', 'edit', 'check'#p#分页标题#e#, 'delete'))
改成
- array('post', 'list', 'edit', 'check', 'delete', 'excel'))
- else
- {
- showmsg('未定义操作', "-1");
- }
在它的上面加入
- else if($action == 'excel')
- {
- header("Content-type:application/vnd.ms-excel");
- header("Content-Disposition:attachment;filename={$diy->name}_".date("Y-m-d").".xls"#p#分页标题#e#);
- $fieldlist = $diy->getFieldList();
- echo "<table><tr>";
- foreach($fieldlist as $field=>$fielddata)
- {
- echo "<th>{$fielddata[0]}</th>";
- }
- echo "<th>状态</th>";
- echo "</tr>";
- $sql = "SELECT * FROM {$diy->table} ORDER BY id DESC";
- $dsql->SetQuery($sql);
- $dsql->Execute('t');
- while($arr = $dsql->GetArray('t'))
- {
- echo#p#分页标题#e# "<tr>";
- foreach($fieldlist as $key => $field)
- {
- echo "<td>".$arr[$key]."</td>";
- }
- status = $arr['ifcheck'] == 1 ? '已审核' : '未审核';
- echo "<td>".$status."</td>";
- echo "</tr>";
- }
- echo "</table>";
- }
转载请注明:DEDEcms» dedecms织梦自定义表单导出到excel
标签: