ASP - toepassingsobject
Een groep ASP-bestanden die samenwerken om een bepaald doel te bereiken, wordt een toepassing genoemd.
Toepassingsobject
Een toepassing op het web kan bestaan uit verschillende ASP-bestanden die samenwerken om een bepaald doel te bereiken. Het Application-object wordt gebruikt om deze bestanden aan elkaar te koppelen.
Het Application-object wordt gebruikt om variabelen vanaf elke pagina op te slaan en te openen, net als het Session-object. Het verschil is dat ALLE gebruikers EEN Applicatie-object delen (bij Sessions is er EEN Sessie-object voor ELKE gebruiker).
Het toepassingsobject bevat informatie die door veel pagina's in de toepassing zal worden gebruikt (zoals gegevens over de databaseverbinding). De informatie is vanaf elke pagina toegankelijk. De informatie kan ook op één plek worden gewijzigd en de wijzigingen worden automatisch op alle pagina's weergegeven.
Applicatievariabelen opslaan en ophalen
Applicatievariabelen kunnen door elke pagina in een applicatie worden geopend en gewijzigd.
U kunt als volgt toepassingsvariabelen in "Global.asa" maken:
<script language="vbscript" runat="server">
Sub Application_OnStart
application("vartime")=""
application("users")=1
End Sub
</script>
In het bovenstaande voorbeeld hebben we twee toepassingsvariabelen gemaakt: "vartime" en "users".
U kunt als volgt toegang krijgen tot de waarde van een toepassingsvariabele:
There are
<%
Response.Write(Application("users"))
%>
active connections.
Loop door de inhoudsverzameling
De Contents-collectie bevat alle toepassingsvariabelen. U kunt door de inhoudsverzameling bladeren om te zien wat erin is opgeslagen:
<%
dim i
For Each i in Application.Contents
Response.Write(i & "<br>")
Next
%>
Als u het aantal items in de Contents-verzameling niet weet, kunt u de eigenschap Count gebruiken:
<%
dim i
dim j
j=Application.Contents.Count
For i=1 to j
Response.Write(Application.Contents(i) & "<br>")
Next
%>
Loop door de StaticObjects-collectie
U kunt door de StaticObjects-verzameling lopen om de waarden te zien van alle objecten die zijn opgeslagen in het toepassingsobject:
<%
dim i
For Each i in Application.StaticObjects
Response.Write(i & "<br>")
Next
%>
Vergrendelen en ontgrendelen
U kunt een applicatie vergrendelen met de "Lock"-methode. Wanneer een toepassing is vergrendeld, kunnen de gebruikers de toepassingsvariabelen niet wijzigen (behalve degene die er momenteel toegang toe heeft). U kunt een applicatie ontgrendelen met de "Unlock"-methode. Deze methode verwijdert de vergrendeling van de toepassingsvariabele:
<%
Application.Lock
'do some application object operations
Application.Unlock
%>