Listado 8.9
Uso del método Lock de la clase Application.
Application.Lock
Application.Value ("Nombre") = "Gestion de Clientes"
Application.Unlock
Response.Write(Application("Nombre"))