用vbscript把 Word 文档保存为文本文件的代码
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
| 问： 嗨，ScriptingGuy！我有一系列Word文件。我想打开这些文件中的每一个并将它们另存为纯文本文件。有没有一种通过使用脚本实现此目的的方法呢？ --CG 答： 您好，CG。是的，使用一个脚本，您很容易实现此目的。事实上，除了极少例外情况之外，您在MicrosoftOffice程序中可以做到的事情基本上都可以使用一个脚本来完成。在Word中，您可以使用“文件”–“另存为”将Word文档另存为文本文件。您也可以使用一个脚本做同样的事情。实际上，您可以使用以下脚本实现此目的： 复制代码 代码如下: ConstwdFormatText=2 SetobjWord=CreateObject("Word.Application") SetobjDoc=objWord.Documents.Open("c:\scripts\mylog.doc") objDoc.SaveAs"c:\scripts\mylog.txt",wdFormatText objWord.Quit 我们先创建一个名为“wdFormatText”的常量，然后将值2分配给它；此常量将用于告诉Word我们希望新文件保存为一个文本文件。然后我们创建一个MicrosoftWord实例，使用“打开”方法打开文件C:\Scripts\MyLog.doc。文档打开之后，我们只需要一行代码就可将此Word文档另存为文本文件： objDoc.SaveAs"c:\scripts\mylog.txt",wdFormatText Asyoucansee,wecalltheSaveAsmethod,andwepassittwoparameters:1)C:\Scripts\MyLog.txt,whichisthepathforournewtextfile;and,2)wdFormatText,whichtellsWordtosavethefileasplaintext.这样就可以了。然后我们使用“Quit”方法关闭Word实例。 两个重要注意事项。第一，您在屏幕上看不到任何正在发生的事情，因为，默认情况下，无论何时您从一个脚本中调用Word，它都将运行在一个不可见窗口中。如果您希望看到它在屏幕上弹出，保存文件，然后消失，请使用以下代码： ConstwdFormatText=2 SetobjWord=CreateObject("Word.Application") objWord.Visible=TRUE SetobjDoc=objWord.Documents.Open("c:\scripts\mylog.doc") objDoc.SaveAs"c:\scripts\mylog.txt",wdFormatText objWord.Quit 唯一的不同之处在于：我们将“Visible”属性设置为TRUE。 第二，您可以将Word文档另存为纯文本以外的格式。例如，使用常量wdFormatHTML（值=8）将Word文档另存为HTML文件；使用常量wdFormatXML（值=11）将Word文档另存为XML文件。 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
关于用vbscript把 Word 文档保存为文本文件的代码的所有评论
