Интернет

← →
Дубогрей Сергей (2002-10-16 17:46) [0]

Добрый день! Подскажите как программно отключить доступ в инет!

← →
Digitman (2002-10-16 17:48) [1]

А что есть, по твоему, "инет" ?

← →
Дубогрей Сергей (2002-10-16 18:10) [2]

>>Digitman
инет - интернет!
Уточню: есть локальная сеть, все машины имеют доступ в интернет, но при определённых ситуациях нужно доступ на некоторых машинах отключать. Можно ли это сделать программно из проги писаной на Delphi?

← →
Reindeer Moss Eater (2002-10-16 18:17) [3]

Если "все машины имеют доступ в интернет" то, пожалуй, только ExitWindows,ExitWindowsEx

← →
Ketmar (2002-10-16 18:30) [4]

а может просто проксь настроить?

Satanas Nobiscum! 16-Oct-XXXVII A.S.

← →
Reindeer Moss Eater (2002-10-16 18:31) [5]

У него нет прокси, у него "все машины имеют доступ в интернет"

← →
Ketmar (2002-10-16 19:42) [6]

ладно. совет №2. поставить прокси, пустить всех черех прокси, прокси настроить %-))

Satanas Nobiscum! 16-Oct-XXXVII A.S.

← →
Дубогрей Сергей (2002-10-16 19:56) [7]

Да есть у меня прокси, ток он на серваке, а тот под линухом... Неужели это нереализуемо???? :(((

← →
Anatoly Podgoretsky (2002-10-16 20:07) [8]

Дубогрей Сергей © (16.10.02 18:10)
Реализуемо, но только нормально это делается на внешнем сервере/маршрутизаторе, остальные методы весьма половинчатые и легко обхлодятся

← →
Ketmar (2002-10-16 20:51) [9]

ну и под пингвином. и что? не умеем настраивать? так это не сюда...

Satanas Nobiscum! 16-Oct-XXXVII A.S.

← →
Digitman (2002-10-17 11:36) [10]

>>инет - интернет!

Ну надо же) ... а я и не знал)

Имелось ввиду, что под "доступом к Интернет" ты почему то подразумеваешь доступ к своему провайдеру ... который вовсе не обязан пускать тебя в "интернет" ... особенно - ежели вовремя не платишь за траффик ...

а на страничку провайдера - эт пожалуйста, добро пожаловать, типо - остаток на своем счету проверить ....

а, скажем, на http:\\www.microsoft.com - черта с два, когда счет твой пуст...

и как вот ты себе это видишь - имеешь ли ты "доступ к инет", если на страничку провайдера - запросто, а MS в гости - "облом" ?) ...

← →
Дубогрей Сергей (2002-10-17 14:05) [11]

Ясно! С "пингвином" как раз дела обстоят гораздо лучше чем с программированием (я сисадм, а не программер)... Я так понимаю стандартнымим средствами делфы ничего сделать нельзя... Тогда такой вопрос, можно ли с делфовской проги посылать команды на линуховый сервер, еси да, подскажи пажаста как!

← →
Ууууууууу!!! (2002-10-17 14:07) [12]

"можно ли с делфовской проги посылать команды на линуховый сервер"
Похоже ты действительно сисадм, а не системный администратор

← →
Wonder (2002-10-17 14:07) [13]

Какие команды?

← →
Дубогрей Сергей (2002-10-18 10:42) [14]

>>Ууууууууу!!! Что-то я тебя не понял...
>>Wonder. Системные команды.

← →
Wonder (2002-10-18 10:48) [15]

Есть такой сервис - telnet зовется. Берешь клиента под Форточки - и вперед :)

← →
Anatoly Podgoretsky (2002-10-18 10:52) [16]

Дубогрей Сергей © (17.10.02 14:05)
Можно telnet, ssh и другие менее распространенные, ты это как сисадмин просто обязан знать

← →
RV (2002-10-18 11:40) [17]

Сеть большая?
Машины в сети с какой ОС?

← →
Дубогрей Сергей (2002-10-18 17:18) [18]

Машины с WinXP. Я в курсе о существовании telnet и ssh, но я спрашивал как это с моей проги сделать!

← →
Wonder (2002-10-18 17:33) [19]

>Дубогрей Сергей
но я спрашивал как это с моей проги сделать!

На кой черт, пардон?
Зачем изобретать велосипед? Я так думаю, речь опять идет об инет-кафе?
Или тебе сЦылку дать на аналогичную программу?

← →
Дубогрей Сергей (2002-10-18 17:53) [20]

Да речь идёт о Инет-кафе.
Поскажите как пользоваться TCPClient.

← →
Reindeer Moss Eater (2002-10-18 18:12) [21]

Установить Хост и Порт, вызвать метод Conect.
А дальше читать и писать.

← →
Дубогрей Сергей (2002-10-18 18:28) [22]

А можно хоть какой-то пример?
skysat@ukr.net

← →
Reindeer Moss Eater (2002-10-18 19:01) [23]

var Resp:string;

idTCPClient.Host:="Имя_Или_IP_сервера";
idTCPClient.Port:=23;
idTCPClient.Connect;
idTCPClient.Writeln("Текст моей telnet-команды ");
//Читаем, что ответил telnet-server:
Resp:=idTCPClient.ReadLn;

← →
Дубогрей Сергей (2002-10-19 11:56) [24]

Вот ответ сервера: "SSH-1.99-OpenSSH_2.9.9p2"
Но ни малейшего немёка на то, что мои команды исполнились нет...

← →
Anatoly Podgoretsky (2002-10-19 12:07) [25]

Это не телнет, это Secure Shell, немного другой сервис, подробности можно найти на их сайте и в другой документации, в том же Линуксе

← →
Дубогрей Сергей (2002-10-19 17:33) [26]

Да я знаю, что это... :))
А можно где-то более подробно об этом прочитаь, ну с коннектом я понял, даже версию своего телнета увидел, а вот с передачей команд как-то не сложилось... Допустим как пройти авторизацию, послать такую команду "echo Hello > /hello" если пытаюсь сделать Resp:=idTCPClient.ReadLn; прога просто виснет...

Интернет Найти похожие ветки