Событие RequestStart

[Агент Майкрософт не рекомендуется использовать в Windows 7 и может быть недоступен в последующих версиях Windows.]

Описание

Происходит, когда сервер начинает запрос в очереди.

Синтаксис

Дочернийагент**_RequestStart** (запросByVal**)**

Часть Описание
Запрос Возвращает объект Request .

 

Комментарии

Событие возвращает объект Request . Так как запросы обрабатываются асинхронно, это событие можно использовать, чтобы определить, когда сервер начинает обработку запроса (например, метод Get, Play или Speak ), и таким образом синхронизировать его с другими действиями, созданными приложением. Событие отправляется только клиенту, создавшего ссылку на объект Request , и только в том случае, если для ссылки на запрос определена глобальная переменная:

   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

Состояние возвращает 4 (выполняется запрос) для возвращенного объекта Request.

Так как объекты анимации Request не назначаются до тех пор, пока сервер не обработает запрос, убедитесь, что объект Request существует, прежде чем пытаться оценить его. Например, если в Visual Basic используется условное условие для проверки выполнения определенного запроса, можно использовать ключевое слово Nothing:

   Sub Agent1_RequestStart (ByVal Request)

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

   End Sub

Примечание

В VBScript 1.0 это событие возникает, даже если вы не определяете ссылки на объект Request . Это исправлено в VBScript 2.0.

 

См. также:

Событие RequestComplete