一套简单的OA系统

				
				
				
				
				
								oabusyname=request.cookies("oabusyname")     
				oabusyusername=request.cookies("oabusyusername")     
				oabusyuserdept=request.cookies("oabusyuserdept")     
				oabusyuserlevel=request.cookies("oabusyuserlevel")     
				if oabusyusername="" then 
					response.write("")
					response.write("window.top.location.href='default.asp';")
					response.write("")
					response.end
				end if
				%>
				
				
				
				
				企业办公自动化IE37-OA系统
				
				
				window.parent("main").location.href="userinf.asp";
				scores = new Array(20);
				var numTotal=0;
				NS4 = (document.layers) ? 1 : 0;
				IE4 = (document.all) ? 1 : 0;
				ver4 = (NS4 || IE4) ? 1 : 0;
				
				if (ver4) {    with (document) {        write("");        if (NS4) {            write(".parent {position:absolute; visibility:visible}");            write(".child {position:absolute; visibility:visible}");            write(".regular {position:absolute; visibility:visible}")        }        else {            write(".child {display:none}")        }        write("");    }}
				
				
				
				function getIndex(el) {    ind = null;    for (i=0; i				
				
				function arrange() {    nextY = document.layers[firstInd].pageY +document.layers[firstInd].document.height;    for (i=firstInd+1; i				
				
				function expandIt(el) {	if (!ver4) return;    if (IE4) {        whichEl1 = eval(el + "Child");		for(i=1;i				
				
				
				onload = initIt;
				
				
				
				 
				 
				  IE37办公导航
				 
				
				
				
				
				  系统设置管理
				
				
				
				
				   
				numTotal=3;scores[1]='KB2';scores[2]='KB1';scores[3]='KB3';
				   
				
				  
				    
								'打开数据库，读出权限
				set conn=opendb("oabusy","conn","accessdsn")
				set rs=server.createobject("adodb.recordset")
				sql="select * from userinf where username='" & oabusyusername&"'"
				rs.open sql,conn,1
				cook_allow_see_all_workrep=rs("allow_see_all_workrep")
				cook_allow_see_dept_workrep=rs("allow_see_dept_workrep")     
				cook_allow_control_dept_user=rs("allow_control_dept_user")     
				cook_allow_control_all_user=rs("allow_control_all_user")     
				cook_allow_send_note=rs("allow_send_note")     
				cook_allow_control_note=rs("allow_control_note")     
				cook_allow_control_file=rs("allow_control_file")     
				cook_allow_control_level=rs("allow_control_level")
				cook_allow_repairsystem=rs("allow_repair_system")
				conn.close
				set conn=nothing
				set rs=nothing
				%>     
				     
				     
				     
				用户帐号设置     
				     
				     
				         
								if cook_allow_control_dept_user="yes" then     
				%>     
				增加下属用户      
				管理下属用户     
								end if     
				if cook_allow_control_all_user="yes" then     
				%>     
				增加用户       
				管理用户
								end if     
				%>     
				个人资料维护       
				     
				     
								if cook_allow_control_level="yes" then
				%>       
				     
				     
				用户权限设置     
				     
				     
				     
				 
				用户管理权限     
				工作计划权限     
				通告管理权限     
				公文管理权限     
				基本档案权限     
				职务变动权限     
				奖惩编辑权限     
				考核编辑权限     
				工资编辑权限     
				通讯资料权限     
				资源管理权限
				考勤管理权限
				办公用品权限
				法规管理权限
				帮助管理权限
				系统维护权限   
				 
								end if
				%> 
				
				     
				     
				系统维护设置     
				     
				     
				
				单位名称维护