![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Перезапустить програмно 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
Дык может луче будет выявить причину зависания?
Может он раз в три дня пытается с кем-то связаться по сети?