<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Language" content="it">
<link rel="stylesheet" type="text/css" href="chat.css">
<title>La Chat</title>
<base target="msg">
<script>
parent.msg.document.forms(0).chat='';
</script>
<script language="JavaScript">
function chiudimi()
{
parent.close();
}
</script>
</head>
<body class=messages topmargin="0" leftmargin="0" rightmargin="0" onLoad="window.setTimeout('chiudimi()', 50000)">
<div class=hdr>La Chat</div>
<%
Response.Expires = 10
Response.Buffer = True
if request.form("azione")="msg" and len(request.form("chat"))>0 then
'AGGIUNGI MESSAGGIO
arrmsg = Application("msg")
arrmsg = arrmsg & "#§#" & Now() &_
"|#|" & Session("ID") & "|#|" &_
Request.Form("chat")
Application.Lock
Application("msg") = arrmsg
Application.UnLock
Response.Redirect("chat.asp#fondo")
end if
'recupero messaggi
Response.write "<HTML><HEAD>"
Response.write "<META http-equiv=""REFRESH"" content=""5; url=#fondo"">"
Response.write "</HEAD>"
arrMsg = Application("msg")
if len(arrMsg) >0 then
arrMsg = Split(arrMsg, "#§#")
for j = 1 to ubound(arrMsg)
msg = Split(arrMsg(j), "|#|")
Response.write "[*]<font face=Arial Size=2 color=gray>"
Response.write msg(0)
Response.write "</font><font face=Arial Size=2 color=#333333>"
Response.write " [ "
Response.write msg(1) & " ] - "
Response.write "</font><font face=Arial Size=2 color=#FF0000>"
Response.write msg(2) & "</font>"
next
Response.write "<a name=fondo></a>"
end if
%>
</body>
</html>