check_user.asp

20041230162250801409： 浙江省丽水市公铁联运有限公司OA系统（物流） 开发语言：PHP/ASP/PERL 本系统包括各个部门的管理

<!--#include file="../function.asp"-->
<style type="text/css">
<!--
body {
	background-color: #006666;
}
-->
</style>
<p>&nbsp;</p>
<p>&nbsp;</p>
<table width="200" border="0" align="center">
  <tr>
    <td></td>
  </tr>
</table>

<% 
response.buffer=true
Response.Expires=0
%>
<!--#include file="conn.asp"-->
<a href="login.asp">
<%
Set rs = Server.CreateObject("ADODB.Recordset")
username=HtmlEncode(request.form("username")) '??è?±íμ￥μ?ó??§???μ
pwd=HtmlEncode(request.form("pwd")) '??è?±íμ￥μ??ü???μ

sql="select * from huoyun_admin where username='"&username&"' and pwd='"&pwd&"'"
rs.open sql,conn,3,3

if rs.eof then  '′óêy?Y?a?D??DD?D??ó??§??oí?ü??ê?·??yè·
response.write"<script>alert('your enter information is wrong.please try again!');top.location.href='login.asp';</script>"
'response.write"<center><a href=vbscript:history.back()>??D?μ???</a></center>"
response.end
else
'response.cookies("name")=true 'è?1??yè·￡??ò??è????¨ò3??
'response.redirect"index1.asp"
session("pwd")="pass" '??è??ü??μ??μ￡?·???pass,ó?óúindex1.aspò3???D??
conn.execute(sql)
end if
response.Redirect"index.asp"
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</a>