Événement RequestStart
[Microsoft Agent est déconseillé à partir de Windows 7 et peut ne pas être disponible dans les versions ultérieures de Windows.]
-
Descriptive
-
Se produit lorsque le serveur commence une demande en file d’attente.
-
Stockéesyntaxe
-
Sous - agent * * * _ RequestStart * ( demande ByVal * * )
Partie Description Requête Retourne l’objet de requête .
Notes
L’événement retourne un objet de requête . Étant donné que les demandes sont traitées de façon asynchrone, vous pouvez utiliser cet événement pour déterminer à quel moment le serveur commence à traiter une demande (par exemple, une méthode d' extraction, de lectureou de parole ) et, par conséquent, synchroniser cela avec d’autres actions générées par votre application. L’événement est envoyé uniquement au client qui a créé la référence à l’objet de requête et uniquement si vous avez défini une variable globale pour la référence à la demande :
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
L' État retourne 4 (demande en cours) pour l’objet de requête retourné.
Étant donné que les objets de requête d’animation ne sont pas assignés tant que le serveur n’a pas traité la demande, assurez-vous que l’objet de requête existe avant d’essayer de l’évaluer. par exemple, dans Visual Basic, si vous utilisez un conditionnel pour tester si une requête spécifique a été effectuée, vous pouvez utiliser le mot clé Nothing :
Sub Agent1_RequestStart (ByVal Request)
If Not (MyRequest Is Nothing) Then
If Request = MyRequest Then
'-- Do whatever
End If
End If
End Sub
Notes
Dans VBScript 1,0, cet événement se déclenche même si vous ne définissez pas de références à un objet de requête . Ce problème a été résolu dans VBScript 2,0.