login.asp

派出所案件管理系统 20080728 用于派出所内部管理案件信息

<!--#include file="../inc/Conn.asp"-->
<!--#include file="../inc/md5.asp"-->
<%
'==================================================================
'中中中中中中中中中中中中中中中中中中中中中中中中中中中中中中中中中
'中　　************** 思翔 实用办公系统 ***************　　　　　国
'中　　文件名：            　　　　　　　　　　　　　　　　　　　国
'中　　作用：                　　　　　　　　　　　　　　　　　　国
'中　　作者：搜捕者　　　　　　　　　　　　　　　　　　　　　　　国
'中　　网站：思翔　http://www.sxang.cn　　　　　　　　　 　　　　国
'中　　联系：QQ:7937080　　　　　　　　　　　　　　　  　　　　　国
'中　　邮件：[e-mail] MSN                            国
'中　　更新日期：2008年6月14日（搜捕者）                         国
'中　　版权：源代码公开，允许自行修改，但自行修改造成的后果自负  国
'中　　使用该软件必须保留软件作者的版权声明，将该软件从原有自然  国
'中　　语言文字转换成另一自然语言文字的，仍应注明出处。          国
'中　　************************************************          国
'国国国国国国国国国国国国国国国国国国国国国国国国国国国国国国国国国
'==================================================================
Select Case Request.ServerVariables("REQUEST_METHOD")
Case "POST"
LHB_GongHao=request("LouHB_GongHao")  '接受管理员用户名
LHB_MiMa=request("LouHB_MiMa")  '接受管理员密码
If sXang_MD5_Off-1=0 Then LHB_MiMa=md5(LHB_MiMa)'MD5开关

Sub Login()
if LHB_GongHao<>"" and LHB_MiMa<>"" then
set Lours=Louconn.execute("select * from LHB_USER_DATA where LHB_GongHao='"& LHB_GongHao & "'")	 '判断是否存在该用户
if not (Lours.bof and Lours.eof) then '1
If Lours("LHB_MiMa")=LHB_MiMa Then '0
session("LHB_YongHuID")=Lours("LHB_YongHuID")
session("LHB_GongHao")=Lours("LHB_GongHao")
session("LHB_XingMing")=Lours("LHB_XingMing")	
session("LHB_Group")=Lours("LHB_Group")
session("LHB_KeShiBM")=Lours("LHB_KeShiBM")
Response.Redirect("../index/index.asp")
Else '0
Cuo=1
End if '0
Else '1
Cuo=2
End if '1
End if
End Sub

If sXang_YanZhengM_Off = 1 Then
If Request("LouHB_YanZhengM") = Session("L_YanZhengM") Then '3
Call Login()
Else '3
Cuo=3
End If '3
ElseIf sXang_YanZhengM_Off = 0 Then
Call Login()
End If

End Select
%>
<!--#include file="../inc/LHB_YanZhengM.asp"-->
<!--#include file="../inc/LHB_head.asp"-->
<center>
<br><br><br><br>
<table border="0" cellpadding="0" cellspacing="0" width="391">
<form action="login.asp" method="post" name="form2" id="form2">
<tr>
<td><img src="../pic/spacer.gif" width="21" height="1" border="0" alt="" /></td>
<td><img src="../pic/spacer.gif" width="351" height="1" border="0" alt="" /></td>
<td><img src="../pic/spacer.gif" width="19" height="1" border="0" alt="" /></td>
<td><img src="../pic/spacer.gif" width="1" height="1" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="3"><img name="n_r1_c1" src="../pic/sXang_login.gif" width="391" height="224" border="0" id="n_r1_c1" alt="" /></td>
<td><img src="../pic/spacer.gif" width="1" height="224" border="0" alt="" /></td>
</tr>
<tr>
<td rowspan="2"><img name="n_r2_c1" src="../pic/sXang_r2_c1.gif" width="21" height="173" border="0" id="n_r2_c1" alt="" /></td>
<td bgcolor="#FFFFFF"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="29%">&nbsp;</td>
<td width="71%">
<%
if Cuo=1 then 
Response.Write "<p class=p2>密码错误！</p>"
elseif Cuo=2 then
Response.Write "<p class=p2>登录失败！</p>"
elseif Cuo=3 then
Response.Write "<p class=p2>验证码错误！</p>"
end if
%>
</td>
</tr>
<tr>
<td align="right">工  号：</td>
<td><input name="LouHB_GongHao" type="text" class="button1" size="20" autocomplete="off" maxlength="20" <%If sXang_Login_USERPWD=1 Then Response.Write"value=""admin"""%> onFocus="this.select()" onMouseOver="this.focus();"></td>
</tr>
<tr>
<td align="right">密  码：</td>
<td><input name="LouHB_MiMa" type="password" class="button1" size="21" maxlength="20" <%If sXang_Login_USERPWD=1 Then Response.Write"value=""admin"""%> onFocus="this.select()" onMouseOver="this.focus();"></td>
</tr>
<%If sXang_YanZhengM_Off = 1 Then%>
<tr>
<td align="right">验证码：</td>
<td><input name="LouHB_YanZhengM" type="text" class="button1" size="6" autocomplete="off" maxlength="20" onFocus="this.select()" onMouseOver="this.focus();"><Font Color="Red"><%=gen_key(4)%></Font></td>
</tr>
<%End If%>
<tr>
<td height="35">&nbsp;</td>
<td>&nbsp;&nbsp;&nbsp;&nbsp;<input type="image" name="Reg2" value="登录" src="../pic/dl.gif"></td>
</tr>
</table></td>
<td rowspan="2"><img name="n_r2_c3" src="../pic/sXang_r2_c3.gif" width="19" height="173" border="0" id="n_r2_c3" alt="" /></td>
<td><img src="../pic/spacer.gif" width="1" height="143" border="0" alt="" /></td>
</tr>
<tr>
<td><img name="n_r3_c2" src="../pic/sXang_r3_c2.gif" width="351" height="30" border="0" id="n_r3_c2" alt="" /></td>
<td><img src="../pic/spacer.gif" width="1" height="30" border="0" alt="" /></td>
</tr>
</form>
</table>
</center>