Ошибка при вызове wsastartup

[demon416]

Надо отправить email без использования vcl нашол в интернете подходящую функцию но она вылетает с ошибкой .Подозреваю что гдето не сделал инициализацию а где не пойму . Подскажите пожалуйста где у меня ошибка.
тестовый проект в приложении .

[airyashov]

smtp требует авторизации

220 mail.ru ESMTP Wed, 30 Jul 2008 15:46:13 +0400
HELO mail.ru
250 mx30.mail.ru Hello mail.ru [81.23.145.82]
MAIL From:<от кого>
250 OK
RCPT To:<кому>
250 Accepted
DATA
503 Administrative prohibition -- authorization required. Users in your domain
are not allowed to send email without authorization. See http://www.mail.ru/pag
es/help/261.html for details.

в королевстве делфи через свой сервак пускали почту

[demon416]

авторизацию я могу дописать в rfc вполне понятный пример,проблема в том,что у меня не доходит до отправки чего либо - вылетает при вызове wsastartup

[airyashov]

попробуете сначала отправить через telnet ручками ч-л отправить
у меня письма записываются как спам и не отправляются
delphi 7 + модуль Winsock, все работает проблема при отправки с сервером

[demon416]

спасибо ошибку нашел - не тот модуль подключал хотя не понятно как оно тогда компилилось

[airyashov]

попробовал отправить через телнет получилось, только пришлось зайти и выйти на pop3,
а при отправки письма нужно в DATA правильно указать заголовок иначе сервер на mail.ru письмо не берет.

авторизация описана http://www.wasm.ru/article.php?article=simplesmtp

[demon416]

Какой именно заголовок ему надо?
аутентификация проходит успешно но в результате письмо банят как спам
у меня заголовок отправляется так:

Код: Выделить всё

senddata('Subject: ' + subject + cl + cl + body + cl + '.' +cl);

cl = #13#10;