Определение имени локального компьютера при работе на терминальном сервере

04.12.14

База данных - Инструменты администратора БД

–

Еще один вариант определения имени локального компьютера при работе на терминальном сервере

Скачать файлы

	Наименование	Файл	Версия	Размер
	Определить имена компьютеров в клиент-серверном варианте .epf 8,75Kb 14	.epf	0.9	8,75Kb	14	Скачать

Решил откорректировать публикацию //infostart.ru/public/281632/ т.к. автор запретил комментарии.

Навеяно работой с торговым оборудованием в типовых конфигурациях.

Большое спасибо этой публикации: //infostart.ru/public/145652/

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

–

См. также

PowerTools

Инструментарий разработчика Инструменты администратора БД Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Россия Платные (руб)

Универсальный инструмент программиста для администрирования конфигураций. Сборник наиболее часто используемых обработок под единым интерфейсом.

3600 руб.

14.01.2013 173221 1042 0

817

Управление данными и формами (УДиФ)

Инструменты администратора БД Инструментарий разработчика Администрирование Роли и права Платформа 1С v8.3 Конфигурации 1cv8 Россия Платные (руб)

Расширение позволяет без изменения кода конфигурации выполнять проверки при вводе данных, скрывать от пользователя недоступные ему данные, выполнять код в обработчиках. Не изменяет данные конфигурации, легко устанавливается практически на любую конфигурацию на управляемых формах.

10000 руб.

10.11.2023 1437 3 1

Брандмауэр для сервера 1С Предприятие 8 - внешнее управление сеансами

Инструменты администратора БД Платформа 1С v8.3 Конфигурации 1cv8 Платные (руб)

Управление возможностью начала и возобновления сеансов пользователей по различным условиям, ограничение общего числа возможных сеансов для работы с информационной базой, резервирование возможности работы с информационной базой определенных польззователей, запрет запуска нескольких сеансов для пользователя, журнализация событий начала (возобновления) и завершения (гибернации) сеансов, ведение списка активных сеансов для информационных баз кластера серверов

3600 руб.

06.02.2017 30212 29 18

Помощник формирования профилей и групп доступа в любых типовых базах 1С УТ 11, КА 2, ERP2, Розница 2/3, УНФ 16/3, БП 3, ЗУП 3 и подобных (УФ, Платформа 8.3.14+)

Инструменты администратора БД Роли и права 8.3.14 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Документооборот 1С:Зарплата и кадры государственного учреждения 3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Платные (руб)

Роли… Вы тратите много времени и сил на подбор ролей среди около 2400 в ERP или 1500 в Рознице 2, пытаясь понять какими правами они обладают? Вы все время смотрите права в конфигураторе или отчетах чтоб создать нормальные профили доступа? Вы хотите наглядно видеть какие права дает профиль и редактировать все в простом виде? А может хотите просто указать подсистему и дать права на просмотр и добавление на объекты и не лезть в дебри прав и чтоб обработка сама подобрала нужные роли? Все это теперь стало возможно!

8400 руб.

06.12.2023 384 1 0

Система хранения присоединенных файлов в томах на диске

Инструменты администратора БД Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием Платные (руб)

Конфигурация Комплексная автоматизация 1.1 (и УПП 1.3 тоже) хранит файлы и изображения в справочнике Хранилище дополнительной информации в реквизите Хранилище типа ХранилищеЗначений. Та же история с ВложениямиЭлектроннойПочты. Но при этом присоединенные файлы в Электронном документообороте хранит в томах на диске. Эта доработка позволяет использовать стандартный механизм хранения файлов, изображений и вложений электронных писем в томах на диске. При этом можно разделить тома хранения по объектам конфигурации.

4200 руб.

10.11.2015 60480 84 55

Сжатие (уменьшение) картинок в базе 1С и приведение их к одинаковой ширине

Инструменты администратора БД Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Платные (руб)

Многие сталкиваются с проблемой когда изображения, находящиеся в базе разные по объему и размерам. Менеджеры могут добавить файлы в очень высоком разрешении, объемом свыше 20 Мегабайт. База данных становится слишком большой, выгрузка на сайт идёт медленно и требуется много место на хостинге. Как сжать картинки и уменьшить размер базы 1С? Это можно сделать с помощью данной обработки. Существует возможность выбрать различные варианты для того чтобы уменьшить картинки: в разы, в процентах от первоначального объема, а также сделать картинки одинаковой ширины. В результате размер базы 1С значительно сократится (в зависимости от количества и размера картинок), а изображения станут небольшого объема, равными по ширине, почти без потери качества. Работает на управляемых формах для УТ 11, КА, ERP.

2000 руб.

21.07.2022 8585 6 3

Конфигурация Session Monitor

Мониторинг Инструменты администратора БД Платформа 1С v8.3 Россия Платные (руб)

Конфигурация Session Monitor предназначена для мониторинга сервера 1С с целью отслеживания чрезмерной нагрузки от конкретных сеансов и скорости реакции рабочих процессов.

1500 руб.

01.12.2020 13322 29 0

Ускоренное проведение документов (x4), устранение ошибок 60/62 счетов и зачет авансов (Бухгалтерия 3.0)

Закрытие периода Инструменты администратора БД Корректировка данных Бухгалтерский учет 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Расширение «Оперативное проведение» в 4 раза уменьшает время проведения документов и закрытия месяца. Является комплексным решением проблем 62 и 60 счетов. Оптимизирует проведение при включенной функциональной опции «Раздельный учет НДС». Используется в более 10 организациях уже 2 года. Совместимо с конфигурацией Бухгалтерия 3.0 (+КОРП).

14400 руб.

29.04.2020 26080 77 145

Комментарии

В избранное Подписаться на ответы

Свернуть все

1. vis_tmp 32 05.12.14 06:41 Сейчас в теме

Что означает "имя совсем локального компьютера" ?

2. vld_trade 31 05.12.14 14:20 Сейчас в теме

(1) vis_tmp, В клиент-серверном варианте при работе на терминальном сервере. Имя физического компьютера, за которым работает пользователь.
Я не изменял обработку, которую указал в ссылке, чтобы ее разработчик понял, что я имел ввиду.
Поэтому получилось немного "не так".
В его случае "Имя локального компьютера" означает имя сервера терминалов.

3. khan 06.12.14 14:39 Сейчас в теме

А что происходит когда пользователь сначала зашел с одного компьютера, а затем не закрыв сеанс входит с другого ? В этом случае смена входа определится ?

4. vld_trade 31 08.12.14 09:16 Сейчас в теме

(3) khan, представленная обработка не отслеживает события.
Она только спрашивает у компьютера значение переменной окружения "CLIENTNAME". Спрашивает по нажатию "Выполнить".

5. johny1983 17.01.20 10:09 Сейчас в теме

как запросить переменную окружения clientname на 64битной версии 1С?

6. sssss_aaaaa_2011 17.01.20 10:40 Сейчас в теме

(5) А какое отношение битность 1с стала иметь к командам операционной системы?

7. johny1983 17.01.20 16:13 Сейчас в теме

(6) Такое, что если обычное приложение запущено из x64 клиента, то код не работает:

scrptCtrl = Новый COMОбъект("MSScriptControl.ScriptControl");
scrptCtrl.language = "vbscript";
scrptCtrl.addcode("
|
|Function GetUser()
|Set WSHShell = CreateObject(""WScript.Shell"")
|Set WshSysEnv = WshShell.Environment(""Process"")
|GetUser = WshSysEnv(""Username"")
|End Function
|
|Function GetClient()
|Set WSHShell = CreateObject(""WScript.Shell"")
|Set WshSysEnv = WshShell.Environment(""Process"")
|GetClient = WshSysEnv(""Clientname"")
|End Function
|");

ClientName = scrptCtrl.run("GetClient");
Если ВРег(ClientName) = "CONSOLE" ИЛИ ClientName = "" ИЛИ ClientName = Неопределено ИЛИ ClientName = Null Тогда // мы работаем локально
Возврат ВРег(ИмяКомпьютера());
Иначе
Возврат ВРег(ClientName);
КонецЕсли;

8. johny1983 17.01.20 16:59 Сейчас в теме

Разобрался вот так работает

WshShell = Новый COMОбъект("WScript.Shell");
ClientName = WshShell.ExpandEnvironmentStrings("%clientname%");

Если ClientName = "%clientname%" ИЛИ ВРег(ClientName) = "CONSOLE" ИЛИ ClientName = "" ИЛИ ClientName = Неопределено ИЛИ ClientName = Null Тогда // мы работаем локально
Возврат ВРег(ИмяКомпьютера());
Иначе
Возврат ВРег(ClientName);
КонецЕсли;