论坛交流
首页办公自动化| 网页制作| 平面设计| 动画制作| 数据库开发| 程序设计| 全部视频教程
应用视频: Windows | Word2007 | Excel2007 | PowerPoint2007 | Dreamweaver 8 | Fireworks 8 | Flash 8 | Photoshop cs | CorelDraw 12
编程视频: C语言视频教程 | HTML | Div+Css布局 | Javascript | Access数据库 | Asp | Sql Server数据库Asp.net  | Flash AS
当前位置 > 文字教程 > Asp.net教程
Tag:静态页面,treeview,gridview,repeater,dataset,sqldatareader,ado.net,上传,三层,ajax,xml,留言本,新闻发布,商城,注入,存储过程,分页,安全,优化,xmlhttp,fso,jmail,application,session,防盗链,stream,无组件,组件,md5,乱码,缓存,加密,验证码,算法,cookies,ubb,正则表达式,水印,索引,日志,压缩,base64,url重写,控件,Web.config,JDBC,函数,内存,PDF,迁移,结构,破解,编译,配置,进程,分词,IIS,触发器,socket,form认证,登录,视频教程

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

文章类别:Asp.net | 发表日期:2008-10-5 22:12:41

web中,如何读取客户端Word内容并且显示在页面中?

我发现有2种方法,一种是直接在客户端操作,一种是把客户端的word上传到服务器端操作,这2种各有优缺点。

我现就举出客户端操作的例子

首先在.aspx中添加如下js代码

<script language='javascript'>

//默认word转化文件放于C:\\下
var os__localPath = "C:\\";
//保存的文件名
   var os__localFile = "defaultFileWord.htm";
   var os__xmlDom = new ActiveXObject("MSXML2.DOMDocument");
   var os__xmlFSO ;

   //保存数据到当前客户端(可以传入一个要保存的文件名).
   function os_SaveToLocal()
   {
    var _saveAs = "";
    if(arguments.length > 0)
     _saveAs = arguments[0] + "";
    else
     _saveAs = os__localFile;
    
    try
    {       
     if(os__xmlFSO == null)
      os__xmlFSO = new ActiveXObject("Scripting.FileSystemObject");  
  
    }
    catch(e){window.alert(e);}
   } 
  
   //Word转化为Html文件
   function WorcChangeHtml()
   {
    var os_xmlFSO;
                                //获得上传控件对象
    var objUpFile = window.document.Form1.updFile;
    //获得客户端Word文件路径和文件
    var UpFileValue = window.document.Form1.updFile.value;
    if(os__xmlFSO == null)
      os__xmlFSO = new ActiveXObject("Scripting.FileSystemObject");     
    
    try
    {
     if(window.document.Form1.updFile.value == "")
     {
      alert('请选择对应的Word文件');
      objUpFile.focus();
     }
     else if(UpFileValue.indexOf(".doc") == -1)
     {
      alert('您选择的不是Word文件 \r\n请选择正确的Word文件');
      objUpFile.focus();
     }   
     else if(!os__xmlFSO.FileExists(objUpFile.value))
     {
      alert('对应的Word文件不存在');
      objUpFile.focus();    
     }
     else
     {
      var wdFormatHTML = 8;
      var objWord = new ActiveXObject("Word.Application");
      objWord.Application.Visible = false;
      var objDoc = objWord.Documents.Open(UpFileValue);
      objDoc.SaveAs(os__localPath+os__localFile, wdFormatHTML);
      window.document.Form1.updFile.value = "";
      objDoc.Close();
      objWord.Quit();
      var GetHtml = GetLine();
      var iBeginIndex = GetHtml.indexOf("<body");
      var iEndIndex = GetHtml.lastIndexOf("</body>");

     
      GetHtml =  GetHtml.substring(iBeginIndex,iEndIndex+7).replace("<body","<div");
      GetHtml = GetHtml.replace("</body>","</div>");
      //将转化后的值赋给页面控件txtIdea的值,我为了将Word值保存进数据库所以用<input type = "hidden" .....            如果将Word内容显示可以考虑 window.document.Form1."你的显示控件ID".innerText =  GetHtml;
      window.document.Form1.txtIdea.value = GetHtml;
     }
    }
    catch(e){window.alert(e);}
   }
  
   //读取文本文件
   function GetLine()
   {
    var fso, txtfile, strValue;
    var ForReading = 1, ForWriting = 2;
    fso = new ActiveXObject("Scripting.FileSystemObject");
    txtfile = fso.OpenTextFile(os__localPath+os__localFile, ForReading);
    while(!txtfile.AtEndOfStream)
    {
     strValue =  strValue + txtfile.ReadLine();
    }
    txtfile.Close();
    return(strValue);
   }

</script>

注意页面上需要添加以下2个控件和对应的客户端事件


<input id="updFile" type="file" style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; BORDER-LEFT: 1px solid; WIDTH: 77.46%; BORDER-BOTTOM: 1px solid; HEIGHT: 26px"
         size="71"> <input 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"
         onclick="WorcChangeHtml()" runat="server" id="btnUpLoad" type="submit" value="导入" name="btnUpLoad">
 <textarea style="WIDTH: 15.25%; HEIGHT: 23px" rows="50" cols="16" id="txtIdea"
     runat="server">


其中txtIdea中的值就是客户端Word中的内容了,注意:需要调整IE的安全性设置,否则将无效.

视频教程列表
文章教程搜索
 
Asp.net推荐教程
Asp.net热门教程
看全部视频教程
购买方式/价格
购买视频教程: 咨询客服
tel:15972130058