Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <?php
- ob_start();
- error_reporting(E_ALL);
- /*
- require_once 'baru/Classes/PHPExcel.php';
- // Create new PHPExcel object
- $objPHPExcel = new PHPExcel();
- */
- mysql_connect("localhost", "root", "") or die(mysql_error());
- mysql_select_db("work_fb2") or die(mysql_error());
- @isset($_GET['ID_PEL'])?$ID_PEL=$_GET['ID_PEL']:$ID_PEL=0;
- echo $ID_PEL;//=$_GET['ID_PEL'];
- @isset($_GET['TGL'])?$unik = strtotime($_GET['TGL']." 1:0:0") :$unik=0;
- $tanggal=date('Y-m-d', $unik);
- $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'";
- $hasil = mysql_query($query)or die($query."<br>".mysql_error());
- /*
- header dari excel
- // 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");
- */
- $a=array();
- //Add some data
- /*
- $objPHPExcel->setActiveSheetIndex(0)
- ->setCellValue('A1', 'Data Pelanggan')
- ->setCellValue('A2', 'Nama Tim')
- ->setCellValue('A3', 'Tanggal')
- ->setCellValue('A5', 'No')
- ->setCellValue('B5', 'Nama')
- ->setCellValue('C5', 'Id Pelanggan')
- ->setCellValue('D5', 'Nomor Meter')
- ->setCellValue('E5', 'Daya')
- ->setCellValue('F5', 'Gardu')
- ->setCellValue('G5', 'Tiang');
- HEADER TULISAN!!
- */
- $a[5]=array('Data Pelanggan',
- 'Nama Tim'
- , 'Tanggal'
- , 'No'
- , 'Nama'
- , 'Id Pelanggan'
- , 'Nomor Meter'
- , 'Daya',
- 'Gardu',
- 'Tiang'
- );
- $rowNya = 6;
- $no = 0;$i2=0;
- while($row=mysql_fetch_array($hasil)){
- /*
- $objPHPExcel->setActiveSheetIndex(0)
- ->setCellValue("B2", $row['C_TIM'])
- ->setCellValue("B3", $tanggal);
- tulisan keterangan
- */
- if($no==0)
- $a[2]=array(1=>$row['C_TIM'],$tanggal);
- $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']);
- */
- $i2=$no+5; $a[$i2]=array( $no
- , $row['NM']
- , $row['ID_PEL']." "
- , $row['NO_METER']." "
- , $row['DY_BR']
- , $row['GARDU']
- ,$row['TIANG']
- );
- $rowNya = $rowNya + 1;
- }
- /*
- // 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-Disposition: attachment;filename="database_plg.xls"');
- header('Cache-Control: max-age=0');
- $objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, 'Excel5');
- $objWriter->save('php://output');
- */
- $s='<table border=0>';
- for($i=0;$i<$i2;$i++)
- {
- $s.="\n<tr>";
- for($j=0;$j<7;$j++){
- @is_null($a[$i][$j])?$s.="\n\t<td> </td>":$s.="\n\t<td>".$a[$i][$j]."</td>";
- }
- $s.="\n</tr>";
- }
- $s.='</table>';
- echo ($s);
- ?>
- <? ob_flush(); ?>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement