<% Option Explicit %>
<%
'
' $Id: window.asp,v 1.1.1.1 2003/03/09 22:45:57 peter Exp $
'
' Prints all available chatlines out on response stream if user has a valid
' session, i.e. hasn't been logged out of the system and has a valid chat
' identifier.
'
' This script also logs off users if they requested it or if their session
' has timed out, e.g. if they haven't written anything in the chat window
' for a while (default is 5 minutes)
'
' @author Peter Theill peter@theill.com
'
Response.Buffer = True
If (NOT loggedOn()) Then
Response.Write(getLoggedOutScript())
Response.End
End If
Dim user
Set user = getLoggedOnUser()
%>
<%= APPLICATION_NAME %>