อันนี้เป็น โค๊ตจากเว็บ ทีดึงจาก Base ลง Excal มันมีข้อจำกัดไหมอะคับ เช่น มีไฟล์ใน Baseเยาะๆๆ อะ
อันนี้เป็น โค๊ตจากเว็บ ทีดึงจาก Base ลง Excal มันมีข้อจำกัดไหมอะคับ เช่น มีไฟล์ใน Baseเยาะๆๆ อะจะ Timeout ไหมครับ ของผมทำแล้วมัน Timeout อะ
//*** Get Document Path ***//
$strPath = realpath(basename(getenv($_SERVER["SCRIPT_NAME"]))); // C:/AppServ/www/myphp
//*** Excel Document Root ***//
$strFileName = "MyXls/MyExcel.xls";
//*** Connect to Excel.Application ***//
$xlApp = new COM("Excel.Application");
$xlBook = $xlApp->Workbooks->Add();
//*** Create Sheet 1 ***//
$xlBook->Worksheets(1)->Name = "My Customer";
$xlBook->Worksheets(1)->Select;
//*** Header ***//
$xlApp->ActiveSheet->Cells(1,1)->Value = "CustomerID";
$xlApp->ActiveSheet->Cells(1,2)->Value = "Name";
$xlApp->ActiveSheet->Cells(1,3)->Value = "Email";
$xlApp->ActiveSheet->Cells(1,4)->Value = "CountryCode";
$xlApp->ActiveSheet->Cells(1,5)->Value = "Budget";
$xlApp->ActiveSheet->Cells(1,6)->Value = "Used";
//***********//
$intRows = 2;
while($objResult = mysql_fetch_array($objQuery))
{
//*** Detail ***//
$xlApp->ActiveSheet->Cells($intRows,1)->Value = $objResult["CustomerID"];
$xlApp->ActiveSheet->Cells($intRows,2)->Value = $objResult["Name"];
$xlApp->ActiveSheet->Cells($intRows,3)->Value = $objResult["Email"];
$xlApp->ActiveSheet->Cells($intRows,4)->Value = $objResult["CountryCode"];
$xlApp->ActiveSheet->Cells($intRows,5)->Value = $objResult["Budget"];
$xlApp->ActiveSheet->Cells($intRows,6)->Value = $objResult["Used"];
$intRows++;
}
@unlink($strFileName); //*** Delete old files ***//
$xlBook->SaveAs($strPath."/".$strFileName); //*** Save to Path ***//
//$xlBook->SaveAs(realpath($strFileName)); //*** Save to Path ***//
//*** Close & Quit ***//
$xlApp->Application->Quit();
$xlApp = null;
$xlBook = null;
$xlSheet1 = null;
}
mysql_close($objConnect);
?>
Excel Created <a href="<?=$strFileName?>">Click here</a> to Download.
</body>
</html>
Tag : - - - -
Date :
2009-04-08 14:45:00
By :
sacrifices
View :
1768
Reply :
3
สงสัยจะต้องเพิ่ม Time Out น่ะครับ ผมเคยใช้ .NET ครับ สามารถทำงานได้เป็น ชม ครับ ถ้าไม่ติดปัญหาตรง Time Out ครับ
Date :
2009-04-08 15:09:49
By :
webmaster
ผมเอาขึ้น Host มันดันขึ้น แบบนี้อะคับ ช่วยทีคับ แหะๆ
Fatal error: Uncaught exception 'com_exception' with message 'Failed to create COM object `Excel.Application': Invalid syntax ' in D:\inetpub\vhosts\iamphotobook.com\httpdocs\admin\dbase.php:7 Stack trace: #0 D:\inetpub\vhosts\iamphotobook.com\httpdocs\admin\dbase.php(7): com->com('Excel.Applicati...') #1 {main} thrown in D:\inetpub\vhosts\iamphotobook.com\httpdocs\admin\dbase.php on line 7
Date :
2009-04-08 15:11:00
By :
sacrifices
Load balance : Server 05