web中，如何读取Word内容(包含表格，但不包含图片）并且显示在页面中或保存进数据库中

 1<script language="javascript">
 2
 3//默认word转化文件放于C:\\\下   
 4var os__localPath = "C:\\\";   
 5//保存的文件名   
 6var os__localFile = "defaultFileWord.htm";   
 7var os__xmlDom = new ActiveXObject("MSXML2.DOMDocument");   
 8var os__xmlFSO ; 
 9
10//保存数据到当前客户端(可以传入一个要保存的文件名).   
11function os_SaveToLocal()   
12{   
13var _saveAs = "";   
14if(arguments.length > 0)   
15_saveAs = arguments[0] + "";   
16else   
17_saveAs = os__localFile;   
18  
19try   
20{   
21if(os__xmlFSO == null)   
22os__xmlFSO = new ActiveXObject("Scripting.FileSystemObject");   
23  
24}   
25catch(e){window.alert(e);}   
26}   
27  
28//Word转化为Html文件   
29function WorcChangeHtml()   
30{   
31var os_xmlFSO;   
32//获得上传控件对象   
33var objUpFile = window.document.Form1.updFile;   
34//获得客户端Word文件路径和文件   
35var UpFileValue = window.document.Form1.updFile.value;   
36if(os__xmlFSO == null)   
37os__xmlFSO = new ActiveXObject("Scripting.FileSystemObject");   
38  
39try   
40{   
41if(window.document.Form1.updFile.value == "")   
42{   
43alert('请选择对应的Word文件');   
44objUpFile.focus();   
45}   
46else if(UpFileValue.indexOf(".doc") == -1)   
47{   
48alert('您选择的不是Word文件 \r\n请选择正确的Word文件');   
49objUpFile.focus();   
50}   
51else if(!os__xmlFSO.FileExists(objUpFile.value))   
52{   
53alert('对应的Word文件不存在');   
54objUpFile.focus();   
55}   
56else   
57{   
58var wdFormatHTML = 8;   
59var objWord = new ActiveXObject("Word.Application");   
60objWord.Application.Visible = false;   
61var objDoc = objWord.Documents.Open(UpFileValue);   
62objDoc.SaveAs(os__localPath+os__localFile, wdFormatHTML);   
63window.document.Form1.updFile.value = "";   
64objDoc.Close();   
65objWord.Quit();   
66var GetHtml = GetLine();   
67var iBeginIndex = GetHtml.indexOf("<body");   
68var iEndIndex = GetHtml.lastIndexOf("</body>"); 
69
70  
71GetHtml = GetHtml.substring(iBeginIndex,iEndIndex+7).replace("<body","<div");   
72GetHtml = GetHtml.replace("</body>","</div>");   
73//将转化后的值赋给页面控件txtIdea的值，我为了将Word值保存进数据库所以用<input type = "hidden" ..... 如果将Word内容显示可以考虑 window.document.Form1."你的显示控件ID".innerText = GetHtml;   
74window.document.Form1.txtIdea.value = GetHtml;   
75}   
76}   
77catch(e){window.alert(e);}   
78}   
79  
80//读取文本文件   
81function GetLine()   
82{   
83var fso, txtfile, strValue;   
84var ForReading = 1, ForWriting = 2;   
85fso = new ActiveXObject("Scripting.FileSystemObject");   
86txtfile = fso.OpenTextFile(os__localPath+os__localFile, ForReading);   
87while(!txtfile.AtEndOfStream)   
88{   
89strValue = strValue + txtfile.ReadLine();   
90}   
91txtfile.Close();   
92return(strValue);   
93} 
94
95</script>

1<input id="updFile" size="71" style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; WIDTH: 77.46%; BORDER-BOTTOM: 1px solid; HEIGHT: 26px" type="file"/>

1<input id="btnUpLoad" name="btnUpLoad" onclick="WorcChangeHtml()" runat="server" style="BORDER-RIGHT: #999999 1px solid; BORDER-TOP: #999999 1px solid; FONT-SIZE: 15pt; BORDER-LEFT: #999999 1px solid; WIDTH: 103px; BORDER-BOTTOM: #999999 1px solid; HEIGHT: 28px" type="submit" value="导入"/>

1<textarea cols="16" id="txtIdea" rows="50" runat="server" style="WIDTH: 15.25%; HEIGHT: 23px">
2
3其中txtIdea中的值就是客户端Word中的内容了，注意：需要调整IE的安全性设置，否则将无效</textarea>