user_err.asp

来自「汕头育新学校学籍与成绩管理平台是集学籍管理与成绩管理于一体的网络互动平台。功能强」· ASP 代码 · 共 25 行

<%
 If mdbFile = Empty Then mdbFile = "yuxin.mdb"
 If u_type = Empty Then u_type = "0"
 Passed = Session(mdbFile )
 If Passed = "Passed"  Then
 u_name = Session("u_name")
 u_password = Session("u_password")
 u_type = Session("u_type")
 u_no = Session("u_no")
 u_id = Session("u_id")
 else
   u_name =Request("u_name")
   u_password =Request("u_password")
 End If
If Passed <> "Passed"  Then
   Passed = CheckPass(u_name,u_password,mdbFile,u_type,u_no,u_id)
End If
If Passed <> "Passed" Then
%> 

 
	<script>alert('您还没有登陆！点确定返回首页登陆！');location.href('user_login.asp');</Script>
<%
End If  
%>