<!----Application.cfm----->
<cflock timeout="15" scope="APPLICATION" type="EXCLUSIVE">
<cfif NOT isDefined("Application.UsersInfo")>
<cfset Application.UsersInfo = StructNew()>
</cfif>
</cflock>
<cflock name="#CreateUUID()#" timeout="15" type="EXCLUSIVE">
<cfset user_cfid = Evaluate(CFID)>
<cfset user_time = Now()>
</cflock>
<cflock scope="APPLICATION" type="EXCLUSIVE" timeout="15">
<cfif NOT StructKeyExists(Application.UsersInfo, user_cfid)>
<cfset temp = StructInsert(Application.UsersInfo, user_cfid, user_time)>
</cfif>
</cflock>
<cflock scope="APPLICATION" type="EXCLUSIVE" timeout="15">
<cfloop collection="#Application.UsersInfo#" item="itmUser">
<cfif
Evaluate(DateDiff("n", StructFind(Application.UsersInfo, itmUser), Now())) GT 10
>
<cfset StructDelete(Application.UsersInfo, itmUser)>
</cfif>
</cfloop>
</cflock>
<!----Put this in a file---->
<cflock scope="APPLICATION" type="EXCLUSIVE" timeout="10">
<cfoutput>
<center><B> Total Active Sessions : #StructCount(Application.UsersInfo)#</B></center>
</cfoutput>
</cflock>
Does this help?
Wes