Главная страница
    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.061 c
15-1341001802
Юрий
2012-06-30 00:30
2013.03.22
С днем рождения ! 30 июня 2012 суббота


2-1333342741
Екатерина
2012-04-02 08:59
2013.03.22
variant massiv


6-1261335712
Vladimir
2009-12-20 22:01
2013.03.22
Передача записи по сети через сокеты


2-1332325940
CRLF
2012-03-21 14:32
2013.03.22
А куда делось "Прочее"?


2-1329813740
Vasili Lubavin
2012-02-21 12:42
2013.03.22
Помогите с алгоритмом





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский