inc.asp

25175学生会员注册系统 build2007 0912 调试操作系统：windows2000 winxp win2003 浏览器：IE5.0 IE5.5 IE6.0 IE7.0核心浏览

<%
Sub Login_Judge()
If session("admin_id")="" Then
	If request.cookies("25175_xx")<>"" And md5(request.cookies("25175_xx")&"||25175")=request.cookies("25175_info") Then
	admin25175=Split(request.cookies("25175_xx"),"||")
		If admin25175(5)<>0 Then
			If Int(DateDiff("s",admin25175(4),Now()))>int(admin25175(5)) Then
				response.cookies("25175_xx")=""
				response.cookies("25175_info")=""
				session("admin_id")=""
				response.write"<title>"&sitename&"</title>"
			  errmsg="<li>你还没有登陆，或者登陆超时！！！<br><li><a href='login.asp'>重新登陆"&sitename&"</a>"
			  call errormsg(errmsg)
			  response.end
			Else
				session("admin_id")=admin25175(0)
			End If
		Else
			session("admin_id")=admin25175(0)
		End If
	Else
	  response.write"<title>"&sitename&"</title>"
	  errmsg="<li>你还没有登陆，或者登陆超时！！！<br><li><a href='login.asp'>重新登陆"&sitename&"</a>"
	  call errormsg(errmsg)
	  response.end
	End If
Else
	If request.cookies("25175_xx")<>"" And md5(request.cookies("25175_xx")&"||25175")=request.cookies("25175_info") Then
	admin25175=Split(request.cookies("25175_xx"),"||")
		If admin25175(5)<>0 Then
			If Int(DateDiff("s",admin25175(4),Now())) > int(admin25175(5)) Then
				response.cookies("25175_xx")=""
				response.cookies("25175_info")=""
				session("admin_id")=""
				response.write"<title>"&sitename&"</title>"
				errmsg="<li>你还没有登陆，或者登陆超时！！！<br><li><a href='login.asp'>重新登陆"&sitename&"</a>"
				call errormsg(errmsg)
				response.end
			Else
				session("admin_id")=admin25175(0)
			End If
		Else
			session("admin_id")=admin25175(0)
		End If
	ElseIf session("25175_xx")<>"" Then
	admin25175=Split(session("25175_xx"),"||")
	End If
End If
End Sub 
%>