nDh4

Untitled

May 29th, 2012
61
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.19 KB | None | 0 0
  1. <?php
  2. error_reporting(E_ALL);
  3. require_once 'baru/Classes/PHPExcel.php';
  4. // Create new PHPExcel object
  5. $objPHPExcel = new PHPExcel();
  6.  
  7. mysql_connect("localhost", "root", "root") or die(mysql_error());
  8. mysql_select_db("pln2") or die(mysql_error());
  9. $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";
  10. $hasil = mysql_query($query);
  11.  
  12. // Set properties
  13. $objPHPExcel->getProperties()->setCreator("Daud Edison Tarigan")
  14. ->setLastModifiedBy("Daud Edison Tarigan")
  15. ->setTitle("Office 2007 XLSX Test Document")
  16. ->setSubject("Office 2007 XLSX Test Document")
  17. ->setDescription("Test document for Office 2007 XLSX, generated using PHP classes.")
  18. ->setKeywords("office 2007 openxml php")
  19. ->setCategory("Test result file");
  20.  
  21.  
  22. // Add some data
  23. $objPHPExcel->setActiveSheetIndex(0)
  24. ->setCellValue('A3', 'No')
  25. ->setCellValue('B3', 'Nama')
  26. ->setCellValue('C3', 'Id Pelanggan')
  27. ->setCellValue('D3', 'Nomor Meter')
  28. ->setCellValue('E3', 'Daya')
  29. ->setCellValue('F3', 'Gardu')
  30. ->setCellValue('G3', 'Tiang');
  31.  
  32. $rowNya = 4;
  33. $no = 0;
  34. while($row=mysql_fetch_array($hasil)){
  35. $no = $no +1;
  36. $objPHPExcel->setActiveSheetIndex(0)
  37. ->setCellValue("A$rowNya", "Nama Tim :".$row['C_TIM'])
  38. ->setCellValue("B$rowNya", "Tanggal :".$row['TGL'])
  39. ->setCellValue("A$rowNya", $no)
  40. ->setCellValue("B$rowNya", $row['NM'])
  41. ->setCellValue("C$rowNya", '""'.$row['ID_PEL'] )
  42. ->setCellValue("D$rowNya", '""'.$row['NO_METER'])
  43. ->setCellValue("E$rowNya", $row['DY_BR'])
  44. ->setCellValue("F$rowNya", $row['GARDU'])
  45. ->setCellValue("G$rowNya", $row['TIANG']);
  46. $rowNya = $rowNya + 1;
  47. }
  48.  
  49. // Rename sheet
  50. $objPHPExcel->getActiveSheet()->setTitle('Simple');
  51.  
  52. // Set active sheet index to the first sheet, so Excel opens this as the first sheet
  53. $objPHPExcel->setActiveSheetIndex(0);
  54.  
  55. // Redirect output to a client’s web browser (Excel5)
  56. header('Content-Type: application/vnd.ms-excel');
  57. header('Content-Disposition: attachment;filename="database_plg.xls"');
  58. header('Cache-Control: max-age=0');
  59.  
  60. $objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, 'Excel5');
  61. $objWriter->save('php://output');
  62. exit;
  63. ?>
Advertisement
Add Comment
Please, Sign In to add comment