<%
	dim writenote
	set rs_company=createobject("adodb.recordset")
	sql_company="select * from school where sname='" &Request.Cookies("admin_school_name")& "'"
	rs_company.open sql_company,Conn
	if not rs_company.eof then
		grade=rs("grade")		'会员是否被置顶 0 不置顶，1置顶
		begintime=rs_company("begintime")	'会员期开始时间
		endtime=rs_company("endtime")	'会员期结束时间
		shenhe=rs_company("zhuangtai")	'会员是否被审核
	end if
	begint=datediff("d",now(),begintime)	'会员期开始时间与当前时间的差值
	endt=datediff("d",now(),endtime)	'会员期结束时间与当前时间的差值
	rs_company.close
	set rs_company=nothing
	if begint>0 and endt>0 then writenote="您的会员期还没有开始，请稍等"
	if endt<0 then writenote="您是普通院校用户，如果您想享受更多的服务，请升级充值"
	if begint<=0 and endt>=0 then action="ture"
	if endt>=0 then usertype=1			'为1时为高级会员
%>