Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Windows [игнор отключен] [закрыт для гостей] / Win-2003 - Подключение VPN при загрузке / 4 сообщений из 4, страница 1 из 1
14.06.2005, 11:54
    #33115281
VERS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Win-2003 - Подключение VPN при загрузке
Привет народ,

Проблемка такая. Есть VPN соединение. Стоит KWRF 6.0.10.
При загрузке ОС поднимается то самое соединение.
Но ... есть еще сервис Apache. Он забайнден на IP VPN соединения.
Как сделать так, чтобы сначала подключался VPN а потом запускался сервис Апаш?
А так, Апаш не обнаруживает соединение и падает без загрузки жалуясь на отсутствие АйПи ...
Очень не хорошо получается, особенно по выходным, когда меня нет перед компом...

-------------------------------
www.free-lancer.ru
...
Рейтинг: 0 / 0
14.06.2005, 14:13
    #33115669
ScareCrow
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Win-2003 - Подключение VPN при загрузке
запускать апач батником, а автозагрузке...
...
Рейтинг: 0 / 0
14.06.2005, 14:24
    #33115701
rrrrrrrrrr
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Win-2003 - Подключение VPN при загрузке
ScareCrowзапускать апач батником, а автозагрузке...И автологон :)

Есть такая мысль: использовать для запуска обеих служб планировщик (при старте системы не грузится ни одна (тип запуска "вручную"), обе запускаются планировщиком (часов в 6-30 утра одна и в 6-35 - другая). Только надо проверить. как они оба реагируют на второй инстанс - а то через неделю MessageBox'ами завалит

Можно еще и так: пишем сервис (на Билдере или Дельфи - там думать не надо), и в событие OnStart пишем запуск thread с WinExec(KWRF,...), затем валяем дурака минут 5 в тупом цикле и запускаем Apache.

Вообще, конечно, туповато выходит, если пользоваться виндовыми средствами, а не писать программой...
...
Рейтинг: 0 / 0
14.06.2005, 14:39
    #33115741
VERS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Win-2003 - Подключение VPN при загрузке
Все ОК. Поставил VBS на afterdial :)

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" _
    & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery _
    ("Select * from Win32_Process Where Name = 'Apache.exe'")

If colProcessList.Count <  1  Then
Dim oShell
Set oShell = WScript.CreateObject ("WSCript.shell")
oShell.run "sc start Apache"
Set oShell = Nothing
End If

Set objWMIService = Nothing
-------------------------------
www.free-lancer.ru
...
Рейтинг: 0 / 0
Форумы / Windows [игнор отключен] [закрыт для гостей] / Win-2003 - Подключение VPN при загрузке / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]