Copy and paste this into a DTML Method to test ZSession Applications.
<html>
<head>
</head>
<body bgcolor=white>
<HR>
Call ZSession with an application name parameter:<dtml-var "ZSession(applicationName='MyWeb')"><BR>
Lock ZSession Application Object to gain exclusive access:<dtml-var "APPLICATION.lock()"><BR>
<HR>
Set APPLICATION['Value1']:<dtml-call "APPLICATION.set('Key1','Value1')"><BR>
Set APPLICATION['Value2']:<dtml-call "APPLICATION.set('Key2','Value2')"><BR>
Set APPLICATION['Value3']:<dtml-call "APPLICATION.set('Key3','Value3')"><BR>
<HR>
Get APPLICATION['Value1']:<dtml-var "APPLICATION['Key1']"><BR>
Get APPLICATION['Value2']:<dtml-var "APPLICATION['Key2']"><BR>
Get APPLICATION['Value3']:<dtml-var "APPLICATION['Key3']"><BR>
<HR>
Has key APPLICATION['Key3']:<dtml-var "APPLICATION.has_key('Key3')"><BR>
<HR>
APPLICATION Keys:<BR>
<dtml-in "APPLICATION.keys()">
<dtml-var sequence-item> = "<dtml-var "APPLICATION[_['sequence-item']]">"<br>
</dtml-in>
<HR>
Length APPLICATION:<dtml-var "APPLICATION.len()"><BR>
<HR>
Delete APPLICATION['Key3']:<dtml-var "APPLICATION.delete('Key3')"><BR>
<HR>
APPLICATION Keys Again:<BR>
<dtml-in "APPLICATION.keys()">
<dtml-var sequence-item> = "<dtml-var "APPLICATION[_['sequence-item']]">"<br>
</dtml-in>
<HR>
Keys Items:<dtml-var "APPLICATION.items()">
<HR>
Keys Values:<dtml-var "APPLICATION.values()">
<HR>
Clear Keys:<dtml-call "APPLICATION.clear()">
<HR>
APPLICATION Keys Once More:<BR>
<dtml-in "APPLICATION.keys()">
<dtml-var sequence-item> = "<dtml-var "APPLICATION[_['sequence-item']]">"<br>
</dtml-in>
Unlock ZSession Application Object to enable others to access it:<dtml-var "APPLICATION.unlock()"><BR>
</body>
</html>