<!--#include file="Admin_IsLogin.asp" -->
<%
          'if Cookies
		  UserCookies = Request.Form("selUserCookies")
          if isnull(UserCookies) or UserCookies="" then UserCookies="0"
          select case usercookies
          case "0"
         	Response.Cookies("wzvtc")("UserCookies") = UserCookies
          case 1
          	Response.Cookies("wzvtc").Expires=Date+1
	        Response.Cookies("wzvtc")("UserCookies") = UserCookies
          case 2
  	        Response.Cookies("wzvtc").Expires=Date+31
	        Response.Cookies("wzvtc")("UserCookies") = UserCookies
          case 3
	        Response.Cookies("wzvtc").Expires=Date+365
	        Response.Cookies("wzvtc")("UserCookies") = UserCookies
          end select
          'Write Cookies 
          Response.Cookies("wzvtc")("RandNumber") = "564flS23fAj883"
          Response.Cookies("wzvtc")("CurUserID") = Request.QueryString("ID")
          Response.Cookies("wzvtc")("CurUserName") = Request.QueryString("UserName")
          Response.Cookies("wzvtc")("LastLoginTime") = now
		  'call Msgbox("管理员登陆成功，您可以修改您的简历了!","../Main/ModifyResume.asp")
		  Response.Redirect("../Main/ModifyResume.asp")

%>