[Sommaire] [Imprimer]

   1  <?php
   2  
   3  /*
   4   * Copyleft 2002 Johann Hanne
   5   *
   6   * This is free software; you can redistribute it and/or
   7   * modify it under the terms of the GNU Lesser General Public
   8   * License as published by the Free Software Foundation; either
   9   * version 2.1 of the License, or (at your option) any later version.
  10   *
  11   * This software is distributed in the hope that it will be useful,
  12   * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14   * Lesser General Public License for more details.
  15   *
  16   * You should have received a copy of the GNU Lesser General Public
  17   * License along with this software; if not, write to the
  18   * Free Software Foundation, Inc., 59 Temple Place,
  19   * Suite 330, Boston, MA  02111-1307 USA
  20   */
  21  
  22  /*
  23   * This is the Spreadsheet::WriteExcel Perl package ported to PHP
  24   * Spreadsheet::WriteExcel was written by John McNamara, jmcnamara@cpan.org
  25   */
  26  
  27  require_once  "class.writeexcel_workbook.inc.php";
  28  require_once "class.ole_pps_root.php";
  29  require_once "class.ole_pps_file.php";
  30  
  31  class writeexcel_workbookbig extends writeexcel_workbook {
  32  
  33      function writeexcel_workbookbig($filename) {
  34          $this->writeexcel_workbook($filename);
  35      }
  36  
  37      function _store_OLE_file() {
  38          $file=new ole_pps_file(asc2ucs("Book"));
  39          $file->append($this->_data);
  40  
  41          for ($c=0;$c<sizeof($this->_worksheets);$c++) {
  42              $worksheet=&$this->_worksheets[$c];
  43              while ($data=$worksheet->get_data()) {
  44                  $file->append($data);
  45              }
  46          }
  47  
  48          $ole=new ole_pps_root(false, false, array($file));
  49          $ole->save($this->_filename);
  50      }
  51  
  52  }
  53  
  54  ?>