asp 实现一个简易的网上聊天室

答案:2 悬赏:0 手机版

解决时间 2021-02-14 19:29

提问者网友：听门外雪花风
2021-02-14 04:15

index.asp

<html>
<frameset rows="*,60">
<frame name="message"src="message.asp">
<frame name="say"src="say.asp">
</frameset><noframes></noframes>
</html>

message.asp

<html>
<head>
<title>显示发言页面</title>
<meta http-equiv="refresh"content="5">
</head>
<body>
<%Response.Write Application("strChat")'显示聊天内容'%>
</body>
</html>

say.asp
<html>
<body>
<form name="form1"method="post"action="">
昵称:<input type="text"name="txtName"size="10">
发言:<input type="text"name="txtSay"size="30">
<input type="submit"value="发送">
</form>
<%

If Trim(Request.Form("txtName"))<>""And Trim(Request.Form("txtSay"))<>""then

Dim strSay
strSay=Request.Form("txtName")&"在"&Now()&"说:"&Request.Form("txtSay")&"<br>"

Application.Lock
Application("strChat")=strSay&Application("strChat")
Application.Unlock
End if
%>
</body>
</html>

模仿上述实现简单的网上聊天室，要求在原有基础上进行以下功能的完善：
（1）用户登录后才能发言。（用户名密码无需存入数据库）
（2）用户发言时，直接给出用户名，不再需要用户手工输入用户名。
（3）显示所有在线成员。

最佳答案

五星知识达人网友：woshuo
2021-02-14 05:30

用session实现,不过,你用户名不存数据库,你存哪时?TXT,这个速度太慢了.不建议

全部回答

1楼网友：刀戟声无边
2021-02-14 06:22

你的要求那么高请人做吧，要不就去网上搜索原码！

我要举报

如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！