⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 login.asp

📁 一个基于ASP的多功能多式样多元化的网上书店系统
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
'/*----------------------------------------------
'项目名:     东区网上书店(ASP课程设计)
'开始日期:   2003年12月18日18:00
'完成日期:  2003年12月27日53:00
'最后修改:  -
'制作地点:  科干东区宿舍
'程序制作:  陈文杰 
'联系方式:  QQ:168909 
'
'
'           Email:Cwj@edu.21cn.com
'            
'	*未经同意本程序不得使用!*
'
'     请尊重他人劳动成果,保留上面信息!
'-----------------------------------------------*/

%><!--#include file="manage/inc/config.asp"--> 
<!--#include file="inc/conn.asp"--> 
<%
if NOT isempty(request("LoginSubmit")) then
dim username,password
username=replace(trim(request("username")),"'","")
password=md5(replace(trim(request("password")),"'",""))

'if username="" or password="" then
'	call MsgBox("对不起,登录失败,请检查您的登录名和密码","None","None")
'end if

set rs=server.CreateObject("adodb.recordset")

rs.Open "select * from [user] where username='"&username&"' and password='"&password&"' " ,conn,1,3

if not(rs.bof and rs.eof) then
	if password=rs("password") then
		response.Cookies(cookieName)("username")=trim(request("username"))
		response.Cookies(cookieName)("vip")=rs("vip")
		rs("lastvst")=now()
		rs("loginnum")=rs("loginnum")+1
		rs.Update
		rs.Close
		set rs=nothing
		response.redirect "muser.asp"

	else
		call MsgBox("对不起,您的用户名或密码有误!","Back","None")
	end if
else
	call MsgBox("对不起,您的用户名或密码有误!","Back","None")
end if

end if


%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>东区网上书店</title>
<link href="style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style2 {color: #000000}
-->
</style>

</head>

<body>
<!--#include file="head.htm"-->


<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="219" align="left" valign="top"><!--#include file="left.asp"--></td>
    <td width="561" align="left" valign="top"> <br>      <br>        <table cellpadding="0" cellspacing="0" border="0">
        <tr>
          <td width="18"><img src="images/w.gif"></td>
          <td style="color:#415373">用户登陆</td>
        </tr>
        </table>        <br>        <form action="" method="post" name="loginfo" id="loginfo">
          <table border="0" cellpadding="0" cellspacing="10" class="t1">
            <tr>
              <td width="170" height="22" align="right" ><span class="style2">用户名:</span></td>
              <td width="235" height="22" ><input name="username" type="text" class="inputstyle" id="username">
              </td>
            </tr>
            <tr>
              <td height="22" align="right" ><span class="style2">密码:</span></td>
              <td height="22" ><input name="password" type="password" class="inputstyle" id="password"></td>
            </tr>
            <tr align="center">
              <td height="22" colspan="2" ><input type="reset" name="Submit" value="重置">
                  <input name="LoginSubmit" ONCLICK="return checkuu();" type="submit" id="LoginSubmit" value="登录">
                  <script language="JavaScript">
<!--
  function checkuu()
{
    if(checkspace(document.loginfo.username.value)) {
	document.loginfo.username.focus();
    alert("用户名不能为空!");
	return false;
  }
    if(checkspace(document.loginfo.password.value)) {
	document.loginfo.password.focus();
    alert("密码不能为空!");
	return false;
  }
	
  }
//-->
                  </script></td>
            </tr>
          </table>
      </form></td>
  </tr>
</table>

<!--#include file="foot.htm"-->
</body>
</html>

⌨️ 快捷键说明

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