IP провайдера

← →
NOE (2002-12-06 18:14) [0]

Подозреваю, что есть способ узнать IP провайдера, при установленом соединении, а как это сделать, подскажите pls
То есть запустилась программа, которая хочет отправить почту и как ей узнать на какой хост ?

← →
Alex Konshin (2002-12-07 05:30) [1]

Провайдер имеет много разных ip, в том числе тот ip, о котором ты думаешь, что он твой. Если тебе нужен адрес SMTP сервера, который стоит у провайдера, то можно посмотреть MX рекорд для адреса DNS сервера, который тебе сообщили вместе с твоим ip-адресом при соединении.

← →
NOE (2002-12-10 11:42) [2]

А как програмно сделать это. Если не затруднит, пример... Спасибо...

← →
Digitman (2002-12-10 12:01) [3]

> А как програмно сделать это

Что сделать-то ? конкретно ?

Если IP-адрес SMTP-сервера в подсети провайдера, то - зачем он тебе нужен ? Отправить почту ты все равно не отправишь через него, ибо раз провайдер не дал тебе координаты SMTP-сервера в своей подсети, то, значит, прав на доступ к этому серверу ты не имеешь и оправить ничего не сможешь - учетную запись провайдер для тебя не заводил на сервере и авторизацию ты не пройдешь ... что толку от того, что тебе тем или иным образом станут известны координатя SMTP-сервера ?

← →
NOE (2002-12-10 12:36) [4]

Используется стандартный компонент
NMSMTP1.Host := "xxx.xxx.xx.x";
^^^^ мне нужно програмно узнать адрес при установленом соединении. Если я явно указываю адрес все работает.

NMSMTP1.Port := 25;
// NMSMTP1.UserID := Edit4.Text;
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := Edit5.Text;
NMSMTP1.PostMessage.FromName :=Edit4.Text;
NMSMTP1.PostMessage.Subject := Edit3.Text;
NMSMTP1.PostMessage.ToAddress.Add(Edit6.Text);
// NMSMTP1.PostMessage.ToBlindCarbonCopy.Add("");
// NMSMTP1.PostMessage.ToCarbonCopy.Add("");
NMSMTP1.PostMessage.Attachments.AddStrings(ListBox1.Items);
NMSMTP1.PostMessage.Body.Assign(Memo2.Lines);
NMSMTP1.SendMail;

← →
Digitman (2002-12-10 13:38) [5]

да просто укажи имя хоста

NMSMTP1.Host := "smtp.hotbox.ru";

и не парься)

← →
NOE (2002-12-10 15:32) [6]

Спасибо Digitman

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