<html>
<body>
<P align="center">
<%'验证用户名是否为空
name=Trim(request("name"))
'如果用户名不为空,利用session变量传递用户姓名
If Len(name)<>0 Then
session("name")=name
%>
<br><br><br><br>
<a href="main.asp"><b>请快快加入迷你聊天室</b></a>
<%
'如果用户名为空
Else
%>
<form action="chat.asp" methed="post">
<div aglin="center">
<center>
<table border="1" width="50%">
<tr>
<td width="100%" aglin="center" bgcolor="#aaaaaa">
<p align="center">
<font color="#800000"><big><big><em>欢迎进入迷你聊天室</em></big></big></font>
<tr>
<td width="100%" align="center" bgcolor="#00f0f0">
<font color="#a000a0">你的姓名:</font>
<input type="text" name="name" size="14" maxlength="10">
<p>
<div align="center">
<font color="#a000a0">你的密码:</font>
<input type="password" name="pwd" size="14" maxlength="10">
</div>
<p>
<input type="submit" value="进入">
</table>
</center></div>
</form>
</body>
</html>
<%End if%>