Title:
using chatGPT develop - php export，合计编写了28个版本
[Print this page]
Author:
sky999
Time:
2023-5-23 18:08
Title:
using chatGPT develop - php export，合计编写了28个版本
最终取第28号版本进行了编辑与修改。内容就寄放如下。 connect_error) { die("连接失败: " . $conn->connect_error); } // 计算出30天前的日期 $thirtyDaysAgo = date('Y-m-d', strtotime('-30 days')); $sql = "SELECT p.author, p.pid, p.tid, p.dateline, p.message FROM dz41_posts AS p INNER JOIN dz41_threads AS t ON p.tid = t.tid AND p.author = t.author WHERE t.typeid=12 AND p.dateline >= '{$thirtyDaysAgo}' ORDER BY p.author ASC, p.dateline ASC"; $result = $conn->query($sql); // 创建一个新的 Excel 文件 $objPHPExcel = new PHPExcel(); // 设置文件属性 $objPHPExcel->getProperties() ->setCreator("Your Name") ->setLastModifiedBy("Your Name") ->setTitle("MySQL Export") ->setSubject("MySQL Export") ->setDescription("MySQL Export"); $rowIndex = 2; $currentAuthor = null; // 添加标题行 $objPHPExcel->getActiveSheet()->setCellValue('A1', 'pid'); $objPHPExcel->getActiveSheet()->setCellValue('B1', '版面'); $objPHPExcel->getActiveSheet()->setCellValue('C1', '星期'); // 添加星期几标题 $objPHPExcel->getActiveSheet()->setCellValue('D1', '时间'); $objPHPExcel->getActiveSheet()->setCellValue('E1', '内容'); $objPHPExcel->getActiveSheet()->setCellValue('F1', '备注'); if ($result && mysqli_num_rows($result) > 0) { while($row = $result->fetch_assoc()) { $author = $row["author"]; // 当作者发生变化时，添加新的一行表示该作者的信息 if ($author != $currentAuthor) { $objPHPExcel->getActiveSheet()->setCellValue('A' . $rowIndex, "Author: " . $author); $rowIndex++; $currentAuthor = $author; } // 将值写入当前工作表 $dateTime = date('Y-m-d H:i:s', $row["dateline"]); $weekday = date('N', strtotime($dateTime)); // 获取星期几 $objPHPExcel->getActiveSheet()->setCellValue('A' . $rowIndex, $row["pid"]); $objPHPExcel->getActiveSheet()->setCellValue('B' . $rowIndex, $row["tid"]); $objPHPExcel->getActiveSheet()->setCellValue('C' . $rowIndex, $weekday); // 写入星期几 $objPHPExcel->getActiveSheet()->setCellValue('D' . $rowIndex, $dateTime); $objPHPExcel->getActiveSheet()->setCellValue('E' . $rowIndex, $row["message"]); $rowIndex++; } } // 设置列宽自适应 $objPHPExcel->getActiveSheet()->getColumnDimension('E')->setAutoSize(true); // 设置 HTTP 头信息，输出 Excel 文件 header('Content-Type: application/vnd.ms-excel'); header('Content-Disposition: attachment;filename="mysql_export.xls"'); header('Cache-Control: max-age=0'); $objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, 'Excel5'); $objWriter->save('php://output'); ?> [
本帖最后由 sky999 于 2023-5-23 18:19 编辑
]
Welcome AbyssalSwamp (http://service.caffz.com:12345/mud/AbyssalSwamp/index/)
caffz.com
