一套简单实用的公文传输系统。可用于学校、事业单位公文流转使用。

源代码在线查看: admin.asp

软件大小: 37 K
上传用户: laosoler
关键词: 简单实用 传输系统 单位
下载地址: 免注册下载 普通下载 VIP

相关代码

				
								if session("loginstatus")"islogined" or session("grade")3 then
					response.redirect "index.asp?ntime="&ntime
					response.end
				end if
				%>
				
								username=trim(request.querystring("username"))
				act=request.querystring("act")
				isdel=(request.querystring("isdel"))
				if act"deluser" or username="" then
				%>
				
				
				--用户管理
				
				
								BODY{background:#ffffff url(fsoimg/bgbrick.gif);color:#770011;text-decoration: none;margin-top:30px}
				A{COLOR:#3333ff;text-decoration:none}
				A:hover{COLOR:#ff3333;text-decoration:underline}
				form{padding:0;margin:0}
				table{font-size:12px;width:250px;}
				td{padding:0 0 0 12px;line-height:17px;}
				.mybutton{font-size:12px; height:21px; width:60px; color: #E0E0E0; background-color: #006898; border: 2 solid #3399FF}
				.rdborder{border:solid #000080;border-width:1px 0 0 1px;padding:0}
				.rdborder td{border:solid #000080;border-width:0 1px 1px 0;margin:0;}
				.rowbg1 td{background:#eee3ee;}
				.rowbg2 td{background:#eeeedd;}
				.rowbg3 td{background:#f3f3ee;}
				//-->
				
				
				
				
					
						--用户管理
					
				
				
				
				
				用户及权限:
				
									sql="select * from userinfo order by username asc"
					set rs=conn.execute(sql)
					do while not (rs.eof or err)
						response.write ""&rs("username")&" ("
					if rs("grade")=3 then
						response.write "/"
					else
						response.write rs("pathaccess")
					end if
					response.write ")"&chr(13)
					rs.movenext
					loop
					set rs=nothing
					conn.close
					set conn=nothing
				%>
				
				
				
				
				      
				
				
				
				
					
						关闭本窗口
					
				
				
				
								elseif session("loginname")=username then
					conn.close
					set conn=nothing
				%>
				
								alert("对不起,不能删除自己!");
				window.history.go(-1);
				//-->
				
								elseif isdel"true" then
					conn.close
					set conn=nothing
				%>
				
								var question = window.confirm("你真的要删除用户“”吗?")
				if (question) 
					window.location.href="?act=deluser&username=&isdel=true&ntime=";
				else
					window.location.href="?ntime=";
				//-->
				
								else
					sql="delete from userinfo where username='"&username&"'"
					conn.execute(sql)
					conn.close
					set conn=nothing
					response.redirect selfname&"?ntime="&ntime
				end if
				%>
							

相关资源