初学者提问：一段ASP聊天室代码如何补充？ - ASP技术论坛

问题点数：0 回复次数：6

初学者提问：一段ASP聊天室代码如何补充？

以下是我在网上看到的一个入门聊天室代码：
<%if request.ServerVariables("REQUEST_METHOD")="GET" then%>
<form action="chat.asp" method="post">
输入称呼：<input type="text" name="nick" /><br />
<input type="submit" value="进入聊天室" />
</form>
<%response.end%>
<%
else
response.Clear
if request.form("nick")<>"" then
session("nick")=request.Form("nick")
end if
%>
<form method="post" action="chat.asp">
<%=session("nick")%>发话:<input type="text" name="talk" />
<input type="submit" value="提交" />
<input type="reset" value="清除" />
<input type="hidden" name="log" value="1" />
</form>
<a href="chat.asp">离开</a><p>
<%
dim talk
if request.Form("log")=1 then '判断提取的是发话表单的内容，不是进入聊天室时跟着的第一个表单
if request.Form("talk")="" then
talk=session("nick")&"不说一句话就想敷衍大家"
else
talk=trim(request.Form("talk"))
end if
%>
<%
application.Lock
application("show")="["&time&"]"&session("nick")&":"&talk&"<br>"&application("show")
application.UnLock
response.write application("show")
end if
%>
<%end if%>

运行一遍后我想让这个程序做点补充，当request.form("nick")="" 时不进入聊天界面，弹出提示框输入nick。
哪位大哥大姐能把补充好的整个代码贴一贴，我是初学者。谢谢了。

搜索更多相关主题的帖子: 聊天室代码　 nick　ASP　

第 2 楼

得分:0

这个有点麻烦，因为asp是服务器端的编程，你的“弹出提示框”是客户端的编程，如果一综合，就需要记录状态来实现了，程序会比较麻烦的。

第 3 楼

得分:0

没那么复杂，我自己是服务器又是客户端，不牵涉那么多。我就先问下实现这个的代码怎么加进去
就比如怎么加这个代码进去吧
<script>
alert("请先输入昵称")
</script>
大哥教教啊，我没什么脚本基础。帮帮忙，

第 4 楼

得分:0

<html>
<head>
<script language="Javascript">

</script>
</head>
<body>
<%if request.ServerVariables("REQUEST_METHOD")="GET" then%>
<form action="chat.asp" method="post" method="post" name="form1">
输入称呼：<input type="text" name="nick" /><br />
<input type="submit" value="进入聊天室" onClick="return jianche()" />
</form>
<%response.end%>
..........
在客户端进行验证

第 5 楼

得分:0

脚本测试能正常运行

第 6 楼

得分:0

谢谢tudou521

就是这样的，谢谢你。请问你QQ多少，我是刚接触asp的，希望以后能多向你请教

第 7 楼

得分:0

嘎嘎

还想接着问个问题
<%if request.ServerVariables("REQUEST_METHOD")="GET" then%> 是用来判断该页面没有接收任何表单数据的，除这个方法外也可以通过测试request.form是否包含成员来判断，我想问问如何写代码测试request.form是否包含成员。