Да, это понятно из описания протокола. Но в том то вся веселуха, что тело (DATA) отправляется, но возвращается такая ошибка. Поэкспериментировал с

             Case "251"
                          SendNetworkData("DATA")
                         state=#Data
                      Case "354"
                         SendNetworkData("X-Mailer: ExchWater 1.0")
                         SendNetworkData("To: " + recipient)
                         SendNetworkData("From: " + name + " <" + sender + ">")
                         SendNetworkData("Reply-To: "+sender)
                         SendNetworkData("Date:" + FormatDate("%dd/%mm/%yyyy @ %hh:%ii:%ss", Date()) )
                         SendNetworkData("Subject: " + Subject)
                         SendNetworkData("MIME-Version: 1.0")
                         SendNetworkData("Content-Type: multipart/mixed; boundary="+Chr(34)+"MyBoundary"+Chr(34))
                         SendNetworkData("")
                         send("--MyBoundary")
                         SendNetworkData("Content-Type: text/plain; charset=windows-1251")
                         SendNetworkData("")                     
                         SendNetworkData(body.s)
                         SendNetworkData("--MyBoundary--")
                         SendNetworkData(".")

Все равно возвращает такую ошибку, правда один раз из четырех, примерно.

Убиться об стенку и не проснуться с такой совместимостью вызовом Shell и PureBasic. Но самое загадочное что батник отрабатывает без ошибок. Значит что-то в вызове из Аксеса. Посижу завтра еще, если не разберусь, оставлю обработчик ошибок только на инициализацию и отсутствие ящика и неверный логин/пароль.  Не с кем посоветоваться о таких тонкостях совместной работы..((

Петр:
Благодарю за замечания, но каждый блок на Аксесса и на Пурике работает отлично. Когда организуется вызов внешней программы появляется ошибка.
Пробовал организовать вызов через бат-файл, все отработало без ошибок. Делал строку параметров и путь к программе отправки в Аксессе просто одной переменной и запускал через Shell, та же самая ошибка.
При вызове передача почты отрабатывает нормально, потом как будто теряет эту точку (ошибка 354), но письмо с вложением отправляется в ящик. Что и пытаюсь понять.

Если я кого то задел, приношу извинения. Не могу понять, вроде все правильно, но работет не так как ожидал.

SendNetworkData это из Пурика. Но работает она у меня и без присвоения, а так как описал.
А насчет CRLF это приходится самому.

    msg+crlf.s
    SendNetworkData(ConnectionID, @msg, Len(msg))

Этот код я упростил так как ранее давал полный листинг, здесь показал только действующие ОПЕРАТОРЫ.

Но не в операторе дело.  Из ящика на Яндексе все письмо достается из Входящих (т.е. пришло валидно) и ненарушенная целостность приложения и тела. Основная проблема в том что после отправки тела письма и атачмента PureSMTP_SendMail (и не только он) возвращает ошибку 354 (ожидание "." получения DATA).
На сегодня у меня только одно решение как не пугать пользователя - запретить обработку этой ошибки на что либо более оптимистичное ("Пись отправлено, проверьте в ящике получателе").
Если есть предложения как мне обойтись без такого костыля, прошу помочь.

Я тоже уже окончательно уверился, что это Аксесс. Но лопатить коды Мелкософта это путь в психушку...))
У меня такая идея что Shell в аксесе создает для запуска область памяти не совсем соответствующую работе SMTP, можно ли в Пурике сделать такую программу чтобы запускала из себя программу работы с почтой?
Т.е. вызываем программу-ланчер, а она стартует программу работы с мылом. Непонятно как из ланчера передавать параметры в запускаемую программу.

И еще одна странная идея появилась, внутри программы хранить файл-конфигурацию и распаковывать его только во время работы, а затем стирать. Надо как-то вносить в этот конфигурационный файл изменения (новый емайл, порт, логин, пароль) и потом снова упаковывать , уже измененный, в программу работы с почтой. Но это идея на развитие, если кто подскажет где копать попробую релизовать.

Спасибо всем кто помогал с решением моей проблемы. Перепробовал все но остановился на варианте с заглушкой. В связке с аксессом работает нормально, теперь, в случае ошибки 354, будет появляться чуть измененное сообщение.
Вариант с прогресс баром не понял, оставил все как есть. В общем, работа на троечку.

ПС Если можете скиньте новую версию. Посмотреть, сравнить.

Отредактировано greece (10.11.2015 00:20:30)