Notitie
Voor toegang tot deze pagina is autorisatie vereist. U kunt proberen u aan te melden of mappen te wijzigen.
Voor toegang tot deze pagina is autorisatie vereist. U kunt proberen om 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 start.
-
syntaxis
-
Subagent**_RequestStart** (ByValRequest**)**
Deel Beschrijving aanvragen Retourneert het Request-object.
Opmerkingen
De gebeurtenis retourneert een Request-object. Omdat aanvragen asynchroon worden verwerkt, kunt u deze gebeurtenis gebruiken om te bepalen wanneer de server begint met het verwerken van een aanvraag (zoals een Get, Playof Speak methode) en deze vervolgens synchroniseren met andere acties die door uw toepassing worden gegenereerd. De gebeurtenis wordt alleen verzonden 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 = 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
De Status retourneert 4 (aanvraag wordt uitgevoerd) voor het Aanvraag object dat is geretourneerd.
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_RequestStart (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