Главная страница
    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.066 c
15-1344639808
Jonis_84
2012-08-11 03:03
2013.03.22
почему если убираешь строки про реестр nod32 ругается


15-1349179159
картман
2012-10-02 15:59
2013.03.22
частица "же"


2-1347121511
alexdn
2012-09-08 20:25
2013.03.22
Верт скролл бар для формы


2-1347507525
turbo
2012-09-13 07:38
2013.03.22
Как перевести дату в нормальный формат?


3-1283500093
6ruse
2010-09-03 11:48
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский