Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перезапустить програмно COM+ сервер [D6, Win2k]


Sour Smile ©   (2008-01-15 11:54:00) 

У нас, примерно раз в 3 дня, стабильно зависает сервер 1с8. Выяснилось, что необязательно перезапускать полностью сам сервер (компьютер), а достаточно перезапустить COM+ сервер самой 1с8 (Администрирование->Component Services).

А как можно его перезапустить програмно? Ну это для того, чтобы небольшая программка сама перезапускала его каждую ночь.

Просто я с COM+ никогда вплотную не сталкивался, и даже незнаю с какой стороны подойти к этой задаче...


Sour Smile   (2008-01-16 09:45:00) [1]


> malina   (15.01.08 16:12) [1]
> Дык может луче будет выявить причину зависания?
> Может он раз в три дня пытается с кем-то связаться по сети?

Думаю врядли. Помоему 1с8 от рождения косая... У нас также стоит 1с77 - проблем вообще нет (кроме разве что ограничения на количество клиентов).


> Сергей М. ©   (15.01.08 16:15) [2]
> А ты, типо, эникейщик в этой конторе ?)

Типа да, на все клавиши мастер... :)

Кстати мы нашли решение этой задачи. Здесь: http://www.kuban.ru/forum_new/forum9/arhiv/296180.html

В переводе на Delphi это звучит так:

var
 Applications: TCOMAdminCatalogCollection;
 aName: WideString;
 i: Integer;
begin
 COMAdminCatalog1.Connect;
 Applications:=COMAdminCatalog1.GetCollection('Applications');
 Applications.Populate;

  fori := 0 toApplications.Count-1 do
 begin
   aName:=Applications.Get_Item(i).Get_Name;
    ifaName='1CV8' then
    begin
     COMAdminCatalog1.ShutdownApplication(aName);
     Break;
    end;
  end;
 COMAdminCatalog1.Disconnect;
end;


Сергей М.   (2008-01-15 16:15:00) [2]


> Sour Smile   (15.01.08 11:54)


А ты, типо, эникейщик в этой конторе ?)


malina   (2008-01-15 16:12:00) [3]


>  примерно раз в 3 дня, стабильно зависает сервер 1с8

Дык может луче будет выявить причину зависания?
Может он раз в три дня пытается с кем-то связаться по сети?


Наверх

Титульная страница Поиск, карта сайта Написать письмо