Tsapko Igor

2
Рейтинг

IgorTsapko



  •   Регистрация: 25.09.2011 (12 лет назад)

  •   Был(а) на сайте: 13.06.2016

Подписчики 2
Группы

Рейтинг 2

Вызов методов 1С из .NET
+2 –

Инструменты и обработки Системный администратор Программист Платформа 1С v7.7 Конфигурации 1cv7 Windows Абонемент ($m) Компонента, плагин (dll, vbs,..) Внешние источники данных

Вызов методов 1С из .NET

1 стартмани

12.04.2012    8052    3    IgorTsapko    1       

2
Смотреть все

Комментарии

Обмен › Вызов методов 1С из .NET › #0 12.04.12 14:25
Вызов методов 1С из .NET
Software › Интеграция 1С в приложение ASP.NET (C#) › #8 12.04.12 10:56
Я опубликовал решение, которое (я думаю) вам подойдет. http://infostart.ru/public/124772/
Software › Просто и со вкусом. Добавление принтера › #21 10.02.12 14:43
(19) eGORG,

Если заголовок службы (Windows Audio) на машинах разный (а так и будет в английской винде в службах, которые по-русски называются), то лучше использовать Name, а не Caption:

Код
Dim objWMI, objCollection, objItem, intRetCode
Const ServiceName  = "AudioSrv"

Set objWMI = GetObject("winmgmts:{impersonationLevel=Impersonate}!\\.\root\cimv2")
Set objCollection = objWMI.ExecQuery("SELECT Name FROM Win32_Service WHERE Name ='" & ServiceName  & "'")
For Each objItem In objCollection
   objItem.StopService
WScript.Echo "Служба " & objItem.Name & " остановлена."
   objItem.StartService
WScript.Echo "Служба " & objItem.Name & " запущена."
   
Next
Software › Просто и со вкусом. Добавление принтера › #20 10.02.12 14:39
(19) eGORG,

Цитата
Вариант вызвать из vb bat-файл не предлагать!:)
:D

Код
Dim objWMI, objCollection, objItem, intRetCode
Const ServiceCaption = "Windows Audio"

Set objWMI = GetObject("winmgmts:{impersonationLevel=Impersonate}!\\.\root\cimv2")
Set objCollection = objWMI.ExecQuery("SELECT Name FROM Win32_Service WHERE Caption='" & ServiceCaption & "'")
For Each objItem In objCollection
   objItem.StopService
WScript.Echo "Служба " & objItem.Name & " остановлена."
   objItem.StartService
WScript.Echo "Служба " & objItem.Name & " запущена."
   
Next


Например так. Вместо "Windows Audio" свое подставить нужно естественно :) Учетка, от которой запускается скрипт, должна иметь соответствующие права как ни странно :)
Admin › Удаленное соединение через Интернет › #16 09.02.12 18:06
RemoteApp вместе с грамотной настройкой групповых политик (gpedit.msc) плозволить не пустить пользователей куда не надо, а easyPrint даст возможность не ставить на удаленных клиентов никакого допсофта, достаточно винды
Admin › Удаленное соединение через Интернет › #15 09.02.12 18:04
VPN + терминал. Если терминал на 2008 сервере, то можно RemoteApp использовать + EasyPrint для печати.
Hardware › ИНЕТ › #26 09.02.12 18:02
А вообще, самый дешевый вариант для небольшой сетки - поставить ADSL модем с роутером (если ADSL) или просто роутер с USB (типа dlink dir320) если интернет по USB-модему. А дальше в роутер включить свич и раздавать на сетку
Hardware › Win2003+SQL2k+1С7.7: Как распорядиться 4-мя HDD? › #16 09.02.12 18:00
Первый вариант. Плюсом будет и надежность при (не дай Бог) падениях и разнесение по винтам, что даст плюс по производительности
Software › Посоветуйте простую программу типа Radmin для работы в локальной сети. › #140 09.02.12 17:58
DameWare NT Utilities - самое то! И процессы можно смотерть и управлять, и монитор и все что только может понадобиться. Плюс легкая установка, управление, вся организация как на ладони.
Software › Просто и со вкусом. Добавление принтера › #16 06.02.12 19:23
(15) eGORG, в командной строке net stop ИМЯ_СЛУЖБЫ и net start ИМЯ_СЛУЖБЫ
Если скриптом, то нужно сделать файл с расширением bat и записать в него две строки:

@net stop ИМЯ_СЛУЖБЫ
@net start ИМЯ_СЛУЖБЫ

где ИМЯ_СЛУЖБЫ = имя службы печати.