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

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

блокировать соединение с Интернетом [D6, WinXP]


Evereve ©   (2006-05-02 22:58:00) 

Инет к компу подходит по локалке. Нужно иметь возможность отключить юзеру инет, ну и включить тоже, программно.


Lex_!   (2006-05-05 09:50:00) [1]

На крайняк PCap :)


Lex_!   (2006-05-04 16:40:00) [2]

route del 0.0.0.0
route add 0.0.0.0 127.0.0.1


Slym   (2006-05-04 05:19:00) [3]

Интернет нужно блокировать на прокси/шлюзе, а не на клиенте!
Джо ©   (03.05.06 2:55) [2]
RenewDHCPLease

а если его нужно снова включить? удаленно! бежать на 5 этаж когда ты сидишь на первом... и включить нужно на 20 компах, и в разное время :) 20 раз на 5 этаж бегать будешь?


Джо   (2006-05-04 02:57:00) [4]

> [4] DrPass ©   (03.05.06 18:57)
> Ну ты живодер :-) А если у человека обычная локалка?

Чего не сделаешь ради радости "отключить юзеру инет"! :-)

А если серьезно, то там же можно как-то имя соединения в скрипте проверять и отключать нужное.


DrPass   (2006-05-03 18:57:00) [5]


> Джо ©   (03.05.06 02:55) [2]

Ну ты живодер :-) А если у человека обычная локалка?


Slym   (2006-05-03 09:43:00) [6]

UserGate


Джо   (2006-05-03 02:55:00) [7]

Можно покопаться с WMI, вот пример скрипта, отключающего все доступные DHCP-based соединения (скопипастил из MSDN):

strComputer = "."

Set objWMIService = GetObject( _
   "winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetCards = objWMIService.ExecQuery _
   ("Select * From Win32_NetworkAdapterConfiguration " _
       & "Where IPEnabled = True")
For Each objNetCard in colNetCards
   objNetCard.RenewDHCPLease()
Next


DrPass   (2006-05-03 01:04:00) [8]

Только через прокси-сервер. Разумнее, конечно, взять из сотни уже написанных...


Наверх

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