[Окна, Диалоги] Запрет на посещение сайта(например vk.com)

[timbol]

Подскажите пожалуйста как реализоватьтакое,при открытии сайта? например vk.com?доступ сразу блокировался бы при входе на этот сайт или вкладка в браузере закрывалась бы!Заранее спасибо!

Имею вот такой код,но он очень жестокий,при появлении окна vk.com браузер моментом закрывается

#NoTrayIcon
 
While 1
 
Sleep(500)
 
Local $ActiveWindow = WinGetTitle("")
 
$ActiveWindow = StringInStr($ActiveWindow ,"vk.com")
 
If $ActiveWindow > 0 Then
 
If ProcessExists ("Iexplore.exe") Then ProcessClose("Iexplore.exe")
If ProcessExists ("Chrome.exe") Then ProcessClose("Chrome.exe")
If ProcessExists ("Firefox.exe") Then ProcessClose("Firefox.exe")
If ProcessExists ("Opera.exe") Then ProcessClose("Opera.exe")
 
 
Endif
 
WEnd

 

[hedji]

OffTopic:

Запрет посещения сайтов обычно делается не через закрытие браузера.
вот здесь посмотрите один из вариантов решения

 

[All2khoff]

Здравствуйте, простите что в некро-тему.

#NoTrayIcon
 
While 1
 
Sleep(500)
 
Local $ActiveWindow = WinGetTitle("")
 
$ActiveWindow = StringInStr($ActiveWindow ,"vk.com")
 
If $ActiveWindow > 0 Then Send("^w") ;закрыть вкладку
Endif
 
WEnd