Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Вниз

Что значит ошибка: 


[TLS]Lord   (2001-12-05 09:31) [0]

Пытаюсь отослать сообщение на e-mail:

procedure TGWin.StartButtonClick(Sender: TObject);
begin
if ClSok.Active=true then ClSok.Active:=false;
ClSok.Active:=true;
end;

procedure TGWin.ClSokConnect(Sender: TObject; Socket: TCustomWinSocket);
begin
Socket.SendText ("HELLO server");
Socket.SendText ("MAIL FROM: admin@server.com");
Socket.SendText ("RCPT TO: user@server.net");
Socket.SendText ("Hello World!");
Socket.SendText (".");
Socket.SendText ("QUIT");
ClSok.Close;
end;
Жму на кнопку и возникает ошибка: "Windows socket error: (11001), on API ASync Lookup"
Помогите кто как сможет срочно необходимо доделать эту функцию (отправки писем)!!!!



Дмитрий   (2001-12-05 09:41) [1]

Во-перв`ых, сокет должен быть синхронным, во-вторых, надо ведь признак какой-то конца строки давать (\r\n - не ошибешься: "HELLO server"#13#10), в-третьих и четвертых существуют RFC(напр.821) и команда DATA, в-пятых можно и готовое письмо поковырять и за telnet-ом посидеть, ну и в-шестых, многие сервера настроены так, что, если в DATA (то есть в заголовках собственно сообщения) не указаны поля From и To, то они - отлупаются.


if ClSok.Active=true then ClSok.Active:=false;
ClSok.Active:=true;

А это вообще ни к черту :))

C уважением :)



[TLS]Lord   (2001-12-05 09:54) [2]

Наконец-то хоть кто-то мне все это объяснил. Спасибо! Но как их сделать синхронными?



Дмитрий   (2001-12-05 10:03) [3]

ClientType = ctNonBlocking :)(1 движение мышкой)



Digitman   (2001-12-05 10:57) [4]

исключение с сообщением "Windows socket error: (11001), on API ASync Lookup" никак не связано с режимом гнезда (blocking/non-blocking) и возникает при невозможности установить коннект с сервером из-за того, что указанное имя хоста не может быть преобразовано в IP-адрес (неверно имя хоста, недоступен DNS и т.д.).
Попробуй на время очистить св-во Host и задать IP-адрес явно в св-ве Address



[TLS]Lord   (2001-12-05 15:21) [5]

Теперь появилась ошибка 10060! Асинхронный сокеты!, хотя ClientType = ctNonBlocking что мне теперь делать?



Wonder   (2001-12-05 15:40) [6]

WSAETIMEDOUT (10060) Connection timed out.

Check the obvious first: check that the destination address is a valid IP address. If you used a hostname, did it resolve to the correct address? If the hostname resolution uses a local host table, it"s possible you resolved to an obsolete address. Can you ping that hostname?

Тебе же Digitman написал - "Попробуй на время очистить св-во Host и задать IP-адрес явно в св-ве Address".




Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.017 c
1-79322           Mistery               2002-02-07 18:15  2002.02.25  
П - а - м - а - г - а - и - г - и - т - е .


6-79418           [TLS]Lord             2001-12-05 09:31  2002.02.25  
Что значит ошибка:


1-79340           Shatun                2002-02-08 09:21  2002.02.25  
Проблема с размерами форм


14-79460          False_Delirium        2002-01-05 06:48  2002.02.25  
Головой думать нужно...:)..или пища для размышления...


4-79499           well                  2001-12-25 17:12  2002.02.25  
WINAMP