1С и Windows Script Host (WSH) и Windows Management Instrumentation (WMI). ОТ ТЕОРИИ К ПРАКТИКЕ. Часть I

14.01.15

База данных - Администрирование СУБД

Описание возможностей Windows Script Host и Windows Management Instrumentation. Подборка "скриптовых" функций и процедур.

Следующие:

1С и WSH и WMI. ОТ ТЕОРИИ К ПРАКТИКЕ. Часть II: //infostart.ru/public/166391/
1С и WSH и WMI. ОТ ТЕОРИИ К ПРАКТИКЕ. Часть III: //infostart.ru/public/166440/

Практическая реализация:

Обработка 1С:Системный Администратор (WSH&WMI): //infostart.ru/public/172189/


ТЕОРИЯ


Microsoft Windows Script Host (WSH) - сервер сценариев Windows.

Используется в качестве инструмента разработки и выполнения специальных сценариев для операционной системы Windows.
Сценарии WSH пишутся на специализированных языках: Microsoft Visual Basic Script Edition (VBScript) или Microsoft JScript.
Свойства и методы объектов Microsoft WSH доступны также в приложениях, способных выступить в роли OLE-клиента.

WSH позволяет работать с:

    - Файловой системой;
    - Ресурсами локальной сети;
    - Реестром;
    - Специальными папками и ярлыками Windows;
    - Процессами. Запускать и контролировать их выполнение.

WSH позволяет взаимодействовать с Microsoft ActiveX:

    - ActiveX Data Object (ADO) — Доступ к базам данных;
    - Active Directory Service Interface (ADSI) — Службы каталогов;
    - Windows Management Instrumentation (WMI) — Инструментарий управления Windows.

Подробно свойства и методы объектов MS Windows Script Host изложены в файле Automation.chm, доступном в ссылках на скачивание.

Windows Management Instrumentation (WMI) - инструментарий управления Windows.

WMI - это одна из базовых технологий для централизованного наблюдения и управления компьютерной инфраструктуры под управлением платформы Windows.
WMI – это расширенная и адаптированная компанией Microsoft реализация стандарта WBEM (WebBased Enterprise Management) компании DMTF Inc.
Основа WBEM - Common Information Model (CIM), реализующая объектно-ориентированный подход к представлению компонентов системы.

WMI позволяет работать с:
    - Системой;
    - Приложениями;
    - Оборудованием;
    - Сетями;
    др. управляемыми компонентами.

Подробно о Windows Management Instrumentation (англ.): http://msdn.microsoft.com/en-us/library/windows/desktop/aa394572%28v=vs.85%29.aspx


ПРАКТИКА


Список процедур и функций:

- Computer_WindowsInfo() - Ф., позволяющая получить информацию об установленной Windows на лок./уд. компьютере.
- SendKeys() - П.: - Имитация нажатия клавиш.
-
ПреобразоватьИзСтрокиВДату() - Ф., возвращающая результат преобразования строкового значения даты в значение в формате даты.

-
ВремяВМиллисекундах() - Ф., возвращающая время в миллисекундах или секундах.

-
ЗадержкаВВыполнении()
- Ф. задержки выполнения процесса.

-
SetDateTime() - Ф. вызова оснастки установки системных Даты и Времени.

-
ControlPanelItem() - Ф. вызова оснастки Панели управления.

-
SystemEnvironment() - Ф., позволяющая получить Переменные окружения лок. компьютера.
- Computer_Motherboard() - Ф., позволяющая информацию о материнской плате лок./уд. компьютера.
-
Computer_BIOS() - Ф., позволяющая информацию о BIOS лок./уд. компьютера.

-
Computer_Processor() - Ф., позволяющая получить информацию о процессоре(ах) на лок./уд. компьютере.

-
Computer_RAM() - Ф., позволяющая получить информацию о памяти на лок./уд. компьютере.

-
Computer_TotalPhysicalMemory() - Ф., позволяющая получить информацию об объеме установленной памяти на лок./уд. компьютере.

-
Computer_PhysicalMemory() - Ф., позволяющая получить информацию о физической памяти на лок./уд. компьютере.

-
Computer_VirtualMemory() - Ф., позволяющая получить информацию о виртуальной памяти на лок./уд. компьютере.

-
Computer_Video(
Ф., позволяющая получить информацию о видео на лок./уд. компьютере.
-
Computer_Monitor() - Ф., позволяющая получить информацию о мониторе(ах) на лок./уд. компьютере.
- Computer_Printer() - Ф., позволяющая получить список подключенных принтеров лок./уд. компьютера.
-
Network_Printer() - П. подключения сетевого принтера.
-
User_ComputerSystem() - Ф., позволяющая получить Имя пользователя, зарегистрировавшегося на лок./уд. компьютере.
-
GET_ComputerName_UserName_UserDomain() - Ф., позволяющая получить локальные имена: Компьютера, Пользователя, Домена.
- Computer_UserList() - Ф., позволяющая получить список учётных записей на лок./уд. компьютере.
-
Computer_GroupList() - Ф., позволяющая получить список групп пользователей на лок./уд. компьютере.
-
Computer_GroupUsersList() - Ф., позволяющая получить список групп и их пользователей на лок./уд. компьютере.

Вступайте в нашу телеграмм-группу Инфостарт

Windows Windows Script Host WSH Windows Management Instrumentation WMI VBS 1С скрипт script реестр управление конфигурация системная информация удаленный компьютер

Вы можете заказать платную адаптацию этой статьи под ваши задачи на «Бирже заказов».

  • 0% комиссии — оплата напрямую исполнителю;
  • Исполнители любого масштаба — от отдельных специалистов до команд под проект;
  • Прямой обмен контактами между заказчиком и исполнителем;
  • Безопасная сделка — при необходимости;
  • Рейтинги, кейсы и прозрачная система откликов.

См. также

Администрирование СУБД Системный администратор Программист Бесплатно (free)

5,5 тысячи пользователей в единой базе 1С, розница в режиме 24/7 и SLA 99,98% – в таких условиях любая авария быстро превращается в очереди на кассах, потерю денег и давление со стороны бизнеса. Показываем, как выстроить процесс аварийно-восстановительных работ: от первых алертов и базового скрининга системы до подключения команды, проверки гипотез и дебрифа после инцидента. Разбираем, как метрики, дашборды, техжурнал, Zabbix, Prometheus, Grafana, Telegram-боты и скрипты помогают не гадать, а быстро находить причину проблемы. На реальных авариях объясняем, почему «быстро» не должно означать «рискованно», как работа над ошибками снижает панику и почему каждая авария может сделать систему надежнее.

11.08.2026    1637    jul.dolganova    8    

21

Администрирование СУБД Пароли Системный администратор 1С 8.3 1С:Розница 2 1С:Управление производственным предприятием Абонемент ($m)

Пароль пользователя СУБД лежит в 1CV8Clst.lst обратимо: кто читает папку srvinfo - достаёт пароли SQL всех баз кластера, минуя права 1С. Обработка показывает, у каких баз пароль извлекается, помечает слабые и выдаёт план защиты. К СУБД не подключается, ничего не пишет - только читает файл.

10 стартмани

06.08.2026    719    12    nedomolkov.ivan    0    

7

Администрирование СУБД Системный администратор 1С 8.3 Бесплатно (free)

Прогнал набор диагностических скриптов на двух рабочих базах: боевой с 580 сеансами и малонагруженной. Разбираю пять находок: статистика 97-дневной давности, 598 запросов со сканами, журнал транзакций в 73 % от данных, tempdb в один файл и 81 % ожиданий на параллелизме, который чинить не надо. Плюс три грабли, из-за которых самописный диагностический скрипт падает на чужом сервере. Семь рабочих скриптов внутри, копируются в SSMS как есть.

05.08.2026    1007    nedomolkov.ivan    8    

7

Администрирование СУБД Журнал регистрации Системный администратор Программист 1С 8.3 Бесплатно (free)

Журнал регистрации на нагруженной базе перестаёт открываться: файлы растут на гигабайты в день, просмотр виснет, история недоступна. Рассказываю, как мы вынесли журнал трёх продуктивных баз в ClickHouse: 35 млрд событий, поиск всех ошибок за сутки — 0,11 секунды, привычная форма журнала для пользователей и падение числа ошибок в проде в 23 раза за полгода. Архитектура, схема таблицы, грабли интеграции и все цифры с прода.

04.08.2026    1258    nedomolkov.ivan    0    

8

Администрирование СУБД 1С 8.3 1С:ERP Управление предприятием 2 Бесплатно (free)

База 1С:ERP размером 646 Гб, полное маскирование за 5 часов - без создания промежуточной незащищенной копии. Разбираем бесплатный pg_anon на сквозном примере с реального продуктива.

27.07.2026    2470    Tantor    16    

13

HighLoad оптимизация Администрирование СУБД Программист Россия Бесплатно (free)

Если вы работаете с 1С на PostgreSQL и жалуетесь на тормоза — скорее всего, дело в join predicate pushdown, которого в стандартном PostgreSQL нет. В MS SQL Server этот механизм работает «из коробки», и при миграции именно запросы к виртуальным таблицам 1С бьют по производительности сильнее всего. В этой статье — реальный кейс от Postgres Professional с разбором плана выполнения, ручным экспериментом и доработкой планировщика СУБД, которая ускорила запросы от 22 до 54 000 раз.

16.06.2026    8823    postgres_professional    13    

12

HighLoad оптимизация Администрирование СУБД Системный администратор Программист 1С:Предприятие 8 Бесплатно (free)

Вышел релиз СУБД Tantor Postgres 18, и мы хотим рассказать о его новых возможностях для работы с приложениями на платформе "1С:Предприятие". В обзоре разберем улучшения планировщика, по традиции коснемся работы временных таблиц и не обойдем вниманием вспомогательные утилиты, которые упрощают поиск и диагностику проблем в высоконагруженных системах. За каждым пунктом - реальные запросы 1С, реальные рабочие базы и сотни часов тестирования!

16.06.2026    3366    Tantor    7    

10

Администрирование СУБД Системный администратор Программист 1С:Предприятие 8 Россия Бесплатно (free)

База 1С за несколько лет эксплуатации разрослась, - стала большой, медленно работает, требует много места и времени для копирования и прочего обслуживания. Нужна ли обязательно свертка или можно обойтись более «мягкими» средствами. Делюсь своим опытном как для новых конфигураций, так и для старых УПП, УТ 10…

01.06.2026    8071    2ncom    30    

11
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. wunderland 203 12.12.12 17:36 Сейчас в теме
за примеры в контексте 1С - отдельное спасибо
7. StepByStep 3703 13.12.12 12:58 Сейчас в теме
(1) wunderland,
Пожалуйста. Главное - чтобы было полезно.
2. pumbaE 12.12.12 19:00 Сейчас в теме
Только не позволяет выполнять это все на linux.
3. q_i 587 13.12.12 12:07 Сейчас в теме
(2) pumbaE, хорошую тему для хорошей статьи обозначил! ;)
Интереса ради посмотрел - в 8.3 работает КомандаСистемы("sh -c """ + ТекстКоманды + """");
8. StepByStep 3703 13.12.12 13:01 Сейчас в теме
(2) pumbaE,
Linux - не проверялось. Работаю только в Windows.
4. pumbaE 13.12.12 12:12 Сейчас в теме
6. q_i 587 13.12.12 12:15 Сейчас в теме
(4) pumbaE, я не обещал готового рецепта ))) я лишь сказал что хорошая тема для проработки.
47. q_i 587 03.04.13 16:09 Сейчас в теме
(4) pumbaE, на сервере ЗапуститьПриложение().
5. q_i 587 13.12.12 12:13 Сейчас в теме
Вместо реализации задержки через ping имхо логичнее использовать WScript.Sleep(...).
9. StepByStep 3703 13.12.12 13:10 Сейчас в теме
(5) q_i,
Метод Sleep действительно существует у объекта WScript.
НО WScript существует только для скриптов, которые вызываются из командной строки,
Объект WScript нельзя получить, используя COMОбъект.
Следовательно надо создавать файл, скажем во временной папке, записать туда текст скрипта, а потом его выполнять, после этого - в общем случае - удалить этот файл.
user1384340; +1 Ответить
10. q_i 587 13.12.12 14:44 Сейчас в теме
11. astonvilla 235 14.12.12 10:54 Сейчас в теме
Не знаю, пригодиться ли это, но не плюсануть за картинку не мог :))))))
ЧИА; StepByStep; +2 Ответить
17. StepByStep 3703 14.12.12 11:34 Сейчас в теме
(11) astonvilla,
Мне тоже картинка понравилась .........
57. ЧИА 170 15.02.14 08:17 Сейчас в теме
проснулся в 5 утра, полазил по сайту, через рекламу и косвенные ссылки попал сюда, решил сохранить, а вот коммент (11) astonvilla, вначале не понял.
пересмотрел внизу картинки, почесал голову, поработал, еще раз пересмотрел
догадался посмотреть вверху

ржал минут 5
плюсую
12. DMSDeveloper 149 14.12.12 11:11 Сейчас в теме
Для работы со скриптами на уровне COM Используется MSScriptControl.
В примере есть упоминание о нем.
&НаКлиентеНаСервереБезКонтекста
Функция ВремяВМиллисекундах()


Но тут есть одна проблема с которой я столкнулся и разрешить так и не смог.

При создании объекта на 64 битном сервере 1С (Именно 1С, не Win) - объект не создается, что то там с политиками безопасности от мелкомягких. Не все 32 битные COM-ы могут быть вызваны 64 битным приложением.
MSScriptControl - один из них :(
StepByStep; +1 Ответить
13. ediks 339 14.12.12 11:19 Сейчас в теме
Нисколько не уменьшая ценности публикации:
Еще больше примеров, правда на VB, на ресурсе Разработка скриптов
wowik; a.podobin; StepByStep; +3 Ответить
15. StepByStep 3703 14.12.12 11:32 Сейчас в теме
(13) ediks,
Спасибо. Надо будет посмотреть.
14. SeiOkami 3643 14.12.12 11:30 Сейчас в теме
Плюс!
Автор, спасибо за примеры в контексте 1С. Напиши, пожалуйста, статью с бОльшим количеством примеров =)
StepByStep; +1 Ответить
16. StepByStep 3703 14.12.12 11:33 Сейчас в теме
(14) SeiOkami,
Статья обязательно пополнится примерами.
Есть еще определенные "вещички" ...
18. KliMich 14.12.12 12:01 Сейчас в теме
Спасибо! Очень полезно! Хотелось бы продолжения (часть 2, часть 3 и т.д.).
20. StepByStep 3703 17.12.12 10:45 Сейчас в теме
(18) KliMich,
ЕСТЬ ПРОДОЛЖЕНИЕ !
19. Stamper 45 14.12.12 14:03 Сейчас в теме
однозначно плюс. жаль, нельзя второй поставить за картинку -- просто ураган :)
StepByStep; +1 Ответить
21. mzelensky 53 20.12.12 07:52 Сейчас в теме
22. zarucheisky 20.12.12 13:25 Сейчас в теме
Автору стоило бы знать что большинство, что понаписано реализуется самой платформой не хуже.
Да и есть старый, добрый
www.script-coding.com
Шёпот теней; +1 Ответить
23. StepByStep 3703 23.12.12 12:35 Сейчас в теме
(22) zarucheisky,
Определенные - да.
Ссылка на старый-добрый www.script-coding.com была ранее 13. ediks
24. StepByStep 3703 23.12.12 12:36 Сейчас в теме
Добавлена новая функция СетевоеОкружение().
25. StepByStep 3703 27.12.12 21:03 Сейчас в теме
Добавлены новые функции:
1. SetDateTime() - Установка системных Даты и Времени.
2. ControlPanelItem() - Вызов оснастки из Панели управления.
26. StepByStep 3703 09.01.13 09:37 Сейчас в теме
Добавлена функция, позволяющая получить список подключенных принтеров локального/удаленного компьютера.
27. StepByStep 3703 13.01.13 23:18 Сейчас в теме
Добавлены:
1. Функция, позволяющая информацию о BIOS локального/удаленного компьютера.
2. Функция, позволяющая получить Имя пользователя, зарегистрировавшегося на локальном/удаленном компьютере.
28. StepByStep 3703 17.01.13 16:03 Сейчас в теме
Добавлено пояснение по настройке и проверке работы Windows Management Instrumentation - Инструментарий управления Windows.
29. StepByStep 3703 24.01.13 11:56 Сейчас в теме
Добавлены 2 новые функции: ServerSession и ServerConnection.
30. yuraos 1008 26.01.13 13:31 Сейчас в теме
Спасибо автору!
Недавно озадачился, как можно в 1с8.х засечь время выполнения в коде миллесекундах.
И вот нашел здесь один из способов.
31. yuraos 1008 29.01.13 09:07 Сейчас в теме
(30)
еще раз спасибо - реально пригодилось!
теперь могу засекать время выполнения запросов с точностью до миллисекунды.
---
проблемка с другой процедуркой:
SendKeys(KEYS_ENG = "^+z", KEYS_RUS = "^+я")
Пытаюсь имитировать вызов на редактирование поля ввода в форме по клавише 'F4'
(смотри код ниже) - ничего выходит (тип редактируемого значения - "СписокЗначений").
Процедура SendKeys(KEYS_ENG = "^+z", KEYS_RUS = "^+я")
	Если ПустаяСтрока(KEYS_ENG) И ПустаяСтрока(KEYS_ENG) Тогда
		Возврат;
	КонецЕсли; 
    
    Попытка
        WshShell = Новый COMОбъект("Wscript.Shell");
		Если НЕ ПустаяСтрока(KEYS_ENG) Тогда
	        WshShell.SendKeys(KEYS_ENG);    // для случая, если текущей является английская раскладка клавиатуры.
		КонецЕсли; 
		Если НЕ ПустаяСтрока(KEYS_RUS) Тогда
	        WshShell.SendKeys(KEYS_RUS);    // для случая, если текущей является русская раскладка клавиатуры.
		КонецЕсли; 
        // SendKeys(String) - имитируется нажатие клавиши или последовательности клавиш, указанных в параметре String.
        // В качестве параметра можно указывать как алфавитно-цифровые символы, так и символы специальных клавиш, например:
        // "Enter", "Tab", "F1", "Alt", "Shift", "Ctrl" и т.д. 
        // Для указания клавиш "Alt", "Shift", "Ctrl" существуют специальные коды:
        // "Shift" - +;
        // "Ctrl" - ^;
        // "Alt" - %.
        // Если возникнет необходимость передать специальные символы именно как символы, а не команды, 
        // нужно заключать их в фигурные скобки, например {+}.   
	Исключение
		Сообщить(ОписаниеОшибки());
    КонецПопытки;

КонецПроцедуры

Процедура СписокНомеровПС_КонтМенюИзменить(Кнопка)
	Если ЭтаФорма.ТекущийЭлемент <> ЭлементыФормы.СписокНомеровПС Тогда
		ЭтаФорма.ТекущийЭлемент = ЭлементыФормы.СписокНомеровПС;
	КонецЕсли;
	SendKeys("F4","F4");
КонецПроцедуры

Показать
32. StepByStep 3703 30.01.13 12:09 Сейчас в теме
(31) yuraos,
Пожалуйста. Рад, что Вам пригодилось.

По поводу Вашего вопроса:
Некоторые специальные символы следует всегда задавать заключёнными в фигурные скобки.
В частности и F4:
SendKeys("{F4}","{F4}");

Попробуйте.

Удачи.
33. yuraos 1008 31.01.13 06:51 Сейчас в теме
(32)
у щайтан-скобка!
SendKeys("{F4}","{F4}") - проканало.
спасибо огромное!!!

А нет в Windows Script Host каких-нибудь объектов,
которые позволили бы в 1С через подписку на события
перехватывать обработку ввода с мыши и клавиатуры?
34. StepByStep 3703 06.02.13 13:07 Сейчас в теме
(33) yuraos,
WSH - это работа в командной строке.
И опции типа SendKeys - это скорее приятные полезности.
Ответ: нет.
39. yuraos 1008 13.02.13 18:45 Сейчас в теме
(33)
иище раз о ВремяВМиллисекундах():
В каких ситуациях в функции может сработать исключение и
вместо миллисекунд функция вернет 1С-ное текущее время-дату ???

PS:
В своем варианте по исключению я возвращаю значение:
1000*(ТекущаяДата() - '1970-01-01:06:00:00')
как более подходящее по смыслу - округленное до целых секунд число миллисекунд.
06:00:00 - это наверное из-за разницы времени между Новосибирском и Гринвичем.
42. StepByStep 3703 16.02.13 15:26 Сейчас в теме
(39) yuraos,
В каких ситуациях в функции может сработать исключение и
вместо миллисекунд функция вернет 1С-ное текущее время-дату ???

При тестировании на 32-битных системах "Исключение" не вызывалось.
Возможно ситуация, описанная (12) DMSDeveloper.
35. StepByStep 3703 06.02.13 13:09 Сейчас в теме
Добавлены новые функции: Computer_Processor(), Computer_RAM(), Computer_TotalPhysicalMemory(), Computer_VirtualMemory().
36. StepByStep 3703 08.02.13 16:58 Сейчас в теме
Добавлены новые функции: Computer_Motherboard() и Computer_Video().
37. StepByStep 3703 13.02.13 00:31 Сейчас в теме
Добавлены функции Computer_UserList(), Computer_GroupList(), Computer_GroupUsersList(), Computer_BuildINAdministrator().
38. soli_M_x6 13.02.13 00:47 Сейчас в теме
40. Матрос 14.02.13 04:52 Сейчас в теме
41. OVladius 32 14.02.13 13:23 Сейчас в теме
43. StepByStep 3703 17.02.13 17:25 Сейчас в теме
Добавлены функции: Computer_SystemService(), Computer_SystemProcess(), Computer_EventsList()
44. StepByStep 3703 20.02.13 11:25 Сейчас в теме
Добавлены функции: Computer_KillProccess(), Computer_RebootShutdown().
45. StepByStep 3703 01.03.13 01:47 Сейчас в теме
Добавлена функция: Computer_PING(), позволяющая невизуально "пропинговать" удаленный компьютер.
46. StepByStep 3703 25.03.13 01:59 Сейчас в теме
Добавлена Функция Computer_Terminal(), позволяющая получить информацию о терминальных сессиях на сервере (локальный/удаленный компьютер).
48. slaviksoft 75 12.07.13 14:07 Сейчас в теме
при вызове Win32Shutdown с флагами отличными от 0 - ничего не происходит
или я что-то не так делаю

Пример:
 WinMGMT = ПолучитьCOMОбъект("winmgmts:\\.\root\cimv2");
        Win32_OS = WinMGMT.ExecQuery("SEL ECT * FR OM Win32_OperatingSystem where Primary=true");
        
        Reserved = 0;   // Зарезервированный параметр. Игнорируется.
        Для Каждого OS ИЗ Win32_OS Цикл
            OS.Win32Shutdown(6, Reserved);
        КонецЦикла;
StepByStep; +1 Ответить
49. StepByStep 3703 23.09.13 01:58 Сейчас в теме
(48) slaviksoft,
Какая у Вас операционка ?
51. StepByStep 3703 23.09.13 12:29 Сейчас в теме
(48) slaviksoft,
СПАСИБО.

Вместо строчки:
WinMGMT = ПолучитьCOMОбъект("winmgmts:\\.\root\cimv2"); 


Необходимо:
WinMGMT = ПолучитьCOMОбъект("winmgmts:{impersonationLevel=impersonate,(Shutdown)}!\\" + Computer + "\root\cimv2");


Проверил на Windows XP x32 и Windows 7 x64.
50. StepByStep 3703 23.09.13 02:00 Сейчас в теме
23.09.2013 г.

Добавлены функции:

Computer_WindowsInfo()
Computer_Monitor()
Computer_PhysicalMemory()
52. echo77 1943 01.10.13 09:24 Сейчас в теме
Функция NetworkNeighborhood() ничего не возвращает в ОС старше Win-XP
StepByStep; +1 Ответить
53. StepByStep 3703 01.10.13 10:09 Сейчас в теме
(52) echo77,
Да. Вы правильно указали.
В обработке 1С:Администратор http://infostart.ru/public/172189/ получение сетевого окружения переработано и дополнено для Windows Vista и выше.
Позднее подправлю статью.
СПАСИБО.
54. StepByStep 3703 08.10.13 00:55 Сейчас в теме
07.10.2013.
Функция Computer_MAC_IP() заменена на функцию Computer_NetworkAdapter().
55. MarSeN 987 16.10.13 08:59 Сейчас в теме
StepByStep,
А в каком случае SendKey может использоваться на сервере? К процедуре указана директива &НаКлиентеНаСервереБезКонтекста.
Я там понимаю, что для сендкея обязательно нужно открытое окно приложения и тем более открытая сессия (нормальная сессия с рабочим столом и т.п.), а на сервере такого вроде 1С сервер не создает?
StepByStep; +1 Ответить
56. StepByStep 3703 20.10.13 15:51 Сейчас в теме
(55) MarSeN,
Согласен с Вами, "физического" смысла это не имеет.
58. Voittamaton 29.03.14 16:31 Сейчас в теме
Почему-то не получается отправить символы с цифровой клавиатуры.
Нижеперечисленные варианты (также без скобок "()") приводят к ошибке "Произошла исключительная ситуация (0x80070057)".

1)
Ws = Новый COMОбъект("Wscript.shell");
Ws.SendKeys("^+({Pad-})");


2)
Ws = Новый COMОбъект("Wscript.shell");
Ws.SendKeys("^+({Subtract})");
61. StepByStep 3703 14.01.15 12:59 Сейчас в теме
(58) Voittamaton,
SendKeys("^+{SUBTRACT}"); - Ошибки не вызвало.
59. mzelensky 53 09.07.14 17:52 Сейчас в теме
Доброго времени суток! Подскажите плиз. Юзаю одну из ваших функций

Computer_GroupUsersList(

Она возвращает имя группы и имя пользователя. Можно ли как-то получить "полное имя пользователя" ну или как это назвать ПРЕДСТАВЛЕНИЕ. Т.е. то Имя, которое отображается у пользователя, если нажать кнопку "Пуск". Например имя пользователя может быть "Zelensky" а полное имя "Зеленский Максим". Вот мне нужно как-то получить это полное имя.
60. StepByStep 3703 14.01.15 12:42 Сейчас в теме
(59) mzelensky,
Функция Computer_UserList() возвращает таблицу значений, в которой есть FullName.
62. StepByStep 3703 14.01.15 13:00 Сейчас в теме
14.01.2015.
Добавлена функция
ПреобразоватьИзСтрокиВДату() - Ф., возвращающая результат преобразования строкового значения даты в значение в формате даты.
63. simple 19.01.15 17:57 Сейчас в теме
64. CaSH_2004 376 18.09.16 22:13 Сейчас в теме
Подскажите кто сталкивался, как решить проблему такую: пытаюсь получить список пользователей на удаленном сервере, так вот с одними серверами происходит нормально, а на одном не выполняет даже инициализацию: ПолучитьCOMОбъект("winmgmts:\\" + Computer + "\root\cimv2");
сначала ругался "Ошибка получения объекта COM: Сервер RPC недоступен."
Почитал тут что брэндмауэр нужно настраивать, пробовал но не помогало и я его вообще отключил, теперь ругается "Ошибка получения объекта COM: Отказано в доступе."

65. _1c_coder 54 30.09.17 12:48 Сейчас в теме
Подскажите как с помощью даного скрипта емулировать нажатие на маленькой клавиатуре NUM + и NUM -

так ошибка http://prntscr.com/gri3o7
ОбъектShell = Новый COMОбъект("Wscript.Shell");
	ОбъектShell.SendKeys("{Add}");
ОбъектShell.SendKeys("{Subtract}");



нужно когда картинка активизирована на форме кнопкой УМЕНЬШИТЬ УВЕЛИЧИТЬ менять масштаб
просто нажатие + и - работает,
ПОМОГИТЕ ЗНАТОКИ!!!!!!!!!!!
66. forusing 54 21.02.19 13:21 Сейчас в теме
(65) Для тех, кто долго искал как программно "нажать" Ctrl+Shift+{+} (развернуть все ветки; актуально для таблицы формы, представленной в виде дерева по произвольному запросу с группировкой). Работает следующий код:
	objShell = Новый COMОбъект( "WScript.Shell" );
	objShell.SendKeys( "^+" + Символ( 107 ) );
Amigo_0; RuzAleks; UberElder; +3 Ответить
67. UberElder 27.01.20 08:20 Сейчас в теме
(66)
"^+" + Символ( 107 )
Я так долго искал)) огромное тебе человеческое спасибо)
68. UberElder 27.01.20 08:33 Сейчас в теме
(66)
objShell = Новый COMОбъект( "WScript.Shell" );
objShell.SendKeys( "^+" + Символ( 107 ) );

Не подскажешь, может ты искал и знаешь какой символ надо подставить для того чтобы свернуть?
69. gero 60 27.01.21 12:04 Сейчас в теме
(68)
Попробуй 109 для сворачивания группировок табличного документа
70. simuljakr 207 11.01.22 10:30 Сейчас в теме
Спасибо!
Очень полезный набор функций.
В частности - пригодилась ЗадержкаВВыполнении().

Очень не хватает функции:

ОтформатироватьВсеКомпьютерыВЛокальнойСетиНафиг_И_СтеретьИмБ­ИОСЫЗаодно()
71. eugeniezheludkov 45 10.08.22 02:05 Сейчас в теме
(70) исходя из опыта пришел к выводу что если код на 1С упирается в то что требуется функция sleep, смотри что не так с архитектурой, это 100% сигнал рефакторинга.

это как в свое время использование функции goto/перейти ... вроде ничего такого, но если к ней вдруг понадобилось обратиться, смотри что не так с архитектурой.
эдакие маркеры говнокода чтоли
72. simuljakr 207 16.05.23 20:10 Сейчас в теме
При подключении сетевого принтера выдает ошибку в этой строке:

WshNetwork.AddWindowsPrinterConnection("\\192.168.102.221\MobilePrint1")


Ошибка при вызове метода контекста (AddWindowsPrinterConnection): Произошла исключительная ситуация (0x800706ba)

Проверил - IP адрес и имя принтера правильные.
Проверял при помощи WshNetwork.EnumPrinterConnections()

Кто-нибудь сталкивался ? Как можно исправить ?
73. adm1nb3k 22.01.24 02:20 Сейчас в теме
Указать бы еще и
PhysicalDiskInfo.SerialNumber = PhysicalDisk.SerialNumber;
Для отправки сообщения требуется регистрация/авторизация