|
|
|
php export word คือถ้าเราต้องการผสานเซลล์ ต้องเขียนยังไงครับ |
|
|
|
|
|
|
|
จากโค๊ดข้างล่างครับ
คือถ้าเราต้องการผสานเซลล์ ต้องเขียนยังไงครับ
Code (PHP)
<html>
<head>
<title>ThaiCreate.Com PHP Word.Application Tutorial</title>
</head>
<body>
<?
$Wrd = new COM("Word.Application");
$Wrd->Application->Visible = False;
$DocName = "MyDoc/MyWord.doc";
//$strPath = realpath(basename(getenv($_SERVER["SCRIPT_NAME"]))); // C:/AppServ/www/myphp
$WrdDoc = $Wrd->Documents->Add();
$WTable = $WrdDoc->Tables->Add($Wrd->Selection->Range, 3, 3); // Colums, Rows
$WTable->Cell(1,1)->Range->Font->Name = "Times New Roman";
$WTable->Cell(1,1)->Range->Text = "ThaiCreate.Com 1";
$WTable->Cell(1,2)->Range->Font->Size = 18;
$WTable->Cell(1,2)->Range->Bold = True;
$WTable->Cell(1,2)->Range->Font->Italic = True;
$WTable->Cell(1,2)->Range->Text = "ThaiCreate.Com 2";
$WTable->Cell(2,1)->Range->ParagraphFormat->Alignment = 1; // 0= Left, 1=Center, 2=Right
$WTable->Cell(2,1)->Range->Font->Name = "Arial";
$WTable->Cell(2,1)->Range->Font->Size = 12;
$WTable->Cell(2,1)->Range->Bold = False;
$WTable->Cell(2,1)->Range->ParagraphFormat->Alignment = 2;
$WTable->Cell(3,3)->Range->Font->Name = "Times New Roman";
$WTable->Cell(3,3)->Range->Font->Size = 14;
$WTable->Cell(3,3)->Range->Bold = True;
$WTable->Cell(3,3)->Range->Font->Underline = True;
$WTable->Cell(3,3)->Range->ParagraphFormat->Alignment = 0;
$WTable->Cell(3,2)->Range->Text = "ThaiCreate.Com 3";
//$Wrd->ActiveDocument->SaveAs($strPath."/".$DocName);
$Wrd->ActiveDocument->SaveAs(realpath($DocName));
$Wrd->Application->Quit;
$Wrd = null;
?>
Word Created <a href="<?=$DocName?>">Click here</a> to Download.
</body>
</html>
ขอความกรุณาด้วยครับ
Tag : PHP, MySQL, Word (Word.Application), Windows
|
|
|
|
|
|
Date :
2012-10-05 08:15:53 |
By :
judas78 |
View :
1328 |
Reply :
1 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Load balance : Server 03
|