永发信息网

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
你的要求那么高请人做吧,要不就去网上搜索原码!
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯