checkuser.asp

搭建智元软件公文传输系统运行环境(搭建智元软件公文传输系统运行环境转载)

<%

    oabusyname = Request.Cookies("oabusyname")            
    oabusyusername = Request.Cookies("oabusyusername")  
    oabusyuserdept = Request.Cookies("oabusyuserdept")    
    oabusyuserlevel = Request.Cookies("oabusyuserlevel")  
    oabusyuserid = Request.Cookies("oabusyuserid")
    oabusyuserpower = Request.Cookies("oabusyuserpower")

    oabusyuserurl = Request.Cookies("url")                 
    oabusyuserpath = Request.Cookies("path")              
    oabusyuserfileword = Request.Cookies("fileword")     
    oabusyusermeetword = Request.Cookies("meetword")     
    oabusyuserdataword = Request.Cookies("dataword")      
    oabusyuserhomename = Request.Cookies("homename")     
    oabusyuserpagecount = Request.Cookies("pagecount")

    If oabusyusername = "" Then
        Response.Write ("<script language=""javascript"">")
        Response.Write ("window.top.location.href='default.asp';")
        Response.Write ("</script>")
        Response.End
    End If

%>