check.asp

来自「一套完整的学生课程管理系统」· ASP 代码 · 共 29 行

<!-- #include file="const.asp" -->

<%
	'****************************************
	'目的：			检查学生是否成功登陆
	'开始时间：		2005-5-31
	'最后修改时间：	2005-5-31
	'编写人：		某某某
	'****************************************
	
	if(Session("userID") = "" or Session("userType") <> "student") then
		Alert("对不起，您的登陆信息有误或者超时，请登陆后进入系统！")
		Go("../index.htm")
		Response.end
	end if
	
	'***************************************
	'目的：依据参数判断用户是否能访问该页面
	'参数：needFlag需要的等级
	'***************************************
	Sub CheckFlag(needFlag)
		if(Cint(Session("userCheck"))<> needFlag) then
			Alert("您未通过审核，不能进行这项操作！")
			GoBack()
			Response.End
		end if
	end sub
	
%>