Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.04.29;
Скачать: CL | DM;

Вниз

есть Интернет? --> какой ip?   Найти похожие ветки 

 
Roman_S ©   (2007-04-08 09:10) [0]

Как программно определить:
1. Имеет ли данный компьютер выход в Интернет
2. Если да, то какой у него ip-адрес
???
Желательно, чтобы это работало во всех версиях ОС Windows


 
DrPass ©   (2007-04-08 10:23) [1]

1. Скажи, по каким критериям следует однозначно считать, что компьютер имеет выход в Интернет?
2.
a) У компьютеров нет IP-адресов. Они есть у сетевых интерфейсов, коих у компьютера может быть несколько (и по нескольку адресов на каждом), или не быть ни одного
б) Наличие "выхода в Интернет" еще не предполагает "видимого в Интернете" IP-адреса - очень многие провайдеры используют прокси.


 
Anatoly Podgoretsky ©   (2007-04-08 12:37) [2]

> DrPass  (08.04.2007 10:23:01)  [1]

Добавь еще файрвол


 
Roman_S ©   (2007-04-08 13:01) [3]

> DrPass ©   (08.04.07 10:23) [1]
1. Скажи, по каким критериям следует однозначно считать, что компьютер имеет выход в Интернет?


Возможность открыть какую-либо страницу в Интернете, например www.ya.ru!

> 2.
a) У компьютеров нет IP-адресов. Они есть у сетевых интерфейсов, коих у компьютера может быть несколько (и по нескольку адресов на каждом), или не быть ни одного
б) Наличие "выхода в Интернет" еще не предполагает "видимого в Интернете" IP-адреса - очень многие провайдеры используют прокси.


Я предпологал такой ответ, но надеялся, что мастера, руководствуясь поговоркой "безвыходных ситуаций не бывает", предложат решение! Наверняка можно организовать проверку, пр.: как с дисками - есть же:
DRIVE_REMOVABLE:ShowMessage("The disk can be removed");
DRIVE_FIXED : ShowMessage("The disk cannot be removed");
DRIVE_REMOTE : ShowMessage("The drive is remote (network) drive");
DRIVE_CDROM : ShowMessage("The drive is a CD-ROM drive");
DRIVE_RAMDISK : ShowMessage("The drive is a RAM disk");
Мож, что и для Neta ceotcndetn&


 
Roman_S ©   (2007-04-08 13:03) [4]

простите,
ceotcndetn&

- существует


 
Roman_S ©   (2007-04-08 13:07) [5]

Что-нибудь типа:
Soedinenie_Proxi
Soedinenie_Telefon   ???    ;-)


 
Anatoly Podgoretsky ©   (2007-04-08 13:21) [6]

> Roman_S  (08.04.2007 13:01:03)  [3]

> Возможность открыть какую-либо страницу в Интернете, например www.ya.ru!

Заблуждение, вожможно у тебя доступ только до локалки и страница поступит с локального кеша.


 
Anatoly Podgoretsky ©   (2007-04-08 13:22) [7]

> Roman_S  (08.04.2007 13:07:05)  [5]

Про прозначные прокси слышал?
Вот у меня в локалке как раз такие, пользователю кажется что он имеет выход в Интернет.


 
DrPass ©   (2007-04-08 13:24) [8]


> Возможность открыть какую-либо страницу в Интернете, например
> www.ya.ru!

Тогда нужно с помощью TidHTTP или TClientSocket попробовать ее открыть. Или хотя бы пропинговать с помощью TidHTTP
Хотя критерий тоже весьма сомнительный. Вот, например, с компьютеров ряда сотрудников можно открыть сайт конторы и еще пяток специализированных сайтов. ya.ru с них не открывается. Зато пингуются все сайты. Они в Интернете или нет?


 
Roman_S ©   (2007-04-08 13:32) [9]

Ну что, Мастера, неужели так всё безвыходно?
DrPass ©   (08.04.07 13:24) [8] Зато пингуются все сайты.
Значит можно попробовать? Если connect-а не будет, значит "No" (result:=false).
Но пробовать с чем-то надо?! Где/как (даже в таких случаях) отыскать ip-шник? На других сайтах в качестве теста на подключение к Интернету используют сайт Microsoft (он всегда на связи), так что я был близок к истине!


 
DrPass ©   (2007-04-08 13:38) [10]


> Где/как (даже в таких случаях) отыскать ip-шник?

Нигде, естественно. Интернетовского IP-шника у таких компьютеров вообще нет. Есть только IP локальной сети, который никакого отношения к Интернету не имеет.


 
Roman_S ©   (2007-04-08 13:41) [11]

Ok!  Ну а как в таких случаях огранизовать проверку (объяснить программе языком чисел) - if есть ip then GO else STOP ???
Как проверить, пропинговать, организовать перебор ip-шников для проверки?


 
Плохиш ©   (2007-04-08 13:52) [12]

1. Заметь ни один браузер не говорит, что есть/нет связи с интернет, а только сообщает, что какую-то страницу не может отобразить
2. Попробуй TIdIPWatch


 
Anatoly Podgoretsky ©   (2007-04-08 13:54) [13]

> DrPass  (08.04.2007 13:24:08)  [8]

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


 
Anatoly Podgoretsky ©   (2007-04-08 13:55) [14]

> Roman_S  (08.04.2007 13:32:09)  [9]

Не выйдет, на сайт Микрософта выхода нет, а в Интернет есть.


 
Anatoly Podgoretsky ©   (2007-04-08 13:57) [15]

> Roman_S  (08.04.2007 13:41:11)  [11]

Пинг часто запрещен, а перебирать будешь все 4 миллиарда, что бы найти один единственный?


 
Zeqfreed ©   (2007-04-08 14:15) [16]

Опять умничают только.
Подозреваю, что автору вполне подойдет GetAdaptersInfo или GetInterfaceInfo.


 
Roman_S ©   (2007-04-08 16:42) [17]

Благодаря подсказке Zeqfreed ©   (08.04.07 14:15) [16] нашёл
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=28060

Что Вы скажите по этому поводу? Вопрос обсуждался 1,5 года назад...


 
sniknik ©   (2007-04-08 17:39) [18]

> Что Вы скажите по этому поводу? Вопрос обсуждался 1,5 года назад...
сохрани ветку... и когда с твоей программой возникнут проблемы, типа - есть список ip (из функции в ссылке) какой выбрать? посылаю полученный в локальной сети ip другу (инет есть!) а он до меня по нему "достучаться" не может ;( ??? ну и т.д. вариантов много выше описано.
вернись к ней и перечитай... может тогда дойдет, и вопросы тогда будут поконкретнее, не об "абстрактном интернете".



Страницы: 1 вся ветка

Текущий архив: 2007.04.29;
Скачать: CL | DM;

Наверх




Память: 0.51 MB
Время: 0.046 c
2-1176116225
defiler
2007-04-09 14:57
2007.04.29
Windows AD


1-1172838273
Юрий_К
2007-03-02 15:24
2007.04.29
Как дебагить процесс инициализации?


8-1155501773
Jimmy
2006-08-14 00:42
2007.04.29
Не работает большой Image


2-1176037710
pound
2007-04-08 17:08
2007.04.29
В редакторе TValueListEditor в событии OnValidate проверяю


2-1175960490
Stratocaster
2007-04-07 19:41
2007.04.29
Delphi самопроизвольно убивает мои переменные.(