Одобрено: Fortect
Фактически вы видите ошибку, указывающую на ошибку времени выполнения Outlook 287. Оказывается, есть несколько способов решить эту проблему, поэтому давайте поговорим об ее области.Ошибка выполнения 287 возникает, когда Microsoft Outlook аварийно завершает работу или зависает во время работы, отсюда и их название. Это не обязательно означает, что наш собственный код был каким-либо образом поврежден, но друг против друга не означает, что он не работал в течение всего срока службы продукта. Этот формат ошибки будет отображаться на вашей стороне как раздражающее уведомление, если его не обработать и не исправить.
У меня есть случай, когда один конкретный пользователь хочет получать уведомления о добавлении доставки в базу данных Access. Самый простой способ, на который я мог надеяться, – это настроить автоматическую рассылку электронной почты через Outlook 2010. Следующий пароль: иметь:
Dim oApp как Outlook.ApplicationDim oMail как почтовый элемент VarDnoteRef2слабая как значимая цепьТусклый varuser как строкаvaruser = DLookup ("[Employee_Name]", "Employees", "[Employee_ID] =" & TempVars! gloggedin)varDnoteRef2 = DLast ("Supplier_Dnote_Ref", "Supplier_Dnotes")Установите oApp на CreateObject ("Outlook.application")Установите oMail = oApp.CreateItem (olMailItem)oMail.Body подразумевает: «Квитанция о доставке была встроена в конкретную базу данных с использованием« Varuser & & ширины в дюймах по высоте »& Now () &«. »& _ vbNewLine & "Транспортная накладная:" & varDnoteRef2oMail.Subject эквивалентно «Уведомление об автоматической доставке: Уведомление».oMail.To = "[email protected]"послать письмоНастройка oMail ничего не значитoApp = ничего не определять
Это программное обеспечение будет работать правильно, если человек, использовавший этот специальный код, открыл Outlook. Однако, если конечный пользователь не запустил Outlook, мужчина или мать получают сообщение об ошибке в строке oMail.send
.
<цитата>
Номер ошибки 287: ошибка веб-приложения 0 или ошибка объекта.
Они получают небольшой значок, расположенный на портативном компьютере, который является значком Outlook, достаточным для появления единственного сообщения cog / cog, в котором утверждается, что другая программа может использовать Outlook
. Это то, чего я ожидал. Но почему он не работает при отправке?
Как я могу почти получить эту ошибку / есть ли решение?
<цитата>
Изменить (обновить)
Что еще более странно, так это то, что я использую F8 для перебора кода. ЭТО РАБОТАЕТ !!Но все же, если нет, я называю это число как угодно из свойств деформации, например button_on_click
9.802 55 золотых значков
запрошено 31 марта 2016 г. до 8:30 утра.
Одобрено: Fortect
Fortect — самый популярный и эффективный в мире инструмент для ремонта ПК. Миллионы людей доверяют ему обеспечение быстрой, бесперебойной и безошибочной работы своих систем. Благодаря простому пользовательскому интерфейсу и мощному механизму сканирования Fortect быстро находит и устраняет широкий спектр проблем Windows — от нестабильности системы и проблем с безопасностью до проблем с управлением памятью и производительностью.
а>
1482 22 золотых значка 1717 золотых значков
Не та формула, которую вы ищете? Ознакомьтесь с другими описанными вопросами о Vba Ms-access Outlook-2010 или задайте свой вопрос.
Что ж, я никогда раньше не сталкивался с подобными проблемами, но я нашел решение.
Сообщение об ошибке заставило меня задуматься, почему команда отправки не распознает конкретное приложение. Во всяком случае, я спросил, быстрый ли код. (Я обычно замечаю, откуда взялась именно в этот час трубки, просто решил типичную проблему).
Я немного добавил петлю, чтобы отложить надежность до отправки. Я сделал это, потому что доступ, вероятно, не будет к application.wait
.
Dim T1 как опцияDim T2 как отличный вариантT1 = сейчас ()T2 = DateAdd ("s", конкретное лицо, T1)Подпитка до T2 <= T1 T1 = сейчас ()Лентаотправить одно письмо
Этот процесс происходит не очень часто, вы можете максимум 5 раз в другой день, поэтому я не чувствую дискомфорта, когда задержка в один момент вызывает проблемы в реальном времени.
ответил 1 апр.2016 г. около 10:59
1482 22 значка с золотыми слитками 1717 серебряных значков
Повысьте производительность вашего компьютера с помощью этой простой загрузки. г.