Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <?php
- error_reporting(E_ALL);
- require_once 'baru/Classes/PHPExcel.php';
- // Create new PHPExcel object
- $objPHPExcel = new PHPExcel();
- mysql_connect("localhost", "root", "root") or die(mysql_error());
- mysql_select_db("pln2") or die(mysql_error());
- $query = "SELECT a.NM, b.ID_PEL, b.NO_METER, b.DY_BR, b.GARDU, b.TIANG, b.TGL, c.C_TIM FROM tm_plg a, td_plg b, t_tim c where a.ID_PEL=b.ID_PEL and a.C_TIM=c.C_TIM and a.STATUS_KSR=0";
- $hasil = mysql_query($query);
- // Set properties
- $objPHPExcel->getProperties()->setCreator("Daud Edison Tarigan")
- ->setLastModifiedBy("Daud Edison Tarigan")
- ->setTitle("Office 2007 XLSX Test Document")
- ->setSubject("Office 2007 XLSX Test Document")
- ->setDescription("Test document for Office 2007 XLSX, generated using PHP classes.")
- ->setKeywords("office 2007 openxml php")
- ->setCategory("Test result file");
- /*
- Tulisan awal menunnjukkan Office 2k7 jgn dipaksa dibuka di 2k ato 2k3
- */
- // Add some data
- $objPHPExcel->setActiveSheetIndex(0)
- ->setCellValue('A3', 'No')
- ->setCellValue('B3', 'Nama')
- ->setCellValue('C3', 'Id Pelanggan')
- ->setCellValue('D3', 'Nomor Meter')
- ->setCellValue('E3', 'Daya')
- ->setCellValue('F3', 'Gardu')
- ->setCellValue('G3', 'Tiang');
- $rowNya = 4;
- $no = 0;
- while($row=mysql_fetch_array($hasil)){
- $no = $no +1;
- $objPHPExcel->setActiveSheetIndex(0)
- ->setCellValue("A$rowNya", $no)
- ->setCellValue("B$rowNya", $row['NM'])
- ->setCellValue("C$rowNya", $row['ID_PEL']." " )
- ->setCellValue("D$rowNya", $row['NO_METER']." " )
- ->setCellValue("E$rowNya", $row['DY_BR'])
- ->setCellValue("F$rowNya", $row['GARDU'])
- ->setCellValue("G$rowNya", $row['TIANG']);
- $rowNya++;
- $objPHPExcel->setActiveSheetIndex(0)
- ->setCellValue("A$rowNya", "Nama Tim :".$row['C_TIM'])
- ->setCellValue("B$rowNya", "Tanggal :".$row['TGL']);
- }
- // Rename sheet
- $objPHPExcel->getActiveSheet()->setTitle('Simple');
- // Set active sheet index to the first sheet, so Excel opens this as the first sheet
- $objPHPExcel->setActiveSheetIndex(0);
- /*
- Redirect output to a client’s web browser (Excel5)
- header('Content-Type: application/vnd.ms-excel');
- */
- header('Content-type:application/vnd.openxmlformats-officedocument.spreadsheetml.sheet') ;
- header('Content-Disposition: attachment;filename="database_plg.xlsx"');
- header('Cache-Control: max-age=0');
- $objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, 'Excel5');
- $objWriter->save('php://output');
- exit;
- ?>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement