RequestComplete, evento
[Microsoft Agent è deprecato a partire da Windows 7 e potrebbe non essere disponibile nelle versioni successive di Windows.]
-
Descrizione
-
Si verifica quando il server completa una richiesta in coda.
-
Sintassi
-
Sub agent**_RequestComplete** (ByVal Request**)**
In parte Descrizione Richiedi Restituisce l'oggetto Request .
Osservazioni:
Questo evento restituisce un oggetto Request. Poiché le richieste vengono elaborate in modo asincrono, è possibile usare questo evento per determinare quando il server completa l'elaborazione di una richiesta (ad esempio un metodo Get, Play o Speak) per sincronizzare questo evento con altre azioni generate dall'applicazione. Il server invia l'evento solo al client che ha creato il riferimento all'oggetto Request e solo se è stata definita una variabile globale per il riferimento alla richiesta:
Dim MyRequest
Dim Genie
Sub window_Onload
Agent1.Characters.Load "Genie","https://agent.microsoft.com/characters/v2/genie/genie.acf"
Set Genie = Agent.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_RequestComplete(ByVal Request)
If Request = MyRequest Then
Status = "Showing animation is now loaded"
End Sub
Poiché gli oggetti Request di animazione non vengono assegnati finché il server non elabora la richiesta, assicurarsi che l'oggetto Request esista prima di tentare di valutarlo. Ad esempio, in Visual Basic, se si usa un'istruzione condizionale per verificare se una richiesta specifica è stata completata, è possibile usare la parola chiave Nothing :
Sub Agent1_RequestComplete (ByVal Request)
If Not (MyRequest Is Nothing) Then
If Request = MyRequest Then
'-- Do whatever
End If
End If
End Sub
Nota
In VBScript 1.0 questo evento viene generato anche se non si definiscono riferimenti a un oggetto Request. Questo problema è stato risolto in VBScript 2.0.
Vedi anche