Задание для самостоятельной работы 4.1 Windows Script Host в приложениях VBA

Подготовка:

откройте Word и создайте новый документ (обычным, не программным способом). Откройте проект этого документа и создайте в нем новую процедуру с именем WSH().

Задание:

1. Добавьте в проект этого документа ссылку на библиотеку Windows Script Host Object Model;
2. В процедуре WSH() создайте программные объекты WScript.Network и WScript.Shell и просмотрите свойства и методы этих объектов;
3. Добавьте в процедуру WSH() код, который бы:

• принимал в текстовые переменные и печатал в документе Word значения свойств ComputerName, UserName и UserDomain объекта WScript.Network;

Примечание.

Код для вывода текстовой переменной в Word может выглядеть так:

ThisDocument.Activate

Selection.TypeText моя_текстовая_переменная

• вызывал метод Run() объекта WScript.Shell и передавал ему единственный текстовый параметр со значением " calc";
• использовал свойство Environment объекта WScript.Shell для создания коллекции текстовых переменных с информацией о переменных окружения;
• печатал в документе Word все значения текстовых переменных в из этой коллекции.

Примечание.

Для переменных, которые вы будете использовать для создаваемой коллекции и ее элементов, следует использовать тип Variant.

Получить учебные материалы по этому курсу