helpf.pro
Регистрация
 0 
Распечатать

Пример определения системных каталогов пользователя ( Shell Application Namespace )

Код 1C v 8.х
 
App = Новый COMОбъект("Shell.Application");
// Дополнительные данные получаем так:
// Название - App.Namespace(26).Title
// Путь - App.Namespace(26).Self.Path

//Список доступных каталогов
App.Namespace(1) // Internet Explorer пример - ::{871C5380-42A0-1069-A2EA-08002B30309D}
App.Namespace(2) // Программы пример - C:\Documents and Settings\E.S.Migachev\Главное меню\Программы
App.Namespace(3) // Панель управления пример - ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}\::{21EC2020-3AEA-1069-A2DD-08002B30309D}
App.Namespace(4) // Принтеры и факсы пример - ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}\::{21EC2020-3AEA-1069-A2DD-08002B30309D}\::{2227A280-3AEA-1069-A2DE-08002B30309D}
App.Namespace(5) // Мои документы пример - C:\Documents and Settings\E.S.Migachev\Мои документы
App.Namespace(6) // Избранное пример - C:\Documents and Settings\E.S.Migachev\Избранное
App.Namespace(7) // Автозагрузка пример - C:\Documents and Settings\E.S.Migachev\Главное меню\Программы\Автозагрузка
App.Namespace(8) // Недавние документы пример - C:\Documents and Settings\E.S.Migachev\Recent
App.Namespace(9) // SendTo пример - C:\Documents and Settings\E.S.Migachev\SendTo
App.Namespace(10) // Корзина пример - ::{645FF040-5081-101B-9F08-00AA002F954E}
App.Namespace(11) // Главное меню пример - C:\Documents and Settings\E.S.Migachev\Главное меню
App.Namespace(13) // Моя музыка пример - C:\Documents and Settings\E.S.Migachev\Мои документы\Моя музыка
App.Namespace(14) // Мои видеозаписи пример - C:\Documents and Settings\E.S.Migachev\Мои документы\Мои видеозаписи
App.Namespace(16) // Рабочий стол пример - C:\Documents and Settings\E.S.Migachev\Рабочий стол
App.Namespace(17) // Мой компьютер пример - ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}
App.Namespace(18) // Сетевое окружение пример - ::{208D2C60-3AEA-1069-A2D7-08002B30309D}
App.Namespace(19) // NetHood пример - C:\Documents and Settings\E.S.Migachev\NetHood
App.Namespace(20) // Fonts пример - C:\WINDOWS\Fonts
App.Namespace(21) // Шаблоны пример - C:\Documents and Settings\E.S.Migachev\Шаблоны
App.Namespace(22) // Главное меню пример - C:\Documents and Settings\All Users\Главное меню
App.Namespace(23) // Программы пример - C:\Documents and Settings\All Users\Главное меню\Программы
App.Namespace(24) // Автозагрузка пример - C:\Documents and Settings\All Users\Главное меню\Программы\Автозагрузка
App.Namespace(25) // Рабочий стол пример - C:\Documents and Settings\All Users\Рабочий стол
App.Namespace(26) // Application Data пример - C:\Documents and Settings\E.S.Migachev\Application Data
App.Namespace(27) // PrintHood пример - C:\Documents and Settings\E.S.Migachev\PrintHood
App.Namespace(28) // Application Data пример - C:\Documents and Settings\E.S.Migachev\Local Settings\Application Data
App.Namespace(31) // Избранное пример - C:\Documents and Settings\All Users\Избранное
App.Namespace(32) // Temporary Internet Files пример - C:\Documents and Settings\E.S.Migachev\Local Settings\Temporary Internet Files
App.Namespace(33) // Cookies пример - C:\Documents and Settings\E.S.Migachev\Cookies
App.Namespace(34) // History пример - C:\Documents and Settings\E.S.Migachev\Local Settings\History
App.Namespace(35) // Application Data пример - C:\Documents and Settings\All Users\Application Data
App.Namespace(36) // WINDOWS пример - C:\WINDOWS
App.Namespace(37) // system32 пример - C:\WINDOWS\system32
App.Namespace(38) // Program Files пример - C:\Program Files
App.Namespace(39) // Мои рисунки пример - C:\Documents and Settings\E.S.Migachev\Мои документы\Мои рисунки
App.Namespace(40) // E.S.Migachev пример - C:\Documents and Settings\E.S.Migachev
App.Namespace(41) // system32 пример - C:\WINDOWS\system32
App.Namespace(43) // Common Files пример - C:\Program Files\Common Files
App.Namespace(45) // Шаблоны пример - C:\Documents and Settings\All Users\Шаблоны
App.Namespace(47) // Администрирование пример - C:\Documents and Settings\All Users\Главное меню\Программы\Администрирование
App.Namespace(48) // Администрирование пример - C:\Documents and Settings\E.S.Migachev\Главное меню\Программы\Администрирование
App.Namespace(49) // Сетевые подключения пример - ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}\::{21EC2020-3AEA-1069-A2DD-08002B30309D}\::{7007ACC7-3202-11D1-AAD2-00805FC1270E}
App.Namespace(53) // Музыка (общая) пример - C:\Documents and Settings\All Users\Документы\Моя музыка
App.Namespace(54) // Рисунки (общие) пример - C:\Documents and Settings\All Users\Документы\Мои рисунки
App.Namespace(55) // Видео (общее) пример - C:\Documents and Settings\All Users\Документы\Мои видеозаписи
App.Namespace(56) // Resources пример - C:\WINDOWS\Resources
App.Namespace(57) // 0419 пример - C:\WINDOWS\Resources\0419
App.Namespace(59) // CD Burning пример - C:\Documents and Settings\E.S.Migachev\Local Settings\Application Data\Microsoft\CD Burning
Разместил:   Версии: | 8.x |  Дата:   Прочитано: 9354
 0 
Распечатать
Возможно, вас также заинтересует
COM-подключение к базе 7.7 из 8.2 1С 4
Если код выполняется на стороне клиента, то необходимо наличие базы 7.7 на локальной машине. Пример (На форме объекта присутствует реквизит Таблица(ТаблицаЗначений)): НаКлиенте Процедура Загрузки() ПутьКБазе="...
COM-соединение не обнаружило свободной лицензии / ключ защиты 0
Иногда при подключении к 1С возникает ошибка: COM-соединение не обнаружило свободной лицензии! COM-соединение не обнаружило ключ защиты программы! https://helpf.pro/uploads/img/_1-UsuyAg6E2P.jpg В таких случаях, иногда, может помочь...
V82.COMConnector.1: Не найдена лицензия COM-соединением 1
При подключении из одной базы к другой через COM внезапно стала появляться следующая ошибка: «V82.COMConnector.1: Не найдена лицензия COM-соединением», хотя никаких изменений на серверах не делалось. Релиз платформы был 8.2.13....
Автоматическая архивация баз 1С 8.х для файлового и клиент-серверного варианта 3
Данный способ архивации подходит для файловых и SQL версий баз 1С: И так: 1. Создаем скрипт vbs и сохраняем его в C:BackupZUP.vbs Set WshShell = CreateObject(" WScript.Shell" ) dim d,m,y d = day(date()) if d 10 then d = " 0" d end
Активация открытой книги Excel для корректировки 0
Нужно было получить для изменения уже открытую книгу Excel, а если она закрыта, то открыть и изменять. Ниже код, который данную задачу решает. Попытка Эксель = Неопределено; Книга = Неопределено; Лист = Неопределено; ...
Посмотреть все результаты поиска похожих
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.