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

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

Как запустить службу? [D7, XP]


SamProf ©   (2006-04-02 19:51:00) 

Создал TService, теперь усанавливаю её следующим образом:
ftp_serv /install.
Всё получается, служба появляется в списке служб, НО: она не запущена! как сделать чтобы она таки была запущена!
Спасибо!


palva   (2006-04-03 09:48:00) [1]

SamProf ©   (02.04.06 19:51)  
> Всё получается, служба появляется в списке служб
Теперь можно встать на эту службу в списке, по правой кнопке выйти на меню и нажать Start/Stop/Restart.


Сергей М.   (2006-04-03 09:46:00) [2]


> SamProf ©   (02.04.06 20:27) [8]


procedure TService2.ServiceStart(Sender: TService; var Started: Boolean);
begin
   ftp:=tftpserver.Create;
    Started := True;
end;

procedure TService2.ServiceStop(Sender: TService; var Stopped: Boolean);
begin
   ftp.Free;
    Stopped := True;
end;


AbrosimovA   (2006-04-03 09:19:00) [3]

MyService.exe /install /silent- тихая установка сервиса
net start "Example Service"  - запуск сервиса (кавычки, если имеем пробел)

Example Service- это значение ты задавал в свойстве DisplayNameдля сервиса.


Рамиль   (2006-04-02 21:11:00) [4]


> SamProf ©   (02.04.06 20:39) [13]

Зайди в останстку управления сервисами и стартани.


Leonid Troyanovsky   (2006-04-02 20:43:00) [5]


> SamProf ©   (02.04.06 20:39) [13]

> Я хочу, что бы умные люди просто поделились опытом! тут


Я могу лишь сказать, что, например, имя сервиса и имя его образа (exe) -
две большие разницы. Опредились для начала, с помощью хелпа, f.e.

--
Regards, LVT.


SamProf   (2006-04-02 20:39:00) [6]

Я хочу, что бы умные люди просто поделились опытом! тут скорее всего надо написать одну умную строчку!


Leonid Troyanovsky   (2006-04-02 20:37:00) [7]


`> SamProf ©   (02.04.06 20:34) [10]

> ну не шарю я!!!!!!! как надо?


Т.е., ты хочешь, чтоб за тебя пошарили?

--
Regards, LVT.


SamProf   (2006-04-02 20:35:00) [8]

Microsoft Windows XP [Версия 5.1.2600]
(С) Корпорация Майкрософт, 1985-2001.

C:\>net start ftp_serv
Неправильное имя службы.

Для вызова дополнительной справки наберите NET HELPMSG 2185.

C:\>


SamProf   (2006-04-02 20:34:00) [9]

ну не шарю я!!!!!!! как надо?
net start ftp_serv ???????? вроде и так не работает!


Leonid Troyanovsky   (2006-04-02 20:33:00) [10]


> SamProf ©   (02.04.06 20:27) [8]

> скомпилил и вышел exe! я понимаю, что exe емть служба! мне
> надо её запустить!


Странно, IMHO. Регистрируешь ftp_serv /install,
а пускать пытаешься Service2.

--
Regards, LVT.


SamProf   (2006-04-02 20:27:00) [11]

Я создал TServiceApplication.
В Tservice2 в методе

procedure TService2.ServiceStart(Sender: TService; var Started: Boolean);
begin
    ftp:=tftpserver.Create;
end;

procedure TService2.ServiceStop(Sender: TService; var Stopped: Boolean);
begin
    ftp.Free;
end;

скомпилил и вышел exe! я понимаю, что exe емть служба! мне надо её запустить!


Leonid Troyanovsky   (2006-04-02 20:22:00) [12]


> SamProf ©   (02.04.06 20:14) [6]

> > Не верю.

> Не веришь, что не работает?


Про не работает ты сам признал.
Я не верю в

> Ну скажем в exeшнике ftp_serv есть слежба Service2.


--
Regards, LVT.


SamProf   (2006-04-02 20:14:00) [13]


> Не верю.

Не веришь, что не работает?


Leonid Troyanovsky   (2006-04-02 20:11:00) [14]


> SamProf ©   (02.04.06 20:06) [4]

> Ну скажем в exeшнике ftp_serv есть слежба Service2.


Не верю.

--
Regards, LVT.


SamProf   (2006-04-02 20:06:00) [15]

Ну скажем в exeшнике ftp_serv есть слежба Service2. Я делаю:
ftp_serv /install
net start Service2.
Результат такой-же!


Leonid Troyanovsky   (2006-04-02 20:01:00) [16]


> SamProf ©   (02.04.06 19:56) [2]

> > net start?

> Сее что?


 Параметры комстроки, вестимо.

--
Regards, LVT.


SamProf   (2006-04-02 19:56:00) [17]


> net start?

Сее что?


Leonid Troyanovsky   (2006-04-02 19:53:00) [18]


> SamProf ©   (02.04.06 19:51)  

> не запущена! как сделать чтобы она таки была запущена


net start?

--
Regards, LVT.


Наверх

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