nDh4

hasil excel

Jun 5th, 2012
115
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.86 KB | None | 0 0
  1. <?php
  2. ob_start();
  3. error_reporting(E_ALL);
  4. require_once 'baru/Classes/PHPExcel.php';
  5. // Create new PHPExcel object
  6. $objPHPExcel = new PHPExcel();
  7.  
  8. mysql_connect("localhost", "root", "root") or die(mysql_error());
  9. mysql_select_db("pln2") or die(mysql_error());
  10. //$TGL=$_POST[TGL];
  11. //echo $NM=$_POST['NM'];
  12. echo $ID_PEL=$_GET['ID_PEL'];
  13. /*echo $NO_METER=$_POST['NO_METER'];
  14. $TRIF_BR=$_POST['TRIF_BR'];
  15. $DY_BR=$_POST['DY_BR'];
  16. $GARDU=$_POST['GARDU'];
  17. $TIANG=$_POST['TIANG'];
  18. */ $unik = strtotime($_GET['TGL']." 1:0:0");
  19. $tanggal=date('Y-m-d', $unik);
  20. // $date=date('Y-m-d',strtotime($_POST['TGL']) );
  21.  
  22. $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 and b.TGL='$tanggal'";
  23. //$query="SELECT a.TGL, a.ID_PEL, a.NO_METER, a.DY_BR, a.GARDU, a.TIANG, b.NM FROM td_plg a, tm_plg b WHERE a.ID_PEL=b.ID_PEL and a.TGL = $tanggal";
  24. $hasil = mysql_query($query);
  25.  
  26. // Set properties
  27. $objPHPExcel->getProperties()->setCreator("Daud Edison Tarigan")
  28. ->setLastModifiedBy("Daud Edison Tarigan")
  29. ->setTitle("Office 2007 XLSX Test Document")
  30. ->setSubject("Office 2007 XLSX Test Document")
  31. ->setDescription("Test document for Office 2007 XLSX, generated using PHP classes.")
  32. ->setKeywords("office 2007 openxml php")
  33. ->setCategory("Test result file");
  34.  
  35.  
  36. //Add some data
  37. $objPHPExcel->setActiveSheetIndex(0)
  38. ->setCellValue('A1', 'Data Pelanggan')
  39. ->setCellValue('A2', 'Nama Tim')
  40. ->setCellValue('A3', 'Tanggal')
  41. ->setCellValue('A5', 'No')
  42. ->setCellValue('B5', 'Nama')
  43. ->setCellValue('C5', 'Id Pelanggan')
  44. ->setCellValue('D5', 'Nomor Meter')
  45. ->setCellValue('E5', 'Daya')
  46. ->setCellValue('F5', 'Gardu')
  47. ->setCellValue('G5', 'Tiang');
  48.  
  49. $rowNya = 6;
  50. $no = 0;
  51. while($row=mysql_fetch_array($hasil)){
  52. $objPHPExcel->setActiveSheetIndex(0)
  53. ->setCellValue("B2", $row['C_TIM'])
  54. ->setCellValue("B3", $tanggal);
  55. $no = $no +1;
  56. $objPHPExcel->setActiveSheetIndex(0)
  57. ->setCellValue("A$rowNya", $no)
  58. ->setCellValue("B$rowNya", $row['NM'])
  59. ->setCellValue("C$rowNya", $row['ID_PEL']." " )
  60. ->setCellValue("D$rowNya", $row['NO_METER']." ")
  61. ->setCellValue("E$rowNya", $row['DY_BR'])
  62. ->setCellValue("F$rowNya", $row['GARDU'])
  63. ->setCellValue("G$rowNya", $row['TIANG']);
  64. $rowNya = $rowNya + 1;
  65. }
  66.  
  67.  
  68. // Rename sheet
  69. $objPHPExcel->getActiveSheet()->setTitle('Simple');
  70.  
  71. // Set active sheet index to the first sheet, so Excel opens this as the first sheet
  72. $objPHPExcel->setActiveSheetIndex(0);
  73.  
  74. // Redirect output to a client’s web browser (Excel5)
  75. header('Content-Type: application/vnd.ms-excel');
  76. header('Content-Disposition: attachment;filename="database_plg.xls"');
  77. header('Cache-Control: max-age=0');
  78.  
  79. $objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, 'Excel5');
  80. $objWriter->save('php://output');
  81. exit;
  82. ?>
  83. <? ob_flush(); ?>
Advertisement
Add Comment
Please, Sign In to add comment