Windows Script Host для Windows 2000/XP, Попов Андрей Викторович

Windows Script Host для Windows 2000/XP

на обложку

Попов Андрей Викторович

Шрифт:

/* Описание: Использование из сценария внешнего объекта */

/* автоматизации (Microsoft Word) */

/*******************************************************************/

var WA,WD,Sel; //Объявляем переменные

//Создаем объект--приложение Microsoft Word

WA=WScript.CreateObject("Word.Application");

//Можно было использовать конструкцию

//WA=new ActiveXObject("Word.Application");

WD=WA.Documents.Add; //Создаем

новый документ (объект Document)

WA.Visible=true; //Делаем Word видимым

Sel=WA.Selection; //Создаем объект Selection

Sel.Font.Size=14; //Устанавливаем размер шрифта

Sel.ParagraphFormat.Alignment=1; //Выравнивание по центру

Sel.Font.Bold=true; //Устанавливаем полужирный шрифт

Sel.TypeText("Привет!\n"); //Печатаем строку текста

Sel.Font.Bold=false; //Отменяем полужирный шрифт

Sel.ParagraphFormat.Alignment=0; //Выравнивание по левому краю

//Печатаем строку текста

Sel.TypeText("Эти строки напечатаны с помощью WSH.");

WD.PrintOut; //Выводим документ на принтер

/************* Конец *********************************************/

Листинr 2.27. Использование сервера автоматизации Мiсrоsоft Word (VBScript)

'*******************************************************************

' Имя: PrintInWord.vbs

' Язык: VBScript

' Описание: Использование из сценария внешнего объекта

' автоматизации (Microsoft Word)

'*******************************************************************

Option Explicit

Dim WA,WD,Sel ' Объявляем переменные

'Создаем объект--приложение Microsoft Word

Set WA=WScript.CreateObject("Word.Application")

' Можно было использовать конструкцию

' Set WA=CreateObject("Word.Application")

Set WD=WA.Documents.Add 'Создаем новый документ (объект Document)

WA.Visible=true ' Делаем Word видимым

Set Sel=WA.Selection 'Создаем объект Selection

Sel.Font.Size=14 'Устанавливаем размер шрифта

Sel.ParagraphFormat.Alignment=1 'Выравнивание по центру

Sel.Font.Bold=true 'Устанавливаем полужирный шрифт

Sel.TypeText "Привет!" & vbCrLf 'Печатаем строку текста

Sel.Font.Bold=false 'Отменяем полужирный шрифт

Sel.ParagraphFormat.Alignment=0 'Выравнивание

по левому краю

'Печатаем строку текста

Sel.TypeText "Эти строки напечатаны с помощью WSH."

WD.PrintOut 'Выводим документ на принтер

'************* Конец *********************************************

Запуск из сценариев внешних программ

Внешние программы и команды можно запускать из сценариев различными способами.

Запуск приложений Windows

Запустить из сценария WSH другое приложение можно с помощью методов

Run

или

Exec

объекта

WshShell

При использовании метода

Run

для запускаемого приложения можно задать тип окна (при условии, что приложение поддерживает этот тип). Например, в результате выполнения следующих двух строк JScript-кода:

var WshShell = WScript.CreateObject("WScript.Shell");

WshShell.Run("notepad", 3);

программа Блокнот (notepad.exe) будет запущена в максимизированном (распахнутом на весь экран) окне (список всех возможных значений параметров метода

Run

приведен в табл. 1.13).

Замечание

Метод

Run

всегда создает новый экземпляр запускаемого процесса, с его помощью нельзя ни повторно активизировать окно запущенного приложения (для этого используется метод

AppActivate

), ни свернуть или развернуть его.

Другим вариантом запуска из сценария приложения Windows является применение метода

Exec

. Этот метод запускает приложение, путь к которому указан как параметр метода, и возвращает объект

WshScriptExec

Например:

var WshShell = WScript.CreateObject("WScript.Shell");

var theNotepad = WshShell.Exec("calc");

Замечание

При подобном запуске приложения, в отличие от метода

Run

, нельзя задать тип окна.

Объект

WshScriptExec

позволяет контролировать ход выполнения запущенного приложения с помощью свойства

Status

— если

Status

равен 0, то приложение выполняется, если

Status

равен 1, то приложение завершено. Кроме этого, используя метод

Terminate

, можно принудительно завершить работу того приложения, которому соответствует объект

WshScriptExec

В листинге 2.28 приведен сценарий на языке JScript, в котором с помощью метода Exec запускается Блокнот (notepad.exe); ссылка на соответствующий объект

WshScriptExec

сохраняется в переменной

theNotepad