📄 checklogin.asp
字号:
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>检查登录帐号</title>
</head>
<body>
<%
Response.buffer=true
dim errorMsg
NickName=Trim(Request("nickname"))
If NickName<>"" then '如果用户名不为空,则保存用户信息到Session变量
Session("username")=NickName
Session("EnterUser")=Session("username")
Response.redirect "frm.asp" '跳转到聊天主窗口
Else
ErrorMsg=ErrorMsg+"没有输入聊天代号"
End if
%>
<b><font size="6" color="#0000FF">你无法进入聊天室!</font></b>
<p><%=ErrorMsg%> </p>
<p align="center"><a href="login.htm">返回登录界面</a></p>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -