📄 login.asp
字号:
<html>
<head>
</head>
<title>登陆</title>
<style type="text/css">
<!--
body {
margin-left: 20px;
margin-right: 20px;
}
body,td,th {
font-family: 华文行楷;
}
.STYLE1 {font-size: xx-large}
.STYLE2 {font-size: medium}
.STYLE3 {font-size: large}
.STYLE5 {font-size: x-small}
-->
</style>
<body>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="70%" align="right">
<div align="right"><span class="STYLE1">工程管理系统</span></div></td><td width="30%">
<div align="right"><img src="log.jpg" width="150" height="70" /></div></td></tr></table>
<hr size="10" noshade />
<p><span class="STYLE3">葛洲坝集团六公司黑马营地项目部：</span>
<marquee>欢迎你的到来</marquee> </p>
<form id="form1" name="form1" method="post" action="login.asp">
<table width="100%" height="107" border="0" cellspacing="2" bordercolor="#666666" bgcolor="#FFFFCC">
<tr> <p class="STYLE2">用户登陆</p></tr>
<tr><td align="right"><span class="STYLE2">用户名： </td>
<td align="left" valign="bottom"><label>
<input name="user" type="text" id="user" />
</label></td>
</tr>
<tr> <td align="right"> <span class="STYLE2">密码：</span> </td>
<td align="left" valign="bottom"> <label>
<input name="psw" type="password" id="psw" />
</label>
</td></tr>
<tr> <td align="right"> <span class="STYLE2">用户标志：</td>
<td valign="bottom"> <label>
<select name="flag">
<option value="管理员">管理员</option>
<option value="职工">职工</option>
<option value="游客">游客</option>
<option value="11">11</option>
</select>
</label></td>
<tr>
<tr> <td align="right">
<label>
<input name="Submit" type="submit" value=" 登陆 " />
</label></td>
<td> <label>
<input type="reset" name="Submit2" value=" 重置 " />
</label>
</td></tr>
</table>
</form>
<hr size="10" noshade />
<p> </p>
<p align="right"> <span class="STYLE5">葛洲坝集团工程管理系统</span></p>
<p align="right"><span class="STYLE5"> ２００８年１１月６号 </span></p>
<%dim strConn
dim conn
set conn = Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+Server.mappath("db.mdb")+";Persist Security Info=False"
set rs=server.createobject("adodb.recordset")
name=trim(request.form("user"))
pwd=trim(request.form("psw"))
flag=trim(request.form("flag"))
rs.open "select * from 用户 where 用户名='"&name&"'and 用户标志='"&flag&"'",conn,1,1
if name="" then
response.write"请输入用户名"
else if pwd="" then
response.write"<script>alert('请输入密码');</script>"
else if rs.eof then
response.write"<script>alert('没有此用户');</script>"
else if pwd<>rs("密码") then
response.write"<script>alert('密码错误');</script>"
else
session("name")=name
session("judge")=true
session("flag")=flag
response.redirect("index.asp")
end if
end if
end if
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -