📄 login.asp
字号:
<!--#include file="function.asp"-->
<%
Session.Contents("uid")= 0
%>
<!--#include file="inc_config.asp"-->
<%
action = "login"
tempaction = Request.QueryString("action")
If (tempaction <> "") Then
action = tempaction
End If
if action = "chk" Then
p_name=fixchar(Request.Form("p_name"))
p_pwd=fixchar(Request.Form("p_pwd"))
set conn=server.createobject("adodb.connection")
conn.Open constr
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT top 1 * FROM mem_db WHERE loginname = '" & p_name & "' "
rs.open sql,conn,1,1
if rs.bof and rs.eof then
rs.close
call WriteErrMsg("没有这个用户。")
else
if (p_pwd = rs("loginpass")) then
session.Contents("uid") = Clng(rs("mem_id"))
rs.close
Response.redirect "index.asp"
else
rs.close
call WriteErrMsg("登录名或密码错误。")
end if
End if
ElseIf action = "out" then
session.Contents("uid") = ""
call WriteSuccessMsg("成功退出本次登录。")
Else
%>
<html>
<head>
<title>请 登 录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="STYLE.CSS" rel="stylesheet" type="text/css">
<script LANGUAGE="javascript">
<!--
function Check() {
if (document.form1.p_name.value=="")
{
alert("请输入登录名称！")
document.form1.p_name.focus()
return false
}
if (document.form1.p_pwd.value=="")
{
alert("请输入登录密码！")
document.form1.p_pwd.focus()
return false
}
}
//-->
</script>
</head>
<body leftmargin="0" topmargin="0">
<!--#include file="inc_top.asp"--><br>
<form name="form1" method="post" action="login.asp?action=chk" onsubmit="return Check()">
<table width="500" border="0" align="center" cellpadding="2" cellspacing="2" class="border">
<tr align="center" class="backq">
<td colspan="2">请输入登录信息</td>
</tr>
<tr >
<td width="100"> </td>
<td width="400"> </td>
</tr>
<tr >
<td width="100" align="right">用户名称：</td>
<td width="400"> <input name="p_name" type="text" value="aaa" size="20" maxlength="50"></td>
</tr>
<tr >
<td width="100" align="right">登录密码：</td>
<td width="400"><input name="p_pwd" type="text" value="ccc" size="20" maxlength="50"> <input type="submit" name="Submit" value=" 登 录 "></td>
</tr>
<tr >
<td colspan="2"> </td>
</tr>
<tr align="center" class="backq">
<td colspan="2"> </td>
</tr>
</table>
</form>
<form name="form1" method="post" action="users_add.asp?action=save" onsubmit="return Check()">
<table width="500" border="0" align="center" cellpadding="2" cellspacing="2" class="border">
<tr align="center" class="backq">
<td colspan="2">请输入注册信息</td>
</tr>
<tr >
<td width="100"> </td>
<td width="400"> </td>
</tr>
<tr >
<td width="100" align="right">用户名称：</td>
<td width="400"> <input name="p_name" type="text" value="" size="20" maxlength="50"></td>
</tr>
<tr >
<td width="100" align="right">登录密码：</td>
<td width="400"><input name="p_pwd" type="text" value="" size="20" maxlength="50"> <input type="submit" name="Submit" value=" 注 册 "></td>
</tr>
<tr >
<td colspan="2"> </td>
</tr>
<tr align="center" class="backq">
<td colspan="2"> </td>
</tr>
</table>
</form>
<!--#include file="inc_bottom.asp"-->
</body>
</html>
<%
End If
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -