There well sone be a:
Startpage		Writing board - There you can write things to make this site better.
Info
©Copyright		Chat- A better
Aliance
History		assassins e-mail.
Feauters
Members
C A F E ( C H A T T)
Join	<% Dim convo convo = Application("conversation") If Len(convo) > 2000 Then convo = Left(convo, 2000) Application.Lock Application("conversation") = convo Application.Unlock End If Response.Write convo %> <% If trim(Request.Form("name")) = "" Then %> <% Else If Not IsObject(Application("users")) Then Application.Lock Set Application("users") = _ Server.CreateObject("Scripting.Dictionary") Application.Unlock End If Session("name") = Request.Form("name") Application.Lock Application("users").Add Session("name"), time Application.Unlock If not IsEmpty(Application("conversation")) Then Application.Lock Application("conversation") = "" & Session("name") & _ " Enters The Room " & Application("conversation") Application.Unlock End If Response.Redirect "cafe.asp" End If %>
Rules