Добро пожаловать к нам в гости! Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
У меня на работе программа от майкрасофта который получает только письма и не блокируют. Я думаю зависит от поставщика почты. Майл не советую. Использую гугл и использовал в небуке года 2-3 назад. Я в гугл вообще не захожу и нет никакой активности,там машина работает или присылают репосты разные сайты.. Этой почте 5 лет. Вспомнил,прослезился.. Только,Что проверял почты которые были созданы года 4 назад для небука. Я их регистрировал на mail.ru теперь они мертвы и восстановить никак Дата регистрации: Вс, 30 Мая 2010, 21:05 Этож было вчера
Сообщение отредактировано Фарид - Чт, 19 Марта 2015, 11:56
Дата: Вт, 09 Февраля 2016, 14:24 | Сообщение # 212
Генератор идей
Модераторы
Сообщений: 3189
Offline
Правильно ли я понимаю, что вызывая функцию написанную не на языке NeoBook (как в случае отправки письма функцией VBScript), мы не получим в [LastError] ничего, если даже ошибка будет? В таком случае, как убедиться в том, что письмо успешно отправлено? Есть ли какая-то глобальная переменная для VBScript, которую можно промониторить на этот предмет или есть иной способ? В общем, как проверить, что функция отработала корректно и письмо ушло? Бесплатный онлайн курс программирования в VisualNEO Win (NeoBook)
Дата: Вт, 09 Февраля 2016, 20:40 | Сообщение # 213
Наш дизайнер
Администраторы
Сообщений: 5961
Offline
В скрипте можно делать контроль и обработку ошибок, есть такие функции в vbscript. Но нужно еще посмотреть, если используются сторонние компоненты (CDO.Message), возвращает ли используемая функция код ошибки и проверять его. Эта вроде возвращает, тогда после вызова send добавить If Err.Number <> 0 Then MsgBox Err.Number & " - " & Err.Description Else MsgBox Err.Number & " - " & Err.Description End If
в завис-ти от результатов будет показан номер ошибки и описание, можно обработать на месте или в нб передать данные Err.Number и Err.Description Можно просто присвоить здесь Err.Number в [LastError] вместо IF условий, и обрабатывать все в нб
и еще лучше в конце уничтожить обьект: Set objMessage = Nothing
В самое начало скрипта вставить первой строкой: On Error Resume Next Как задавать вопросы
Дата: Ср, 10 Февраля 2016, 15:12 | Сообщение # 214
Генератор идей
Модераторы
Сообщений: 3189
Offline
DEMBEL, я в синтаксисе vbscript ни бум-бум, к сожалению . Ты можешь доработать функцию так, чтобы текст ошибки передавался в переменную NeoBook? Наверное лучше не в [LastError], а, допустим, в [LastErrorSendMailCDO]. И прочее, что считаешь правильным добавить в функцию...
Дата: Вт, 13 Октября 2026, 12:33 | Сообщение # 215
Админ NeoBook
Администраторы
Сообщений: 7426
Offline
Тема старая, а ошибки те же. Смотри. «sender address must match authenticated user» значит, что smtp.mail.ru не даёт слать от имени адреса, отличного от логина. Так что у тебя в MailUserID и в отправителе должен стоять один и тот же ящик. «authorization required» сервер пишет, когда логин с паролем не передали вовсе. Твой прошлый случай. Остальные ответы удобно сверять по таблице кодов ответов SMTP-сервера (https://uchecker.net/glossary/smtp-kody-otvetov) из глоссария uChecker, который чистит базы от несуществующих ящиков и спам-ловушек. Отказ насовсем — это 5xx, а письмо с ответом 4xx можно повторить. - А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
. 
