Filoweb.it

CHAT IN ASP


FB TW Pinterest whatsapp RSS FEED News letter
ASP
CHAT IN ASP


Login.asp:

<html>

<head>

<title>Untitled Document</title>

<meta http-equiv=" Content-Type" content=" text/html; charset=iso-8859-1" >

</head>

<body>

<form name=" form1" method=" post" action=" multiframe.asp" >

<p><font size=" +2" >Inserisci il tuo NickName</font>

<br>

<input name=" nick" type=" text" id=" nick" >

<input type=" submit" name=" Submit" value=" entra nella chat" >

</p>

</form>

</body>

</html>



Chat.asp:

<html>

<META HTTP-EQUIV=REFRESH CONTENT=" 30;URL=chat.asp#fine_pagina" >

<%

Set fso = CreateObject(" Scripting.FileSystemObject" )

%>

<title>Untitled Document</title>

<meta http-equiv=" Content-Type" content=" text/html; charset=iso-8859-1" >

<%select case request.querystring(" azione" )

case " scrivi"

Set f = fso.OpenTextFile(Server.MapPath(" \chat\chat.txt" ), 8, True)

f.WriteLine now() & " - <b>" & request.form(" nick" )& " </b>: " &request.form(" msg" )

end select%>

<body>

<%

Set f = fso.OpenTextFile(Server.MapPath(" \chat\chat.txt" ), 1)

Do While f.AtEndOfStream <> True

response.write f.ReadLine & " <br>"

Loop

%>

<a name=" fine_pagina" ></a></body>

</html>





Form.asp:

<!DOCTYPE HTML PUBLIC " -//W3C//DTD HTML 4.01 Transitional//EN" >

<html>

<head>

<title>Untitled Document</title>

<meta http-equiv=" Content-Type" content=" text/html; charset=iso-8859-1" >

</head>

<body>

<form action=" chat.asp?azione=scrivi#fine_pagina" method=" post" name=" form1" target=" topFrame" >

<p><font size=" 2" >Inserisci il messaggio:</font>

<input name=" msg" type=" text" id=" msg" >

<input type=" submit" name=" Submit" value=" invia" >

<input name=" nick" type=" hidden" id=" nick" value=" <%=request.querystring(" nick" )%>" >

</p>

</form>

</body>

</html>

Multiframe.asp:

<!DOCTYPE HTML PUBLIC " -//W3C//DTD HTML 4.01 Frameset//EN" " http://www.w3.org/TR/html4/frameset.dtd" >

<html>

<head>

<title>Untitled Document</title>

<meta http-equiv=" Content-Type" content=" text/html; charset=iso-8859-1" >

</head>

<frameset rows=" 80%,*" cols=" *" framespacing=" 0" frameborder=" NO" border=" 0" >

<frame src=" chat.asp" name=" topFrame" scrolling=" auto" noresize >

<frame src=" form.asp?nick=<%=request.form(" nick" )%>" name=" mainFrame" >

</frameset>

<noframes><body>

</body></noframes>

</html>
FB TW Pinterest whatsapp RSS FEED News letter

filoweb.it è il sito personale di Filippo Brunelli
(c) 2017 Filippo Brunelli
Le immagini ed i testi contenuti nel sito filoweb.it sono di proprietà di Filippo Brunelli salvo diversamente indicato.
L'uso delle immagini e del testo è gratuito per uso personale ed è subbordinato alla citazione della fonte.
Brunelli Filippo declina ogni responsabilità per l'uso che viene fatto delle informazioni presenti nel sito filoweb.it.
FILOWEB.it Piccolo quaderno degli appunti. Argomento: ASP, Titolo:CHAT IN ASP. Altri script riguardano: CSS, Jscript, .net, Classic Asp, HTML, Jquery, varie, url rewrite, pagina protetta da password, ecc. Altro su https://www.filoweb.it