Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];

Вниз

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

 
Jonis_84 ©   (2012-07-07 21:26) [0]

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


 
jonis_84 ©   (2012-07-07 21:35) [1]

пробовал так

...
if tcpClient1.LocalHostAddr <>"127.0.0.1" then begin
         idhttp1.Request.UserAgent:=("Mozilla/5.0 (Windows NT 6.1; WOW64; rv:12.0) Gecko/20100101 Firefox/12.0");
         edit2.text:=IdHTTP1.Get("http://automation.whatismyip.com/n09230945.asp");
...

не то(((


 
Dimka Maslov ©   (2012-07-07 22:13) [2]

В общем случае компьютеру далеко безразлично, есть интернет, частично есть или вообще нет. Сеть есть и она работает - хорошо, не работает - и так сойдёт. Можно, однако, послать dns-запрос на какой-нибудь внешний сервер и посмтореть на реакцию, но всё равно не факт что получиться.


 
DVM ©   (2012-07-07 22:15) [3]

для начала надо определиться с тем что такое связь с интернетом


 
DVM ©   (2012-07-07 22:15) [4]

для начала надо определиться с тем что такое связь с интернетом


 
jonis_84 ©   (2012-07-08 00:25) [5]

Я ещё далёк от сетей,требуется определить ip локальный и сетевой,оба определить могу,но ... если сети нет то лок ip:= 127.0.0.1 , если есть локальная сеть то лок ip **.**.***.*** сетевой соответственно определить нельзя - вылезает ошибка((( ,

if tcpClient1.LocalHostAddr <>"127.0.0.1" then begin // проверяю если ip изменился то сеть есть(только она локальная и может быть без доступа к интернету)

как быть?


 
jonis_84 ©   (2012-07-08 00:31) [6]

может проверить соединение с каким-нибудь общедоступным сервером google yandex? поможете ?


 
Германн ©   (2012-07-08 01:42) [7]


> jonis_84 ©   (08.07.12 00:31) [6]

Проверяй соединение с тем сервером, который нужен твоей программе. По результату попытки соединения уже и решай - есть интернет или его враги украли. :)


 
Anatoly Podgoretsky ©   (2012-07-08 07:22) [8]

> DVM  (07.07.2012 22:15:03)  [3]

Более интересно определиться с тем, что такое Интернет?


 
Dimka Maslov ©   (2012-07-08 11:18) [9]


> jonis_84 ©   (08.07.12 00:25) [5]


127.0.0.1 есть всегда. Кроме того, компьютер может иметь несколько сетевых интерфейсов с различными настройками и ip-адресами.


 
sniknik ©   (2012-07-08 11:19) [10]

> который нужен твоей программе.
+ по тому протоколу который нужен... без абстракций вида "интернет".

так к примеру ссылка в коде работает, типа интернет "есть"... а тоже самое с ssl https://automation.whatismyip.com/n09230945.asp раз, и внезапно нет... т.е. интернета нет?


 
brother ©   (2012-07-08 18:36) [11]

[10] намек на порты?


 
sniknik ©   (2012-07-08 19:15) [12]

> [10] намек на порты?
без намеков. порты конечно роль играют, и есть стандарты/общепринятые, но протокол протоколу рознь сам по себе, как русский с китайским не поймут друг друга. можешь проверить, указать рабочий порт...
https://automation.whatismyip.com:80/n09230945.asp



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

Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.064 c
15-1345822753
brother
2012-08-24 19:39
2013.03.22
Сис админ - диагноз?


2-1333289940
Dron55555555555
2012-04-01 18:19
2013.03.22
Дробные числа


15-1329199075
Думкин
2012-02-14 09:57
2013.03.22
Задчка с олимпиады недавней


2-1346842080
NoUserName
2012-09-05 14:48
2013.03.22
Регистрация расширения файла


15-1351000566
QAZ5
2012-10-23 17:56
2013.03.22
Visual Studio <> совместимость?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский