ole2.js

来自「FastScript 1.94 Full Source」· JavaScript 代码 · 共 33 行

var msWord = CreateOleObject("Word.Application");
msWord.Visible = True;

var doc = msWord.Documents.Add;
var sel = msWord.Selection;

sel.TypeText("Some System Parameters:");
sel.HomeKey(5, 1);
sel.Font.Bold = True;
sel.EndKey(5, 0);
sel.Font.Bold = False;

var tab = doc.Tables.Add(sel.Range, 3, 2);

sel.TypeText("Operating System");
sel.MoveRight(12);
sel.TypeText(msWord.System.OperatingSystem);
sel.MoveLeft(12);
sel.MoveDown(5);

sel.TypeText("Processor");
sel.MoveRight(12);
sel.TypeText(msWord.System.ProcessorType);
sel.MoveLeft(12);
sel.MoveDown(5);

sel.TypeText("Word Version");
sel.MoveRight(12);
sel.TypeText(MsWord.Version);
sel.MoveLeft(12);
sel.MoveDown(5);