php生成导出word(可包含图片)的代码

3. /***********************************************************************

4. Class: Mht File Maker
5. Version: 1.2 beta
6. Link：bbs.it-home.org
7. Author: Wudi
8. Description: The class can make .mht file.
9. ***********************************************************************/

10. class MhtFileMaker{

11. var $config = array();
12. var $headers = array();
13. var $headers_exists = array();
14. var $files = array();
15. var $boundary;
16. var $dir_base;
17. var $page_first;

18. function MhtFile($config = array()){

19. }

20. function SetHeader($header){

21. $this->headers[] = $header;
22. $key = strtolower(substr($header, 0, strpos($header, ':')));
23. $this->headers_exists[$key] = TRUE;
24. }

25. function SetFrom($from){

26. $this->SetHeader("From: $from");
27. }

28. function SetSubject($subject){

29. $this->SetHeader("Subject: $subject");
30. }

31. function SetDate($date = NULL, $istimestamp = FALSE){

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

40. function SetBoundary($boundary = NULL){

41. if ($boundary == NULL) {
42. $this->boundary = '--' . strtoupper(md5(mt_rand())) . '_MULTIPART_MIXED';
43. } else {
44. $this->boundary = $boundary;
45. }
46. }

47. function SetBaseDir($dir){

48. $this->dir_base = str_replace("\", "/", realpath($dir));
49. }

50. function SetFirstPage($filename){

51. $this->page_first = str_replace("\", "/", realpath("{$this->dir_base}/$filename"));
52. }

53. function AutoAddFiles(){

54. if (!isset($this->page_first)) {
55. exit ('Not set the first page.');
56. }
57. $filepath = str_replace($this->dir_base, '', $this->page_first);
58. $filepath = 'http://mhtfile' . $filepath;
59. $this->AddFile($this->page_first, $filepath, NULL);
60. $this->AddDir($this->dir_base);
61. }

62. function AddDir($dir){

63. $handle_dir = opendir($dir);
64. while ($filename = readdir($handle_dir)) {
65. if (($filename!='.') && ($filename!='..') && ("$dir/$filename"!=$this->page_first)) {
66. if (is_dir("$dir/$filename")) {
67. $this->AddDir("$dir/$filename");
68. } elseif (is_file("$dir/$filename")) {
69. $filepath = str_replace($this->dir_base, '', "$dir/$filename");
70. $filepath = 'http://mhtfile' . $filepath;
71. $this->AddFile("$dir/$filename", $filepath, NULL);
72. }
73. }
74. }
75. closedir($handle_dir);
76. }

77. function AddFile($filename, $filepath = NULL, $encoding = NULL){

78. if ($filepath == NULL) {
79. $filepath = $filename;
80. }
81. $mimetype = $this->GetMimeType($filename);
82. $filecont = file_get_contents($filename);
83. $this->AddContents($filepath, $mimetype, $filecont, $encoding);
84. }

85. function AddContents($filepath, $mimetype, $filecont, $encoding = NULL){

86. if ($encoding == NULL) {
87. $filecont = chunk_split(base64_encode($filecont), 76);
88. $encoding = 'base64';
89. }
90. $this->files[] = array('filepath' => $filepath,
91. 'mimetype' => $mimetype,
92. 'filecont' => $filecont,
93. 'encoding' => $encoding);
94. }

95. function CheckHeaders(){

96. if (!array_key_exists('date', $this->headers_exists)) {
97. $this->SetDate(NULL, TRUE);
98. }
99. if ($this->boundary == NULL) {
100. $this->SetBoundary();
101. }
102. }

103. function CheckFiles(){

104. if (count($this->files) == 0) {
105. return FALSE;
106. } else {
107. return TRUE;
108. }
109. }

110. function GetFile(){

111. $this->CheckHeaders();
112. if (!$this->CheckFiles()) {
113. exit ('No file was added.');
114. }
115. $contents = implode("rn", $this->headers);
116. $contents .= "rn";
117. $contents .= "MIME-Version: 1.0rn";
118. $contents .= "Content-Type: multipart/related;rn";
119. $contents .= "tboundary="{$this->boundary}";rn";
120. $contents .= "ttype="" . $this->files[0]['mimetype'] . ""rn";
121. $contents .= "X-MimeOLE: Produced By Mht File Maker v1.0 betarn";
122. $contents .= "rn";
123. $contents .= "This is a multi-part message in MIME format.rn";
124. $contents .= "rn";
125. foreach ($this->files as $file) {
126. $contents .= "--{$this->boundary}rn";
127. $contents .= "Content-Type: $file[mimetype]rn";
128. $contents .= "Content-Transfer-Encoding: $file[encoding]rn";
129. $contents .= "Content-Location: $file[filepath]rn";
130. $contents .= "rn";
131. $contents .= $file['filecont'];
132. $contents .= "rn";
133. }
134. $contents .= "--{$this->boundary}--rn";
135. return $contents;
136. }

137. function MakeFile($filename){

138. $contents = $this->GetFile();
139. $fp = fopen($filename, 'w');
140. fwrite($fp, $contents);
141. fclose($fp);
142. }

143. function GetMimeType($filename){

144. $pathinfo = pathinfo($filename);
145. switch ($pathinfo['extension']) {
146. case 'htm': $mimetype = 'text/html'; break;
147. case 'html': $mimetype = 'text/html'; break;
148. case 'txt': $mimetype = 'text/plain'; break;
149. case 'cgi': $mimetype = 'text/plain'; break;
150. case 'php': $mimetype = 'text/plain'; break;
151. case 'css': $mimetype = 'text/css'; break;
152. case 'jpg': $mimetype = 'image/jpeg'; break;
153. case 'jpeg': $mimetype = 'image/jpeg'; break;
154. case 'jpe': $mimetype = 'image/jpeg'; break;
155. case 'gif': $mimetype = 'image/gif'; break;
156. case 'png': $mimetype = 'image/png'; break;
157. default: $mimetype = 'application/octet-stream'; break;
158. }
159. return $mimetype;
160. }
161. }
162. ?>

2、导出word文件 exportdoc.php

3. /**

4. * 根据html代码获取word文档内容
5. * 创建一个本质为mht的文档，该函数会分析文件内容并从远程下载页面中的图片资源
6. * 该函数依赖于类MhtFileMaker
7. * 该函数会分析img标签，提取src的属性值。但是，src的属性值必须被引号包围，否则不能提取
8. *
9. * @param string $content HTML内容
10. * @param string $absolutePath 网页的绝对路径。如果HTML内容里的图片路径为相对路径，那么就需要填写这个参数，来让该函数自动填补成绝对路径。这个参数最后需要以/结束
11. * @param bool $isEraseLink 是否去掉HTML内容中的链接
12. */
13. include_once("docclass.php");
14. function getWordDocument( $content , $absolutePath = "" , $isEraseLink = true )
15. {
16. $mht = new MhtFileMaker();
17. if ($isEraseLink)
18. $content = preg_replace('/(s*.*?s*)/i' , '$1' , $content); //去掉链接

19. $images = array();

20. $files = array();
21. $matches = array();
22. //这个算法要求src后的属性值必须使用引号括起来
23. if ( preg_match_all('//i',$content ,$matches ) )
24. {
25. $arrPath = $matches[1];
26. for ( $i=0;$i{
27. $path = $arrPath[$i];
28. $imgPath = trim( $path );
29. if ( $imgPath != "" )
30. {
31. $files[] = $imgPath;
32. if( substr($imgPath,0,7) == 'http://')
33. {
34. //绝对链接，不加前缀
35. }
36. else
37. {
38. $imgPath = $absolutePath.$imgPath;
39. }
40. $images[] = $imgPath;
41. }
42. }
43. }
44. $mht->AddContents("tmp.html",$mht->GetMimeType("tmp.html"),$content);

45. for ( $i=0;$i{

46. $image = $images[$i];
47. if ( @fopen($image , 'r') )
48. {
49. $imgcontent = @file_get_contents( $image );
50. if ( $content )
51. $mht->AddContents($files[$i],$mht->GetMimeType($image),$imgcontent);
52. }
53. else
54. {
55. echo "file:".$image." not exist!
    ";
56. }
57. }

58. return $mht->GetFile();

59. }
60. $content=implode("",file("http://bbs.it-home.org/print.php?id=3548"));
61. $fileContent = getWordDocument($content,".");
62. $fp = fopen("hugesky_word.doc", 'w');
63. fwrite($fp, $fileContent);
64. fclose($fp);
65. ?>