Поделиться через

Событие RequestStart

  • Статья

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

Description

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

Синтаксис

Подагент**_RequestStart** (ByVal Request**)**

Часть Description
Запросить Возвращает объект 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 существует, прежде чем пытаться оценить его. Например, в 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