11.6.9 Объект System<
Объект Word.System, программное получение информации из операционной системы средствами VBA
При помощи объекта System можно получить большое количество информации о системе, в которой работает ваше приложение. В качестве альтернативы этому объекту можно подумать об использовании объектных моделей Windows Script Host и WMI — возможностей для работы с системой в этих объектных моделях намного больше. Однако если у вас в организации используются старые операционные системы (Windows NT, Windows 98), где WSH и WMI могут быть не установлены, использование этого объекта очень удобно.
Главные свойства объекта System:
- CountryRegion — вернуть текущие региональные настройки операционной системы. Если установлены русские, то возвращается значение 7 (несмотря на то, что его нет в документации), если установлены американские — 1.
- FreeDisk — возвращается объем доступного дискового пространства для пользователя на текущем диске (можно сменить текущий диск). Если документы очень большие и иногда возникают проблемы с местом на диске, можно реализовать проверку наличия свободного места, например, при выполнении операций сохранения.
- HorizontalRezolution и VerticalResolution — возможность получить информацию о текущем разрешении экрана у пользователя, например, для правильного отображения больших форм.
- LanguageDesignation — определить язык интерфейса операционной системы. Возвращается в виде строкового значения, например:
Debug.Print System.LanguageDesignation
- OperationSystem — возвращает информацию об операционной системе. К сожалению, предусмотрено только два значения: "Windows" — для линейки Windows95/98/ME и "Windows NT" — для линейки NT/2000/XP/2003.
У этого объекта предусмотрено всего два метода — Connect() — подключить сетевой диск и MsInfo() — показать окно системной информации.