3-19.asp

来自「ASP+SQL Server动态网站开发从基础到实践教程」· ASP 代码 · 共 37 行

ASP
37
字号

<html>
<head>

<meta http-equiv="Content-Language" content="zh-cn">

<title>简单的聊天室</title>
</head>
<body>
<p>大家好,欢迎进入WWW聊天室</p>
<%
dim myWords,myName
myWords=request.form("words")
myName=request.form("name")

myWords=myName & ":" & myWords  '在显示聊天信息的时候,加入聊天人的姓名
Application.lock  '锁住Application对象
application("allwords")=application("allwords") & "<br>" & myWords   '每个用户都将自己的话加入

'输出所有用户的聊天信息,这样每个人都可以看到大家的聊天内容
response.write application("allwords")

application.unlock         '解开application

%>



<form method="POST" action="3-19.asp">
	
	<p>输入聊天的内容:<input type="text" name="words" size="20">&nbsp;&nbsp; <br>
	你的姓名:<input type="text" name="name" size="20"></p>
	<p><input type="submit" value="提交" name="B1"></p>
</form>

</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?