admin_checklogin.asp

源代码竟供大家参考

<!--
=========================================================
超e工作室(http://www.chaoe.com)
用专业的心，做专业的事。。。
==========================================================
本系统是超e工作室专门为黑龙江广厦学院开发的高考录取程序，没有参照任何脚本,盗用必追究其法律责任。
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++
作者：徐佳
QQ：95973
邮件：[e-mail]
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-->
<!--#include file="conn.asp"-->
<%
    adminuser=request.form("adminuser")
    adminpassword=request.form("adminpassword")
	sql="select * from admin where adminuser='"&adminuser&"' and adminpassword='"&adminpassword&"'"
	set rs=conn.execute(sql)
	if rs.eof or rs.bof then
	  response.write "<script language=javascript>"
	   response.write "alert('用户或密码不对，请查实！');"
	   response.write "javascript:history.go(-1);"
	   response.write "</script>"
	   response.end
	else
    session("adminuser")=adminuser
	%>
	<script language="JavaScript">
window.location.href="main.asp"
-->
</script>
	<%

 end if
%><%closeconn%>