Первая копия
This commit is contained in:
@@ -0,0 +1,196 @@
|
||||
<?php
|
||||
/****************************************************************
|
||||
* Script : PHP ñêðèïò ôîðìèðîâàíèÿ îò÷åòîâ â Excell ôàéë
|
||||
* Author : LiO <lio@lio.kz>
|
||||
* Version : 0.1
|
||||
* Copyright : GNU LGPL
|
||||
* URL : http://lio.kz
|
||||
* Last modified : 08.07.2004
|
||||
* Description : Îáúåêò ôîðìèðîâàíèÿ xls ôàéëà. Ôàéë ìîæåò áûòü
|
||||
* ñîõðàíåí ôèçè÷åñêè íà äèñê äëÿ äàëüíåéøåé ðàáîòû (ïåðåäà÷à,
|
||||
* îòïðàâêà íà e-mail è ò.ä.). Òàê æå ìîæíî ñðàçó "ïîêàçàòü" ñòðóêòóðó
|
||||
* Äàííûé ñêðèïò ïîääåðæèâàåò ôîðìàò Excell 5, ñ îãðàíè÷åíèÿìè -
|
||||
* íå áîëåå 255 ñòîëáöîâ, è 65535 ñòðîê.
|
||||
*
|
||||
* Îòëå÷èñòåëüíûå îñîáåííîñòè îò äðóãèõ ñêðèïòîâ
|
||||
* 1. Ôîðìèðîâàíèÿ àòðèáóòîâ ÿ÷ååê (îáðàìëåíèå)
|
||||
* 2. Îòäåëüíàÿ çàïèñü öåëûõ ÷èñåë è âåùåñòâåííûõ
|
||||
* 3. Êîððåêòèðîâêà ñòèëåé øðèôòîâ è ðàçìåðà
|
||||
******************************************************************/
|
||||
|
||||
|
||||
class PhpToExcell {
|
||||
var $data = ""; // äàííûå ñòðóêòóðû
|
||||
|
||||
// ôîðìèðîâàíèÿ çàãîëîâêà îòêðûòèÿ
|
||||
function ExBOF()
|
||||
{
|
||||
// begin of the excel file header
|
||||
$this->data = pack("c*", 0x09, 0x00, 0x04, 0x00, 0x02, 0x00, 0x10, 0x0);
|
||||
}
|
||||
|
||||
// ôîðìèðîâàíèÿ çàãîëîâêà çàêðûòèÿ
|
||||
function ExEOF()
|
||||
{
|
||||
$this->data .= pack("cc", 0x0A, 0x00);
|
||||
}
|
||||
|
||||
// Ïåðåâîäèò â ñòðîêó attr1..3
|
||||
function RowAttr($attr1,$attr2,$attr3)
|
||||
{
|
||||
return chr($attr1).chr($attr2).chr($attr3);
|
||||
}
|
||||
|
||||
// óñòàíàâëèâàåò ðóññêèé ÿçûê â ñòðóêòóðà xls
|
||||
function Rus()
|
||||
{
|
||||
$this->data .= (chr(0x42).chr(0x00).chr(0x02).chr(0x00).chr(0x01).chr(0x80));
|
||||
}
|
||||
|
||||
// çàïèñü ñòðîêè
|
||||
// Col,Row - êîëîíêà è ñòðîêà
|
||||
// attr1 - àòðèáóò ïîêàçà ÿ÷åéêè è çàùèòà îò çàïèñè
|
||||
// attr2 - ðàçìåð øðèôòà
|
||||
// attr3 - îáðàìëåíèå ÿ÷åéêè
|
||||
// äëÿ ôîðìèðîâàíèÿ àòðèáóòîâ èñïîëüçóéòå ñîîòâåñòâóþùèå ôóíêöèè
|
||||
function WriteLabel($Col,$Row,$attr1=0,$attr2=0,$attr3=0,$value) // { Çàïèñü String }
|
||||
{
|
||||
$i=strlen($value);
|
||||
$this->data .= pack("v*",0x04,8+$i,$Col,$Row);
|
||||
$this->data .= $this->RowAttr($attr1,$attr2,$attr3);
|
||||
$this->data .= pack("c",$i);
|
||||
$this->data .= $value;
|
||||
}
|
||||
|
||||
// óñòàíîâêà øèðèíû êîëîíêè Width*1/256
|
||||
// 3000 - 100% }
|
||||
function ColWidth($ColFirst,$ColLast,$Width)
|
||||
{
|
||||
$this->data .= (CHR(0x24).CHR(00).Chr(04).CHR(00).chr($ColFirst).chr($ColLast).pack('s',$Width));
|
||||
}
|
||||
|
||||
// Óïðàâëÿåò âèäîì êîëîíîê è ñòðîê ïðè
|
||||
// ReferenceMode=1 Ñòèëü ññûëîê = R1C1
|
||||
// ReferenceMode=0 Ñòèëü ññûëîê ñòàíäàðòíûé A1...
|
||||
function RefMode($ReferenceMode=1)
|
||||
{
|
||||
if ($ReferenceMode==1)
|
||||
{
|
||||
$this->data .= (CHR(0x0f).chr(0x00).chr(2).chr(0x00).chr(0x00).chr(0x00));
|
||||
} else
|
||||
{
|
||||
$this->data .= (CHR(0x0f).chr(0x00).chr(2).chr(0x00).chr(0x00).chr(0x01));
|
||||
}
|
||||
}
|
||||
|
||||
// çàïèñü öåëîãî ÷èñëà
|
||||
function WriteInteger($Col,$Row,$attr1,$attr2,$attr3,$value=0)
|
||||
{
|
||||
$this->data.=pack("v*",0x02,0x09,$Col,$Row);
|
||||
$this->data.=$this->RowAttr($attr1,$attr2,$attr3);
|
||||
$this->data.=pack("v",$value);
|
||||
}
|
||||
|
||||
// çàïèñü äðîáíîãî ÷èñëà
|
||||
function WriteNumber($Col,$Row,$attr1,$attr2,$attr3,$value=0.00)
|
||||
{
|
||||
$this->data.=pack("v*",0x03,0x0F,$Col,$Row);
|
||||
$this->data.=$this->RowAttr($attr1,$attr2,$attr3);
|
||||
$this->data.=pack("d",$value);
|
||||
|
||||
}
|
||||
// çàïèñü ïóñòîé ÿ÷åéêè
|
||||
function WriteBlank($Col,$Row,$attr1,$attr2,$attr3)
|
||||
{
|
||||
$this->data.=pack("v*",0x01,0x07,$Col,$Row);
|
||||
$this->data.=$this->RowAttr($attr1,$attr2,$attr3);
|
||||
}
|
||||
|
||||
// Óñòàíîâêà øðèôòà. Height*1/20
|
||||
// Äëÿ 10 ïóíêòîâ Height = 200 }
|
||||
function Font($Height,$Bold=0,$Italic=0,$Underline=0,$StrikeOut=0,$FontName)
|
||||
{
|
||||
$i=strlen($FontName);
|
||||
$this->data.=CHR(0x31).chr(0x00).Chr($i+5).chr(0x00);
|
||||
$this->data.=pack("v",$Height);
|
||||
$k=0;
|
||||
if ($Bold==1) $k=$k|1;
|
||||
if ($Italic==1) $k=$k|2;
|
||||
if ($Underline==1) $k=$k|4;
|
||||
if ($StrikeOut==1) $k=$k|8;
|
||||
$this->data.=pack("v",$k);
|
||||
$this->data.=chr($i);
|
||||
$this->data.=$FontName;
|
||||
}
|
||||
|
||||
// Ôîðìèðóåì àòòðèáóò ¹1 ($Attr1)
|
||||
// $CellHidden - ñêðûòü ôîðìóëû
|
||||
// $CellLocked - çàùèùåííàÿ ÿ÷åéêà
|
||||
function Attr1($CellHidden=0,$CellLocked=0)
|
||||
{
|
||||
$r=0x0;
|
||||
if ($CellHidden==1)$r=$r|128;
|
||||
if ($CellLocked==1)$r=$r|64;
|
||||
return $r;
|
||||
}
|
||||
|
||||
// Ôîðìèðóåì àòòðèáóò ¹2 ($Attr2)
|
||||
// $FontNumber 0..3
|
||||
function Attr2($FontNumber=0)
|
||||
{
|
||||
$r=0;
|
||||
switch ($FontNumber)
|
||||
{
|
||||
case 1:
|
||||
$r=64;
|
||||
break;
|
||||
case 2:
|
||||
$r=128;
|
||||
break;
|
||||
case 3:
|
||||
$r=129;
|
||||
break;
|
||||
}
|
||||
return $r;
|
||||
}
|
||||
|
||||
// Ôîðìèðóåì àòòðèáóò ¹3 ($Attr3)
|
||||
// Alignment 0 - General
|
||||
// 1 - left
|
||||
// 2 - center
|
||||
// 3 - Right
|
||||
// 4 - Fill
|
||||
function Attr3($Shaded=0,$BottomBorder=0,$TopBorder=0,$RightBorder=0,$LeftBorder=0,$Alignment=0)
|
||||
{
|
||||
$r=0;
|
||||
if ($Shaded==1) $r=$r|128;
|
||||
if ($BottomBorder==1) $r=$r|64;
|
||||
if ($TopBorder==1) $r=$r|32;
|
||||
if ($RightBorder==1) $r=$r|16;
|
||||
if ($LeftBorder==1) $r= $r|8;
|
||||
if ($Alignment<8) $r=$r|$Alignment;
|
||||
return $r;
|
||||
}
|
||||
|
||||
// ñîõðàíåíèå äàííûõ â xls ôàéë
|
||||
function SaveToFileXls($FName='file.xls')
|
||||
{
|
||||
$fp = fopen( $FName, "wb" );
|
||||
fwrite( $fp,$this->data);
|
||||
fclose( $fp );
|
||||
}
|
||||
|
||||
// ïîêàçàòü ñòðóêòóðó â web
|
||||
function SendFileToHTTP($FName='file.xls')
|
||||
{
|
||||
header ( "Expires: Mon, 1 Apr 1974 05:00:00 GMT" );
|
||||
header ( "Last-Modified: " . gmdate("D,d M YH:i:s") . " GMT" );
|
||||
header ( "Cache-Control: no-cache, must-revalidate" );
|
||||
header ( "Pragma: no-cache" );
|
||||
header ( "Content-type: application/x-msexcel" );
|
||||
header ( "Content-Disposition: attachment; filename=".$FName );
|
||||
print $this->data;
|
||||
}
|
||||
}
|
||||
|
||||
?>
|
||||
Reference in New Issue
Block a user