php 產生 匯出word(可包含圖片)的程式碼

WBOY
發布: 2016-07-25 09:04:06
原創
1192 人瀏覽過
  1. /**************************************************** **** ********************

  2. 課程:Mht File Maker
  3. 版本:1.2 beta
  4. 連結:bbs.it-home. org
  5. 作者: Wudi
  6. 描述:該類別可以製作.mht檔。
  7. ************************ ***************************** ****************************/
  8. 類別 MhtFileMaker{

  9. var $config = array();
  10. var $headers = array();
  11. var $headers_exists = array();
  12. var $files = array();
  13. var $boundary;
  14. var $dir_base;
  15. var $page_first;
  16. function MhtFile($config = array()){

  17. }
  18. function SetHeader($header){

  19. $this->headers[] = $header;
  20. $key = strtolower(substr($header, 0, strpos($header, ':') ));
  21. $this->headers_exists[$key] = TRUE;
  22. }
  23. function SetFrom($ from){

  24. $this->SetHeader("來自:$from");
  25. }
  26. function SetSubject($subject){

  27. $this->SetHeader("主題:$subject");
  28. } p>
  29. function SetDate($date = NULL, $isttimestamp = FALSE){

  30. if ($date == NULL) {
  31. $date = time();
  32. }
  33. if ($istimestamp == TRUE) {
  34. $date = date('D, d M Y H:i:s O', $date);
  35. }
  36. $this->SetHeader("日期: $date");
  37. }
  38. function SetBoundary($boundary = NULL) {

  39. if ($boundary == NULL) {
  40. $this->boundary = ' --' 。 strtoupper(md5(mt_rand())) 。 >

    function SetBaseDir($dir){

  41. $this->dir_base = str_replace("", "/", realpath($dir));
  42. }
  43. function SetFirstPage($filename){

  44. $this->page_first = str_replace("", "/", realpath("{$this->dir_base}/$filename"));
  45. }
  46. function AutoAddFiles(){

  47. if (!isset($this->page_first)) {
  48. exit ('不設定第一頁。');
  49. }
  50. $$ filepath = str_replace ($this->dir_base, '', $this->page_first);
  51. $filepath = 'http://mhtfile' 。 page_first, $filepath, NULL);
  52. $this->AddDir($this->dir_base);
  53. }
  54. function AddDir($dir){

  55. $handle_dir = opendir($dir);
  56. while ($filename = readdir($handle_dir)) {
  57. if (( $filename!='.') && ($filename!='..') && (" $dir/$filename"!=$this->page_first)) {
  58. if (is_dir("$dir/ $filename")) {
  59. $this->AddDir("$dir/$filename") ;
  60. } elseif (is_file("$dir/$filename")) {
  61. $filepath = str_replace ($this->dir_base, '', "$dir/$filename");
  62. $filepath = 'http://mhtfile' 。 closedir($handle_dir);
  63. }
  64. function AddFile($filename, $filepath = NULL, $encoding = NULL){

  65. if ($filepath == NULL) {
  66. $filepath = $檔名;
  67. }
  68. $mimetype = $this->GetMimeType($filename);
  69. $filecont = file_get_contents($filename);
  70. $this->AddContents( $filepath, $mimetype , $filecont, $encoding);
  71. }
  72. function AddContents($filepath, $mimetype, $filecont, $encoding = NULL){

  73. if ( $encoding == NULL) {
  74. $filecont = chunk_split(base64_encode($filecont), 76);
  75. $encoding = 'base64';
  76. }
  77. $this->files[] = array (' filepath' => $filepath,
  78. 'mimetype' => $mimetype,
  79. 'filecont' => $filecont,
  80. 'encoding' => $encoding);
  81. }
  82. function CheckHeaders(){

  83. if (!array_key_exists('date', $this->headers_exists)) {
  84. $this->SetDate(NULL, TRUE) );
  85. }
  86. if ($this->boundary == NULL) {
  87. $this->SetBoundary();
  88. }
  89. }
  90. function CheckFiles() {

  91. if (count($this->files) == 0) {
  92. 回傳FALSE;
  93. } else {
  94. 回傳TRUE;
  95. }
  96. }
  97. function GetFile(){

  98. $this->CheckHeaders();
  99. if (!$this->CheckFiles()) {
  100. exit ('沒有新增檔案。');
  101. }
  102. $contents = implode("rn", $this->headers);
  103. $contents .= "rn";
  104. $contents .= "MIME 版本:1.0rn";
  105. $contents .= "內容類型:多部分/相關;rn";
  106. $contents .= "tboundary="{$this->;邊界}";rn";
  107. $contents .= "ttype="" . $this->files[0]['mimetype'] . ""rn";
  108. $contents .= "X-MimeOLE:由Mht File Maker v1.0 betan 製作";
  109. $contents .= "rn";
  110. $contents .= "這是一條MIME 格式的多部分訊息.rn";
  111. $contents . = " rn";
  112. foreach ($this->files as $file) {
  113. $contents .= "--{$this->boundary}rn";
  114. $contents .= "內容類型:$ file[mimetype]rn";
  115. $contents .= "內容傳輸編碼:$file[encoding]rn";
  116. $contents .= "內容位置:$file[檔案路徑]rn";
  117. $contents .= "rn";
  118. $contents .= $file['filecont'];
  119. $contents .= "rn";
  120. }
  121. $contents .= "--{$ this->boundary}--rn";
  122. return $contents;
  123. }
  124. function MakeFile($filename){

  125. $contents = $this->GetFile( );
  126. $fp = fopen($filename, 'w');
  127. fwrite($fp, $contents);
  128. fclose($fp);
  129. }
  130. function GetMimeType($filename){

  131. $pathinfo = pathinfo($filename);
  132. switch ($pathinfo['extension']) {
  133. case 'htm': $mimetype = 'text/ html'; Break;
  134. case 'html': $mimetype = 'text/html'; Break;
  135. case 'txt': $mimetype = 'text/plain'; Break;
  136. case 'cgi' : $mimetype = 'text/plain'; Break;
  137. case 'php': $mimetype = 'text/plain'; Break;
  138. case 'css': $mimetype = 'text/css'; Break;
  139. case 'jpg': $mimetype = 'image/jpeg'; Break;
  140. case 'jpeg': $mimetype = 'image/jpeg'; Break;
  141. case 'jpe': $mimetype = ' image/jpeg'; Break;
  142. case 'gif': $mimetype = 'image/gif'; Break;
  143. case 'png': $mimetype = 'image/png';中斷;
  144. 預設: $mimetype = 'application/octet-stream'; Break;
  145. }
  146. return $mimetype;
  147. }
  148. }
  149. ?>
複製程式碼

2、匯出word檔exportdoc.php

  1. /**

  2. * 根據html程式碼取得word文檔內容
  3. * 建立一個本質為mht的文檔,該函數會分析文件內容並從遠端下載頁面中的圖片資源
  4. * 此函數依賴類別MhtFileMaker
  5. * 函數會分析img標籤,提取src的屬性值。但是,src的屬性值必須被引號包圍,否則不能提取
  6. *
  7. * @param string $content HTML內容
  8. * @param string $absolutePath 網頁的絕對路徑。如果HTML內容裡的圖片路徑是相對路徑,那麼就需要填入這個參數,讓函數自動填入絕對路徑。這個參數最後需要以/結束
  9. * @param bool $isEraseLink 是否去掉HTML內容中的連結
  10. */
  11. include_once("docclass." );
  12. function getWordDocument( $content , $absolutePath = "" , $isEraseLink = true )
  13. {
  14. $mht = new MhtFileMaker();
  15. if ($isEraseLink))(s*.*?s*)/i' , '$1' , $content); // 去掉連結
  16. $images = array();

  17. $files = array();
  18. $matches = array();
  19. //這個演算法要求src後的屬性值必須用引號括起來
  20. if ( preg_match_all('/php 產生 匯出word(可包含圖片)的程式碼/i',$content ,$matches ) )
  21. {
  22. $arrPath = $matches[1];
  23. for ( $i=0;$i{
  24. $path = $ arrPath[$i];
  25. $imgPath = trim( $path );
  26. if ( $imgPath != "" )
  27. {
  28. $files[] = $imgPath;
  29. if( substr($imgPath,0,7) == 'http://')
  30. {
  31. //絕對鏈接,不加海外
  32. }
  33. 其他
  34. {
  35. $imgPath = $absolutePath.$imgPath;
  36. }
  37. $images[] = $imgPath;
  38. }
  39. }
  40. }
  41. $mht->AddContents("tmp.html",$$ mht->GetMimeType("tmp.html"),$content);
  42. for ( $ i=0;$i{

  43. $image = $images[$i];
  44. if ( @fopen($image , 'r') )
  45. {
  46. $imgcontent = @file_get_contents( $image );
  47. if ($imgcontent = @file_get_contents( $image );
  48. if ($imgcontent = @file_get_contents( $image );
  49. if ($imgcontent = @file_get_contents( $image );
  50. if ($imgcontent = @file_get_contents( $image );
  51. if ($imgcontent = @file_get_contents( $image );
  52. if ($imgcontent = @file_get_contents( $image );
  53. if ($imgcontent = @file_get_contents( $image );
  54. if( $content )
  55. $mht->AddContents($files[$i],$mht->GetMimeType($image) ),$imgcontent);
  56. }
  57. else
  58. {
  59. echocho "文件:".$image."不存在!
    ";
  60. }
  61. }
  62. return $mht->GetFile();

  63. }
  64. $content=implode("",file( "http://bbs.it-home. org/print.php?id=3548"));
$fileContent = getWordDocument($content,".");
$fp = fopen("hugesky_word .doc", 'w');fwrite($fp, $fileContent);fclose($fp);
?>
複製程式碼


來源:php.cn
本網站聲明
本文內容由網友自願投稿,版權歸原作者所有。本站不承擔相應的法律責任。如發現涉嫌抄襲或侵權的內容,請聯絡admin@php.cn
熱門教學
更多>
最新下載
更多>
網站特效
網站源碼
網站素材
前端模板
關於我們 免責聲明 Sitemap
PHP中文網:公益線上PHP培訓,幫助PHP學習者快速成長!