Блокировка доступа к интернету

← →
volkafff © (2011-05-18 13:31) [0]

Здравствуйте! Подскажите,как заблокировать доступ к интернету?
То есть что-то типа:
"If dostyp=false then
begin
//как-то запретить доступ(браузер не отображает страницы)
end
else
//Разрешить доступ
end;

Если это очень сложно,то хотя бы объясните, как запретить/разрешить доступ отдельно каждому браузеру? Заранее спасибо!

← →
Palladin © (2011-05-18 13:42) [1]

поди убийцу outpost"а пишешь

← →
И. Павел © (2011-05-18 13:46) [2]

Может быть на основе этого можно что-то сделать: http://msdn.microsoft.com/en-us/library/Aa366378

Хотя лучше сетевуху выдернуть. Все остальное - полумеры.

← →
Dennis I. Komarov © (2011-05-18 13:48) [3]

"Ну Вы блин даете..." (С)

← →
Dennis I. Komarov © (2011-05-18 13:53) [4]

> Подскажите,как заблокировать доступ к интернету?

Что есть интернет?
Что есть доступ к интернету?
Что есть заблокировать доступ к интернету?

← →
Юрий Зотов © (2011-05-18 14:29) [5]

> volkafff © (18.05.11 13:31)
> как заблокировать доступ к интернету?

Интернета не существует. А заблокировать доступ к тому, чего не существует - невозможно.

← →
volkafff © (2011-05-18 14:34) [6]

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

А может быть мне не давать включать браузер?Пока переменная dostyp =false
браузеры будут сами закрываться...Как это сделать? То есть как отследить запуск браузера и закрыть его, если переменная dostyp =false?

← →
Юрий Зотов © (2011-05-18 14:41) [7]

> volkafff © (18.05.11 14:34) [6]

Зачем?

← →
volkafff © (2011-05-18 14:44) [8]

В школе у учителя информатики будет стоять программа,которая по локальной сети будет разрешать/запрещать остальным компьютерам доступ в интернет.

А как лучше сделать передачу данных клиент-сервер?как в торяне?Но мне надо по локальной сети!

← →
Dennis I. Komarov © (2011-05-18 14:45) [9]

Думаю самый лучший выход - отказаться от подобной глупости.
А утверждение "нужно" беспочвенно и голословно...

← →
volkafff © (2011-05-18 14:56) [10]

То есть мне нужно следить за браузером. Как только появляется такой процесс-сразу закрыть.

← →
Dennis I. Komarov © (2011-05-18 14:57) [11]

> В школе у учителя информатики будет стоять программа,которая
> по локальной сети будет разрешать/запрещать остальным компьютерам
> доступ в интернет.

Если бы Вас спросили "Как одевать трусы через голову?", Вы бы как к этому отнеслись?

← →
RWolf © (2011-05-18 15:05) [12]

> программа,которая по локальной сети будет разрешать/запрещать
> остальным компьютерам доступ в интернет

эта программа называется «прокси».
ничего писать не нужно, надо просто грамотно настроить сеть.

← →
Anatoly Podgoretsky © (2011-05-18 15:07) [13]

> volkafff (18.05.2011 14:56:10) [10]

Шутник, ты будешь следить за несколькими десятками разных браузеров.

← →
volkafff © (2011-05-18 15:13) [14]

Вот поэтому я и хотел сделать так,чтобы пока переменная не станет true сеть была бы недоступна,браузер бы не смог открыть страницу!

← →
QAZ (2011-05-18 15:29) [15]

офигеть, у человека высшее образование...

← →
Dennis I. Komarov © (2011-05-18 15:32) [16]

> Вот поэтому я и хотел сделать так,чтобы пока переменная
> не станет true сеть была бы недоступна,браузер бы не смог
> открыть страницу!

Вот поэтому и не надо хотеть сделать так...

← →
Медвежонок Пятачок © (2011-05-18 16:15) [17]

> В школе у учителя информатики будет стоять программа,которая
> по локальной сети будет разрешать/запрещать остальным компьютерам
> доступ в интернет.

Я не понял, этот учитель что, против самого медведева что ли?
Тот значит протягивает в школы интет, протягивает, а учитель значит запрещает всякими кнопками и вредоносными программами и запрещает .....

← →
Dennis I. Komarov © (2011-05-18 16:20) [18]

> Медвежонок Пятачок © (18.05.11 16:15) [17]

Все хотят власти, и учителя тоже...

← →
volkafff © (2011-05-18 16:45) [19]

Подскажите хотя бы,как мне сделать клиент и сервер?Я читал статью про создание трояна,но мне половина кода(сокрытие от глаз пользователя,блокировка диспетчера задач и т.п.) нафиг не нужна. Мне нужно только чтобы при нажатии кнопки на сервере менялось значение переменной.Как это можно сделать?

← →
Ega23 © (2011-05-18 16:50) [20]

> Мне нужно только чтобы при нажатии кнопки на сервере менялось
> значение переменной.Как это можно сделать?

procedure TServerMainForm.btnChangeVariableValueClick(Sender: TObject); begin if dostyp = True then begin dostyp := False; end else begin if dostyp = False then begin dostyp := True; end else raise Exception.Create("Неизвестное boolean-значение!"); end; end;

← →
Anatoly Podgoretsky © (2011-05-18 16:55) [21]

begin
dostyp := not dostyp
end;
И никаких неизвестных значей в принципе быть не может

← →
volkafff © (2011-05-18 16:59) [22]

Да нет,это я знаю,как мне создать клиент и сервер?

← →
Ega23 © (2011-05-18 17:01) [23]

> И никаких неизвестных значей в принципе быть не может

А вдруг? Мы с оптимизмом смотрим в будущее!

← →
Ega23 © (2011-05-18 17:03) [24]

> Да нет,это я знаю,как мне создать клиент и сервер?

Сервер:

var srv: TMyServer; begin srv := TMyServer.Create(тут опционально могут быть параметры конструктора);

Клиент:

var srv: TMyClient; begin srv := TMyClient.Create(тут тоже опционально могут быть параметры конструктора);

← →
volkafff © (2011-05-18 17:06) [25]

Я планировал использовать ClientSocket и ServerSocket,но не знаю как организовать обмен данными.

← →
volkafff © (2011-05-18 17:11) [26]

Ega23,
Может быть вы мне скажете,как закрыть процесс,зная его имя?

← →
Dennis I. Komarov © (2011-05-18 17:14) [27]

> volkafff © (18.05.11 17:11) [26]

Любой из, может ответить на вопрос, но нет. Задумайтесь почему...

← →
Palladin © (2011-05-18 17:46) [28]

развод, так мало IQ небывает

> volkafff © (18.05.11 16:59) [22]
>
> как мне создать клиент и сервер?

Блин в этот момент времени я добрый, так хочу тебе помочь, но вот ведь незадача, здесь ограничение на длину поста, несколько постов делать мне лень. Так что договорись с модераторами, а как только они снимут ограничение, то я тебе вальну сюда всю справку по созданию клиента и сервера, если буду конечно в тот момент времени опять добрый.

> Palladin © (18.05.11 17:46) [28]
>
> развод, так мало IQ небывает

Давно ты веток не читал, тут вон соня кучу ветков пладить начало...

> блин в этот момент времени я добрый, так хочу тебе помочь,
> но вот ведь незадача, здесь ограничение на длину поста,
> несколько постов делать мне лень. Так что договорись с
> модераторами, а как только они снимут ограничение, то я
> тебе вальну сюда всю справку по созданию клиента и сервера,
> если буду конечно в тот момент времени опять добрый.

Спасибо,что откликнулись! С этими серверами вроде-как разобрался, лучше расскажите мне,как из текстовика информацию(строки/цифры) в эдит забросить? Вот с этим больше трудностей.

> лучше расскажите мне,как из текстовика информацию(строки/цифры)
> в эдит забросить?

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

> лучше расскажите мне,как из текстовика информацию(строки/цифры)
> в эдит забросить?

Открываешь блокнот, выделяешь текст, клацаешь правой кнопкой мыши, выбираешь "Копировать".
Запускаешь программу, выбираешь нужный эдит, клацаешь правой кнопкой мыши, выбираешь "Вставить".
Результат - потрясающий!!!

Мне нужно сделать проверку пароля,который находится в текстовике.Но когда я из него в мемо загружаю текст и копирую его во второй мем,он не считает этот текст равным.Вообще-то хотелось сделать эдит,но там string,а в мемо-Tstring. ВОт я и думаю,как из текстовика загрузить информацию в стринг.

goto [28];

Да, [28] +1

кто не понял [28] )

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

> Вы дураки, вам бы только поржать, а человеку реальная помощь
> нужна, кроме меня пока ни один не помог...

А ты куда его послал?

> Ega23 © (19.05.11 07:52) [38]
> Вы дураки, вам бы только поржать, а человеку реальная помощь
> нужна, кроме меня пока ни один не помог...

Все компы в сети, один (А) выходит в интернет.
У кого прописан А как шлюз, тоже выходит, у кого нет - таки нет.
А учитель информатики осел.

Блокировка доступа к интернету Найти похожие ветки