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

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

Как сделать STOP и START MSSQL программно [D6, MSSQL]


Term ©   (2005-07-25 10:59:00) 

Как сделать STOP  и START MSSQL программно, ведь через EM можно


Term   (2005-07-25 13:35:00) [1]

народ есть кто живой


Term   (2005-07-25 13:24:00) [2]

там еще чтото кажется с привелегиями связанное надо учитывать...


Term   (2005-07-25 13:19:00) [3]

чтото не получается...

ServiceManager1:=TServiceManager.Create;
Sravnen.Indikator.StateOn:=ServiceManager1.Connect('MLS1','Apteka',983103);


отругайте поправте


Reindeer Moss Eater   (2005-07-25 12:19:00) [4]

OpenSCManager и так далее.


Nikolay M.   (2005-07-25 11:56:00) [5]


> Ega23 ©   (25.07.05 11:52) [8]
> Но ведь работает-же?  :о)

Нууу... как сказать...
Под каким логином, например, ты собираешься коннектиться? А если сменился пароль или логин убили? Да и вообще, мало ли, по каким причинам может не произойти коннект. Так что твой способ ненадежный. Самое правильное - проверять статус сервиса mssqlserver.


Ega23   (2005-07-25 11:52:00) [6]

2 Nikolay M. ©   (25.07.05 11:47) [4]
Извращенец :)

Да, я такой!  
Но ведь работает-же?  :о)


Nikolay M.   (2005-07-25 11:51:00) [7]


> Term ©   (25.07.05 11:47) [5]
> а то г мознуть и запусить только так как сказанно выше???

:)))

[4]. Но по сути это аналогично [1]. В обоих случаях пускается или останавливается сервис.


Term   (2005-07-25 11:50:00) [8]


> Можно обойтись и без команды net, пускать-останавливать
> сервис самостоятельно:
> http://www.megalib.com/books/923/478.htm


то что нужно спасибо


Nikolay M.   (2005-07-25 11:47:00) [9]


> Ega23 ©   (25.07.05 11:45) [3]

Извращенец :)

Можно обойтись и без команды net, пускать-останавливать сервис самостоятельно:
http://www.megalib.com/books/923/478.htm


Term   (2005-07-25 11:47:00) [10]


> try
>  ADOConnection1.Connected:=True;
>  ShowMessage('Взлетит!');
> except
>  ShowMessage('Не взлетит!');
> end;
:)))))

а тогмознуть и запусить только так как сказанно выше???


Ega23   (2005-07-25 11:45:00) [11]

а как проверить тогда состояние???

try
 ADOConnection1.Connected:=True;
 ShowMessage('Взлетит!');
except
 ShowMessage('Не взлетит!');
end;


Term   (2005-07-25 11:32:00) [12]

т.е. запусьтить их через ShellExecute ???

а как проверить тогда состояние???


Nikolay M.   (2005-07-25 11:08:00) [13]

Например
net start mssqlserver
net stop mssqlserver
?


Наверх

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