Evento RequestStart

[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 inicia uma solicitação enfileirada.

Sintaxe

Subagent**_RequestStart** (ByValRequest**)**

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

 

Comentários

O evento retorna um Request objeto. Como as solicitações são processadas de forma assíncrona, você pode usar esse evento para determinar quando o servidor começa a processar uma solicitação (como um método Get, Playou Speak) e, assim, sincronizá-lo com outras ações geradas pelo seu aplicativo. O evento é enviado 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 = Agent1.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_RequestStart(ByVal Request)

   If Request = MyRequest Then
      Status = "Loading the Showing animation"

   End Sub

OStatusretorna 4 (solicitação em andamento) para o objetoSolicitaçãoretornado.

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_RequestStart (ByVal Request)

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

   End Sub

Ver também

evento RequestComplete