Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <?php
- $s='Start :'.date('H:i:s')."<hr>";
- if($_GET['stat']=='open')
- {
- /*
- xls=application/vnd.ms-excel
- xlsx=application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
- */
- $_GET['type']=='2k3'?header('Content-type:application/vnd.ms-excel'): header('Content-type:application/vnd.openxmlformats-officedocument.spreadsheetml.sheet') ;
- $_GET['type']=='2k3'?$fName='tmp/002data.xls':$fName='tmp/002data.xlsx';
- header('Content-Disposition: attachment; filename="002.xlsx"');
- $f=file_get_contents($fName);
- echo $f;
- $stop=1;
- die();
- }
- if($_GET[stat]=='go')
- {
- /* make excel */
- //die(__FILE__); C:\\php\\kerjaan4\\excel2\\n<br/>asgor002-makeExcel.php
- $type=$_GET['type'];
- error_reporting(E_ALL);
- date_default_timezone_set('Europe/London');
- require_once 'Classes/PHPExcel.php';
- // Create new PHPExcel object
- $s.= date('H:i:s') . " Create new PHPExcel object\\n<br/>";
- $objPHPExcel = new PHPExcel();
- // Set properties
- $s.= date('H:i:s') . " Set properties\\n<br/>";
- if($type=='2k3') $sType='2003 XLS';
- if($type=='2k7') $sType='2007 XLSX';
- $objPHPExcel->getProperties()->setCreator("Nasgor")
- ->setLastModifiedBy("Gunawan")
- ->setTitle("Office Test Document")
- ->setSubject("Office $sType Test Document")
- ->setDescription("Test document for Office $sType, generated using PHP classes.")
- ->setKeywords("office $sType openxml php")
- ->setCategory("Test result file");
- // Add some data
- $s.= date('H:i:s') . " Add some data\\n<br/>";
- $objPHPExcel->setActiveSheetIndex(0)
- ->setCellValue('A1', 'Hello')
- ->setCellValue('B2', 'world!')
- ->setCellValue('C1', 'Hello')
- ->setCellValue('D2', 'world!');
- $objPHPExcel->setActiveSheetIndex(0)
- ->setCellValue('A7',$sType)
- ->setCellValue('C7',date('d-m-Y'));
- //if i put in A4.. the below will erase it
- // Miscellaneous glyphs, UTF-8
- $objPHPExcel->setActiveSheetIndex(0)
- ->setCellValue('A4', 'Miscellaneous glyphs')
- ->setCellValue('A5', 'éàèùâêîôûëïüÿäöüç');
- // Rename sheet
- $s.= date('H:i:s') . " Rename sheet\\n<br/>";
- $objPHPExcel->getActiveSheet()->setTitle('Simple');
- // Set active sheet index to the first sheet, so Excel opens this as the first sheet
- $objPHPExcel->setActiveSheetIndex(0);
- // Save Excel 2007 file
- $s.= date('H:i:s') . " Write to $sType format\\n<br/>";
- if($type=='2k3') $writeAs='Excel2003';
- if($type=='2k7') $writeAs='Excel2007';
- $objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, $writeAs);
- if($type=='2k3') $objWriter->save('tmp/002data.xls');
- if($type=='2k7') $objWriter->save('tmp/002data.xlsx');
- //str_replace('.php', '.xlsx', __FILE__)
- // $s.= memory peak usage
- $s.= date('H:i:s') . " Peak memory usage: " .
- (memory_get_peak_usage(true) / 1024 / 1024) . " MB\\r\\n<br/>";
- // $s.= done
- $s.= date('H:i:s') . " Done writing file.\\r\\n<br/>";
- $s.="<a href='?stat=open&type=$type'>Open the document($sType)</a>";
- $stop=1;
- }
- if($stop==1)die($s);
- ?>
- This Script will be make an excel file (xls2k3/xls 2k7) then you can download it or open it in the browser.
- Chrome usualy download it not open in the browser<ol>
- <li><a href='?stat=go&type=2k7'>Click to continue (create xlsx)</a>
- <li><a href='?stat=go&type=2k3'>click to continue (create xls)</a> (not avaiable)
- </ol>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement