É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.]
-
Description
-
Se produit lorsque le serveur commence une requête mise en file d’attente.
-
Syntaxe
-
Sous-agent**_RequestStart** (ByVal Request**)**
Élément Description Requête Retourne l’objet Request .
Notes
L’événement retourne un objet Request . Étant donné que les demandes sont traitées de manière asynchrone, vous pouvez utiliser cet événement pour déterminer quand le serveur commence à traiter une demande (par exemple, une méthode Get, Play ou Speak ) et ainsi synchroniser cette opération 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 Request et uniquement si vous avez défini une variable globale pour la référence de requête :
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 renvoie 4 (requête en cours) pour l’objet Request retourné.
Étant donné que les objets Request d’animation ne sont pas affectés tant que le serveur n’a pas traite la demande, assurez-vous que l’objet Request existe avant d’essayer de l’évaluer. Par exemple, dans Visual Basic, si vous utilisez une condition pour tester si une demande spécifique a été effectuée, vous pouvez utiliser l’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 Request . Ce problème a été résolu dans VBScript 2.0.
Voir aussi
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour