编程 Javascript

用jscript实现新建和保存一个word文档

Posted in Javascript onJune 15, 2007

Demonstration script that retrieves network adapter data from a computer,
displays that data in a Microsoft Word document, and then saves the
document as C:\Scripts\Word\Testdoc.doc.

Set objWord = CreateObject("Word.Application") 
objWord.Caption = "Test Caption" 
objWord.Visible = True Set objDoc = objWord.Documents.Add() 
Set objSelection = objWord.Selection 
objSelection.Font.Name = "Arial" 
objSelection.Font.Size = "18" 
objSelection.TypeText "Network Adapter Report" 
objSelection.TypeParagraph() 
objSelection.Font.Size = "14" 
objSelection.TypeText "" & Date() 
objSelection.TypeParagraph() 
objSelection.TypeParagraph() 
objSelection.Font.Size = "10" 
strComputer = "." 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") 
Set colItems = objWMIService.ExecQuery _ 
    ("Select * from Win32_NetworkAdapterConfiguration") 
For Each objItem in colItems 
    objSelection.Font.Bold = True 
    objSelection.TypeText "ARP Always Source Route: "  
    objSelection.Font.Bold = False 
    objSelection.TypeText "" & objItem.ArpAlwaysSourceRoute 
    objSelection.TypeParagraph() 
    objSelection.Font.Bold = True 
    objSelection.TypeText "ARP Use EtherSNAP: " 
    objSelection.Font.Bold = False 
    objSelection.TypeText ""  & objItem.ArpUseEtherSNAP 
    objSelection.TypeParagraph() 
    objSelection.Font.Bold = True 
    objSelection.TypeText "Caption: " 
    objSelection.Font.Bold = False 
    objSelection.TypeText ""  & objItem.Caption 
    objSelection.TypeParagraph() 
    objSelection.Font.Bold = True 
    objSelection.TypeText "Database Path: " 
    objSelection.Font.Bold = False 
    objSelection.TypeText ""   & objItem.DatabasePath 
    objSelection.TypeParagraph() 
    objSelection.Font.Bold = True 
    objSelection.TypeText "Dead GW Detection Enabled: " 
    objSelection.Font.Bold = False 
    objSelection.TypeText ""   & objItem.DeadGWDetectEnabled 
    objSelection.TypeParagraph() 
    objSelection.Font.Bold = True 
    objSelection.TypeText "Default IP Gateway: "  
    objSelection.Font.Bold = False 
    objSelection.TypeText "" & objItem.DefaultIPGateway 
    objSelection.TypeParagraph() 
    objSelection.Font.Bold = True 
    objSelection.TypeText "Default TOS: " 
    objSelection.Font.Bold = False 
    objSelection.TypeText ""  & objItem.DefaultTOS 
    objSelection.TypeParagraph() 
    objSelection.Font.Bold = True 
    objSelection.TypeText "Default TTL: " 
    objSelection.Font.Bold = False 
    objSelection.TypeText ""  & objItem.DefaultTTL 
    objSelection.TypeParagraph() 
    objSelection.Font.Bold = True 
    objSelection.TypeText "Description: " 
    objSelection.Font.Bold = True 
    objSelection.Font.Bold = False 
    objSelection.TypeText ""  & objItem.Description 
    objSelection.TypeParagraph() 
    objSelection.TypeParagraph() 
Next 
objDoc.SaveAs("C:\Scripts\Word\testdoc.doc") 
objWord.Quit

声明：登载此文出于传递更多信息之目的，并不意味着赞同其观点或证实其描述。

Javascript 相关文章推荐

firefo xml 读写实现js代码

Jun 11 Javascript

JavaScript中数据结构与算法(四)：串(BF)

Jun 19 Javascript

JavaScript原型及原型链终极详解

Jan 04 Javascript

javascript的几种继承方法介绍

Mar 22 Javascript

bootstrapfileinput实现文件自动上传

Nov 08 Javascript

Javascript基于jQuery UI实现选中区域拖拽效果

Nov 25 Javascript

自定义vue全局组件use使用、vuex的使用详解

Jun 14 Javascript

基于DOM节点删除之empty和remove的区别(详解)

Sep 11 Javascript

JavaScript中递归实现的方法及其区别

Sep 12 Javascript

vue+elementUi图片上传组件使用详解

Aug 20 Javascript

jQuery 查找元素操作实例小结

Oct 02 jQuery

Vue路由管理器Vue-router的使用方法详解

Feb 05 Javascript

用jscript实现新建word文档

Jun 15 #Javascript

Add Formatted Text to a Word Document

Jun 15 #Javascript

Add a Table to a Word Document

Jun 15 #Javascript

Add a Picture to a Microsoft Word Document

Jun 15 #Javascript

Add a Formatted Table to a Word Document

Jun 15 #Javascript

jscript之List Excel Color Values

Jun 13 #Javascript

jscript之Read an Excel Spreadsheet

Jun 13 #Javascript

You might like

全国FM电台频率大全 - 4 山西省

2020/03/11 无线电

php 抽象类的简单应用

2011/09/06 PHP

解析web文件操作常见安全漏洞(目录、文件名检测漏洞)

2013/06/29 PHP

遍历指定目录，并存储目录内所有文件属性信息的php代码

2016/10/28 PHP

JavaScript中的Math 使用介绍

2014/04/21 Javascript

让alert不出现弹窗的两种方法

2014/05/18 Javascript

JS按回车键实现登录的方法

2014/08/25 Javascript

JS+CSS实现模仿浏览器网页字符查找功能的方法

2015/02/26 Javascript

理解javascript定时器中的setTimeout与setInterval

2016/02/23 Javascript

基于jquery实现最简单的选项卡切换效果

2016/05/08 Javascript

js微信应用场景之微信音乐相册案例分享

2017/08/11 Javascript

JS运动特效之同时运动实现方法分析

2018/01/24 Javascript

使用JavaScript破解web

2018/09/28 Javascript

js设置鼠标悬停改变背景色实现详解

2019/06/26 Javascript

layui添加动态菜单与选项卡

2019/07/26 Javascript

python的正则表达式re模块的常用方法

2013/03/09 Python

Python中自定义函数的教程

2015/04/27 Python

Python基于回溯法子集树模板解决野人与传教士问题示例

2017/09/11 Python

python网络编程之多线程同时接受和发送

2019/09/03 Python

python实现银行账户系统

2021/02/22 Python

门卫岗位安全职责

2013/12/13 职场文书

农场厂长岗位职责

2013/12/28 职场文书

先进工作者获奖感言

2014/02/08 职场文书

党支部综合考察材料

2014/05/19 职场文书

群众路线教育实践活动思想汇报（2014特荐篇）

2014/09/16 职场文书

党的群众路线教育实践活动对照检查材料思想汇报

2014/09/19 职场文书

党性分析自查总结

2014/10/14 职场文书

2015年党性分析材料

2014/12/19 职场文书

2015年高校教师个人工作总结

2015/05/25 职场文书

银行资信证明

2015/06/17 职场文书

结婚仪式主持词

2015/06/29 职场文书

导游词之蓬莱长岛

2019/12/17 职场文书

【超详细】八大排序算法的各项比较以及各自特点

2021/03/31 Python

python 命令行传参方法总结

2021/05/25 Python

python实现语音常用度量方法的代码详解

2021/05/25 Python

Android Gradle 插件自定义Plugin实现注意事项

2022/06/16 Java/Android