Что нового

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

timbol

Новичок
Сообщения
1
Репутация
0
Подскажите пожалуйста как реализоватьтакое,при открытии сайта? например 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
 

All2khoff

Продвинутый
Сообщения
347
Репутация
65
Здравствуйте, простите что в некро-тему.

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