свой IP

← →
Tanya (2006-09-05 17:05) [0]

У меня ADSL Wi-Fi модем, как мне определить свой IP-адрес в интернете, а то каждый раз пишется один и тод же, наверно это адрес соединения компа к модему...

← →
Орион © (2006-09-05 17:45) [1]

127.0.0.1 :)))

← →
DrPass © (2006-09-06 01:27) [2]

Если модем работает в режиме PPPoE, то IP-адрес PPPoE-соединения и есть искомый адрес. Но если комп общается с модемом по WiFi, вероятнее всего, что модем работает в режиме обычного роутера. В этом случае компьютер не имеет интернетовского IP, соответственно, от него ничего не добьешься. Можно разве что поковыряться через Web-интерфейс администрирования модема. Авось там найдешь

← →
isasa © (2006-09-06 11:23) [3]

Ну если надо - с каким IP видится "снаружи".

http://www.proxyjudge.com/proxyjudge.html

В окне кликаем на ссылку

Your URL: ProxyJudge 2.35.

поля

REMOTE_HOST=217.76.195.150 <----- имя хоста

REMOTE_ADDR=217.76.195.150 <----- адрес хоста

← →
Tanya (2006-09-06 19:45) [4]

Я хочу сделать связь двух компъютеров через интернет компонентами TClientSocket\TServerSocket, но у меня что-то не получается с этим IP. Т.к. в Delphi7 нету их, я прописываю модуль ScktComp, и создаю их сам, как в клиенте так и в сервере:
клиент: ClientSocket := TClientSocket.Create(Self); ClientSocket.Port := 3746; ClientSocket.Host := Edit1.Text; ClientSocket.OnConnect := OnConnectEvent; ClientSocket.OnDisconnect := OnDisonnectEvent; ClientSocket.OnRead := OnReadEvent; ClientSocket.OnError := OnErrorEvent; ClientSocket.Active := true; сервер: ServerSocket := TServerSocket.Create(Self); ServerSocket.Port := 3746; ServerSocket.OnClientRead := OnClientReadEvent; ServerSocket.OnClientConnect := OnClientConnectEvent; ServerSocket.OnClientDisconnect := OnClientDisonnectEvent; ServerSocket.Active := true;

так вот они не соединяются, в обработчике ошибок OnErrorEvent, ErrorEvent = eeConnect

Подскажите пожалуйста что не так...

← →
Eraser © (2006-09-06 21:24) [5]

> [4] Tanya (06.09.06 19:45)

> Т.к. в Delphi7 нету их

они есть, но их надо установить вручную.
см. пакет dclsockets100.bpl, который находится в папке Bin.

← →
Tanya (2006-09-06 22:21) [6]

А в чем в коде ошибка, я так и не поняла, не работает так (((

← →
Dmitrij_K (2006-09-06 22:30) [7]

Эти компоненты можно установить руками http://bdn.borland.com/article/29768

> А в чем в коде ошибка, я так и не поняла, не работает так
> (((

В коде который ты привела, ошибок нет. Но они могут быть в другом месте. Мало информации. Что например введено в Edit1 ?

← →
Tanya (2006-09-06 23:30) [8]

В Edit1.Text пишется IP-адрес компъютера к которому нужно подключиться клиенту, пробовала как с одного компъютера(который подключен к локальной сети) так и с другого(который через ADSL WiFi модем) запускать сервер и к нему подлючиться, в обоих случаях соединения небыло...(((

← →
Орион © (2006-09-06 23:37) [9]

> [4] Tanya (06.09.06 19:45)

"я прописываю модуль ScktComp, и создаю их сам" ;) проговорился Татьяна Петрович)))

← →
Dmitrij_K (2006-09-06 23:37) [10]

Соединение может прерывать файрвол
А вообще вариантов много, даже что клиент и сервер не работают.
Попробуй запустить сервер и с этой же машины войти на него через telnet. Зайдет значит дело в клиенте или в компе...

← →
Dmitrij_K (2006-09-06 23:41) [11]

> "я прописываю модуль ScktComp, и создаю их сам" ;) проговорился
> Татьяна Петрович)))

Может у нее(го) раздвоение личности.
Кем он(а) себя считает, мальчиком или девочкой, это уже его(человека) проблемы

← →
Tanya (2006-09-06 23:43) [12]

Орион, опечаталась я )))

Dmitrij_K, Я пробовала запустить и сервер и клиент на одном компе, и в клиенте вводила свойже IP-адрес, все соединялось. А вот как через telnet я не знаю, подскажи пожалуйста

← →
Dmitrij_K (2006-09-07 08:46) [13]

НУ раз на одной машине соединяется, значит надо искать касяк в настройках сети. Мож на самом деле файрволы стоят. Может ip не правильно вводишь (такое тоже бывает Ж))

> Tanya

Когда возникает событие ClientSocket.OnError, в процедуру его обработки тебе передается код ошибки (см. параметр ErrorCode), он подскажет тебе истинную причину отказа.

свой IP Найти похожие ветки