<%=Request.QueryString("ErrorMessage")%>

Please enter your name and select the room you wish to enter below.

Name:	<% If Not IsNull(Session("Name")) Then Response.Write "" Else Response.Write "" End If %>
Room:	<% Topics = Application("TopicNames") If IsArray(Topics) Then For I=1 To UBound(Topics) Name = Topics(I) Response.Write "" & Name Next End If %>