Método AppointmentItem.Respond (Outlook)
Responde a uma solicitação de reunião.
Sintaxe
expression. Respond( _Response_ , _fNoUI_ , _fAdditionalTextDialog_ )
Expressão Uma variável que representa um objeto 'AppointmentItem'.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Response | Obrigatório | OlMeetingResponse | A resposta à solicitação. |
| fNoUI | Opcional | Variant | True para não exibir uma caixa de diálogo; a resposta é enviada automaticamente. False para exibir a caixa de diálogo para responder. |
| fAdditionalTextDialog | Opcional | Variant | False para não solicitar ao usuário de entrada; a resposta é exibida no Inspetor para edição. True para solicitar ao usuário enviar ou enviar com comentários. Este argumento é válido somente se fNoUI for False. |
Valor de retorno
Um objeto MeetingItem que representa a resposta à solicitação de reunião.
Comentários
Quando você chama o método Respond com o parâmetro olMeetingAccepted ou olMeetingTentative, o Outlook criará um novo item de compromisso que duplica o item de compromisso original. O novo item terá um ID de entrada diferente. Outlook então removerá o item original. Você deve não mais usar a identificação de entrada do item original, mas em vez disso, chame a propriedade EntryID para obter a identificação de entrada para o novo item para quaisquer necessidades subsequentes. Isso é para garantir que esse item de compromisso será adequadamente sincronizado no seu calendário se mais de um computador cliente acessa seu calendário, mas pode estar offline usando ao modo cache ocasionalmente.
A tabela a seguir descreve o comportamento do método responder dependendo do objeto pai e os parâmetros fNoUI e fAdditionalTextDialog.
| fNoUI, fAdditionalTextDialog | Resultado |
|---|---|
| True, True | Item de resposta é retornada com nenhuma interface de usuário. Para enviar a resposta, você deve chamar o método Send. |
| True, False | O mesmo resultado que com True, True. |
| False, True | Pede para o usuário Enviar ou Editar antes de enviar a resposta. |
| False, False | Um novo item de resposta aparece na interface do usuário, mas nenhum aviso é exibido. |
Exemplo
Este exemplo Visual Basic for Applications (VBA) localiza MeetingItem na pasta de caixa de entrada padrão e adiciona o compromisso associado à pasta calendário. Em seguida, ele responde ao remetente aceitando a reunião.
Sub AcceptMeeting()
Dim myNameSpace As Outlook.NameSpace
Dim myFolder As Outlook.Folder
Dim myMtgReq As Outlook.MeetingItem
Dim myAppt As Outlook.AppointmentItem
Dim myMtg As Outlook.MeetingItem
Set myNameSpace = Application.GetNamespace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox)
Set myMtgReq = myFolder.Items.Find("[MessageClass] = 'IPM.Schedule.Meeting.Request'")
If TypeName(myMtgReq) <> "Nothing" Then
Set myAppt = myMtgReq.GetAssociatedAppointment(True)
Set myMtg = myAppt.Respond(olResponseAccepted, True)
myMtg.Send
End If
End Sub
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.