Evento RequestComplete

[O Microsoft Agent foi preterido a partir do Windows 7 e pode não estar disponível em versões subsequentes do Windows.]

Descrição

Ocorre quando o servidor conclui uma solicitação enfileirada.

Sintaxe

Subagente**_RequestComplete** (ByValRequest**)**

Peça	Descrição
Pedido	Retorna o objeto Request.

 

Comentários

Esse evento retorna um objetoRequest. Como as solicitações são processadas de forma assíncrona, você pode usar esse evento para determinar quando o servidor conclui o processamento de uma solicitação (como um Get, Playou método Speak) para sincronizar esse evento com outras ações geradas pelo seu aplicativo. O servidor envia o evento somente para o cliente que criou a referência ao objeto Request e somente se você definiu uma variável global para a referência de solicitação:

   Dim MyRequest 
   Dim Genie 

   Sub window_Onload
   
   Agent1.Characters.Load "Genie","https://agent.microsoft.com/characters/v2/genie/genie.acf"

   Set Genie = Agent.Characters("Genie")

   ' This syntax will generate RequestStart and RequestComplete events.
   Set MyRequest = Genie.Get("state", "Showing")
   ' This syntax will not generate RequestStart and RequestComplete events.
   Genie.Get "state", "Hiding"
   
   End Sub

   Sub Agent1_RequestComplete(ByVal Request)

   If Request = MyRequest Then
      Status = "Showing animation is now loaded"

   End Sub

Como a animação objetos Request não são atribuídos até que o servidor processe a solicitação, verifique se o objeto Request existe antes de tentar avaliá-lo. Por exemplo, no Visual Basic, se você usar uma condicional para testar se uma solicitação específica foi concluída, você pode usar a palavra-chave Nothing:

   Sub Agent1_RequestComplete (ByVal Request)

   If Not (MyRequest Is Nothing) Then
      If Request = MyRequest Then
      '-- Do whatever
      End If
   End If

   End Sub

Ver também

evento RequestStart