Notitie
Voor toegang tot deze pagina is autorisatie vereist. U kunt proberen u aan te melden of de directory te wijzigen.
Voor toegang tot deze pagina is autorisatie vereist. U kunt proberen de mappen te wijzigen.
[Microsoft Agent is afgeschaft vanaf Windows 7 en is mogelijk niet beschikbaar in volgende versies van Windows.]
-
beschrijving
-
Treedt op wanneer de server een aanvraag in de wachtrij heeft voltooid.
-
syntaxis
-
Subagent**_RequestComplete** (ByValRequest**)**
Deel Beschrijving aanvragen Retourneert het Request-object.
Opmerkingen
Met deze gebeurtenis wordt een Request-object geretourneerd. Omdat aanvragen asynchroon worden verwerkt, kunt u deze gebeurtenis gebruiken om te bepalen wanneer de server de verwerking van een aanvraag (zoals een Ophalen, Afspelenof Uitspreken methode) voltooit om deze gebeurtenis te synchroniseren met andere acties die door uw toepassing worden gegenereerd. De server verzendt de gebeurtenis alleen naar de client die de verwijzing naar het Request-object heeft gemaakt en alleen als u een globale variabele voor de aanvraagverwijzing hebt gedefinieerd:
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
Omdat animaties -objecten aanvragen pas worden toegewezen nadat de server de aanvraag heeft verwerkt, moet u ervoor zorgen dat het Aanvraag--object bestaat voordat u het probeert te evalueren. Als u bijvoorbeeld in Visual Basic een voorwaardelijk gebruikt om te testen of een specifieke aanvraag is voltooid, kunt u het trefwoord Niets gebruiken:
Sub Agent1_RequestComplete (ByVal Request)
If Not (MyRequest Is Nothing) Then
If Request = MyRequest Then
'-- Do whatever
End If
End If
End Sub
Notitie
In VBScript 1.0 wordt deze gebeurtenis geactiveerd, zelfs als u geen verwijzingen naar een Request-object definieert. Dit is opgelost in VBScript 2.0.
Zie ook