Отправляет email-рассылки с помощью сервиса Sendsay

Использование VbScript для администратора Windows

Подписаться Бесплатная «Серебряная» новостная рассылка Подписчиков 438 RSS
←   Сентябрь 2008   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30


За последние 60 дней ни разу не выходила


Открыта: 26-06-2008

Автор
Новопашин Владимир

Статистика

438 подписчиков
0 за неделю
←   Все выпуски   →

Использование VbScript для администратора Windows Специальные папки


Выпуск #08

"Vbs, whs, js скрипты для администратора"

9 сентября 2008

Дорогой подписчик в этом номере заканчиваем рассмотрение объектов коллекций рассмотрением объекта WshSpecialFolders.

Объект WshSpecialFolders

Объект WshSpecialFolders обеспечивает доступ к коллекции, содержащей пути к специальным папкам Windows (например, к рабочему столу или к меню кнопки "Пуск" (Start)); задание путей к таким папкам может быть необходимо, например, для создания непосредственно из сценария ярлыков на рабочем столе.

В таблице 1 представлены поддерживаемые в Windows 9x (95,98,Me) имена специальных папок:

Таблица 1

Специальные пути для Windows 9x

Наименование
Описание
Desktop Путь к рабочему столу
Favorites Избранное
Fonts Путь к шрифтам
My Documents Мои документы
NetHood Сетевое окружение
PrintHood Путь к принтерам
Programs Подменю "Программы" кнопки "Пуск"
Recents Подменю "Документы" кнопки "Пуск"
SendTo подменю Отправить из контекстного меню файлов
StartMenu Главное меню
Startup Подменю "Автозагрузка" из подменю "Программы"
Templates Шаблоны

В Windows NT/2000/XP/Vista дополнительно можно получить доступ к еще четырём папкам, которые хранят данные для всех пользователей:

Таблица 2

Специальные пути для всех пользователей

Наименование
Описание
AllUsersDesktop Путь к рабочему столу для всех пользователей
AllUsersStartMenu Путь к главному меню для всех пользователей
AllUsersPrograms Подменю "Программы" кнопки "Пуск" для всех пользователей
AllUsersStartUp Подменю "Автозагрузка" из подменю "Программы"

Объект WshSpecialFolders создается с помощью свойства SpecialFolders объекта WshShell:

Dim objShell, objSpec

Set objShell = WScript.CreateObject("WScript.Shell")

Set objSpec = objShell.SpecialFolders

Как и все коллекции WSH, объект WshSpecialFolders имеет свойство Lenght и методы Count и Item. Доступ к отдельному элементу производится либо через имя соответствующей папки, либо через числовой индекс (листинг 1.1):

'********************************************
'Имя : ShowSpecFold.vbs
'Язык: VBScript
'Описание: Вывод на экран названий специальных 
'          папок Windows
'********************************************

Dim objShell, objSpec, lngI
'Создаем объект WshShell
Set objShell = WScript.CreateObject("WScript.Shell")
'Создаем объект WshSpecialFolders
Set objSpec = objShell.SpecialFolders

WScript.Echo("Некоторые специальные папки...")
'Выводим путь на рабочий стол
WScript.Echo("Рабочий стол=" & objSpec.Item("Desktop"))
'Выводим путь к папке "Избранное"
WScript.Echo("Избранное=" & objSpec.Item("Favorites"))
'Выводим путь к папке "Программы"
WScript.Echo("Программы=" & objSpec.Item("Programs"))
WScript.Echo
WScript.Echo("Список всех специальных папок...")
For lngI =0 To objSpec.Count-1
    WScript.Echo (objSpec(lngI))
Next

В следующих выпусках рассылки мы рассмотрим примеры работы со специальными папками Windows

Со мной можносвязаться по e-mail - novopashinwm@mail.ru

Copyright 2008 Новопашин Владимир. Все права защищены.

В избранное