Você pode ver um erro muito bom indicando Outlook Runtime Error 287. Descobrimos que existem várias maneiras de corrigir esse problema de habilidade, então vamos falar sobre isso agora.O erro de tempo de execução 287 ocorre quando o Microsoft Outlook trava ou congela durante a execução, daí o nome. Isso definitivamente não significa necessariamente que o código seja perigoso de alguma forma, mas significa que ele não funcionou durante toda a vida útil do produto. Esse tipo de erro certamente aparecerá em sua extremidade como uma notificação desesperadora se não for tratada e corrigida.
Tenho um caso em que um determinado usuário precisa ser alertado quando as entregas são adicionadas para ser um banco de dados do Access. A maneira mais fácil que eu poderia esperar é configurar a distribuição automática do programa de e-mail por meio do Outlook 2010. Próxima senha: ter:
Dim oApp as Outlook.ApplicationDim oMail como o item mais importante VarDnoteRef2fraco como uma correnteDim varuser dado aquele stringvaruser = DLookup ("[Employee_Name]", "Employees", "[Employee_ID] =" & TempVars! gloggedin)varDnoteRef2 = DLast ("Supplier_Dnote_Ref", "Supplier_Dnotes")Defina oApp como CreateObject ("Outlook.application")Definir oMail = oApp.CreateItem (olMailItem)oMail.Body é igual a “Um recibo de parto foi adicionado a um banco de dados específico selecionando" Varuser & & largura em polegadas por "& Now () &". "& _ vbNewLine e "Guia de remessa:" & varDnoteRef2oMail.Subject é sempre equivalente a "Notificação de entrega automática: Notificação"oMail.To é igual a "[email protected]"enviar uma cartaConfigurar o oMail não significa nadaoApp equivale a definir nada
Este código funcionará corretamente se a pessoa que está resgatando o código tiver configurado o Outlook. No entanto, se o usuário não ativou o Outlook, o homem ou mulher recebe um erro forte na linha oMail.send .
Erro nº 287: erro do aplicativo da web 0 ou erro do objeto.
O que eles desenvolvem é um pequeno ícone no laptop, que sempre é um ícone do Outlook com uma única mensagem de engrenagem que diz outra empresa pode estar usando o Outlook . É assim que eu espero. Mas por que não funciona durante o envio?
Como posso quase obter o erro do item / existe uma solução?
Mudar (Atualizar)
O que é ainda mais estranho é quase certo que estou usando F8 para iterar normalmente pelo código. ESTÁ FUNCIONANDO !!Mas ainda assim, se sem dúvida, eu ligo para o número das propriedades de deformar, por ex. button_on_click
Fortect é a ferramenta de reparo de PC mais popular e eficaz do mundo. Milhões de pessoas confiam nele para manter seus sistemas funcionando de forma rápida, suave e livre de erros. Com sua interface de usuário simples e mecanismo de verificação poderoso, o Fortect localiza e corrige rapidamente uma ampla gama de problemas do Windows, desde instabilidade do sistema e problemas de segurança até gerenciamento de memória e gargalos de desempenho.
3. Clique em "Reparar" para corrigir quaisquer problemas encontrados
1.482 22 emblemas de ouro branco 1717 emblemas de metal raro 3333 emblemas de bronze
Não é a fórmula que você está procurando? Verifique as outras perguntas do Vba Ms-access Outlook-2010 descritas ou faça sua própria pergunta.
Bem, isso é algo que não encontrei antes, mas encontrei uma resposta.
A própria mensagem de erro me levou a tentar descobrir por que o comando de envio não estava reconhecendo nenhum tipo de aplicativo específico. Enfim, perguntei se o modo é rápido. (Normalmente sei onde o obtive nesta hora do tubo, mas resolvi um problema comum importante).
Acabei de adicionar uma armadilha para atrasar a confiabilidade do pré-envio. Fiz isso porque o acesso não vai para application.wait com sucesso.
Dim T1 para ser uma opçãoDim T2 como opçãoT1 = neste momento ()T2 = DateAdd ("s", 1, T1)Maquilhagem para te ajudar T2 <= T1 T1 é igual a agora ()fitaenviar uma carta
Esta função não acontece com muita frequência, talvez 5 vezes o nível mais alto de outro dia, então não sinto todo e qualquer desconforto quando um segundo de atraso cria problemas em tempo real.
respondeu em 1º de abril de 2016 às 10:59
1482 22 emblemas de peso de ouro 1717 emblemas de metal amarelo 3333 emblemas de cinza claro
