编程 Javascript

Add a Table to a Word Document

Posted in Javascript onJune 15, 2007

Demonstration script that retrieves service information from a
computer and then displays that information in tabular format in Microsoft Word.

Set objWord = CreateObject("Word.Application") 
objWord.Visible = True 
Set objDoc = objWord.Documents.Add() Set objRange = objDoc.Range() 
objDoc.Tables.Add objRange,1,3 
Set objTable = objDoc.Tables(1) 
x=1 
strComputer = "." 
Set objWMIService = _ 
    GetObject("winmgmts:\\" & strComputer & "\root\cimv2") 
Set colItems = objWMIService.ExecQuery("Select * from Win32_Service") 
For Each objItem in colItems 
    If x > 1 Then 
        objTable.Rows.Add() 
    End If 
    objTable.Cell(x, 1).Range.Text = objItem.Name 
    objTable.Cell(x, 2).Range.text = objItem.DisplayName 
    objTable.Cell(x, 3).Range.text = objItem.State 
    x = x + 1 
Next

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

Javascript 相关文章推荐

两种WEB下的模态对话框（asp.net或js的分别实现）

Dec 02 Javascript

JavaScript学习笔记（十）

Jan 17 Javascript

用Jquery实现滚动新闻

Feb 12 Javascript

jQuery 顶部导航跟随滚动条滚动固定浮动在顶部

Jun 06 Javascript

js创建表单元素并使用submit进行提交

Aug 14 Javascript

浅谈JavaScript中的Math.atan()方法的使用

Jun 14 Javascript

jQuery hover事件简单实现同时绑定2个方法

Jun 07 Javascript

浅谈JS验证表单文本域输入空格的问题

Feb 14 Javascript

vue单页面打包文件大？首次加载慢？nginx带你飞，从7.5M到1.3M蜕变过程(推荐)

Jan 16 Javascript

详解搭建es6+devServer简单开发环境

Sep 25 Javascript

JavaScript箭头函数中的this详解

Jun 19 Javascript

微信小程序实现下拉加载更多商品

Dec 29 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

jscript之Open an Excel Spreadsheet

Jun 13 #Javascript

iis6+javascript Add an Extension File

Jun 13 #Javascript

一款JavaScript压缩工具：X2JSCompactor

Jun 13 #Javascript