⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 modify_position.asp

📁 办公系统
💻 ASP
字号:
<!--#include file="../includes/db.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>办公自动化系统</title>
<script language="javaScript">
function validate(){
   var TargetDeptId = document.FormModifyPosition.TargetDeptId.value;
   var TargetPositionId = document.FormModifyPosition.TargetPositionId.value;
   if (TargetDeptId==""){
      alert("请选择目标部门!");
      return false;
   }
   if (TargetPositionId==""){
      alert("请选择目标职位!");
      return false;
   }
}
</script>
<style type="text/css">
<!--
.style1 {
	color: #000000;
	font-weight: bold;
}
-->
</style>
<link href="../Includes/Style.css" rel="stylesheet" type="text/css">
</head>

<body>
<center>
<%
call insureID()
if session("User_id")<>1 then
	call noRight
end if
dim User_id
User_id=request("User_id")
if User_id="" then
	call trigErr()
end if
sql= "SELECT Users_info.*, Dept.Dept_name AS Dept_name, Dept.Dept_id AS Dept_id, " _
	&"[Position].Position_name AS Position_name " _
	&"FROM Users_info INNER JOIN Dept " _
	&"ON Users_info.Dept_id = Dept.Dept_id INNER JOIN [Position] " _
	&"ON Users_info.Position_id = [Position].Position_id " _
	&"WHERE User_id="&User_id
call openDB()
rs.open sql,conn,1,1
if rs.eof then
	call trigErr()
end if
%>
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="50">
 <tr>
  <td width="100%"></td>
 </tr>
</table>
<form name="FormModifyPosition" method="POST" action="save.asp" onSubmit="javaScript:return validate();">
<input type="hidden" value="<%=User_id%>" name="User_id">
 <table width="75%" border="0" cellpadding="0" cellspacing="1" bgcolor="#5A8BCE">
 <tr>
  <td height="35" align=left bgcolor="#E6F7FF"><div align="center" class="style1">变更员工<%=rs("Name")%>的职位</div></td>
  </tr>
</table>
<table width="75%" border="0" cellpadding="4" cellspacing="1" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF" bgcolor="#5A8BCE">
 <tr>
  <td width="26%" bgcolor="#FCFCFC">原来部门</td>
  <td width="49%" bgcolor="#FCFCFC"><%=rs("Dept_name")%></td>
 </tr>
 <tr>
  <td width="26%" bgcolor="#FCFCFC">原来职位</td>
  <td width="49%" bgcolor="#FCFCFC"><%=rs("Position_name")%></td>
 </tr>
 <%
	set rs=nothing
	set rs=Server.CreateObject("AdoDb.Recordset")
	sql="SELECT * FROM Dept"
	rs.open sql,conn,1,1
 %>
 <tr>
  <td width="26%" bgcolor="#FCFCFC">目标部门</td>
  <td width="49%" bgcolor="#FCFCFC">
  <%
	response.write"<select name=""TargetDeptId"">"
	response.write "<option value="""" selected>--请选择--</option>"
	while not rs.eof
		response.write "<option value="""&rs("Dept_id")&""" >"&rs("Dept_name")&"</option>"
		rs.MoveNext
	wend
	response.write "</select>"
  %>
  </td>
 </tr>
 <%
	set rs=nothing
	set rs=Server.CreateObject("AdoDb.Recordset")
	sql="SELECT * FROM Position"
	rs.open sql,conn,1,1
 %>
 <tr>
  <td width="26%" bgcolor="#FCFCFC">目标职位</td>
  <td width="49%" bgcolor="#FCFCFC">
  <%
	response.write"<select name=""TargetPositionId"">"
	response.write "<option value="""" selected>--请选择--</option>"
	while not rs.eof
		if rs("POSITION_ID")=1 then
			rs.MoveNext
		else
			response.write "<option value="""&rs("Position_id") _
			&""" >"&rs("Position_name")&"</option>"
			rs.MoveNext
		end if
	wend
	response.write "</select>"
	call closeDB()
  %>
  </td>
 </tr>
 <tr>
  <input type="hidden" value="ModifyPosition" name="action">
  <td width="53%" height=50 bgcolor="#EFEFEF" align=center colspan="2">
  <input type="submit" value="提 交" name="Submit" class="buttonface">
  </td>
 </tr>
</table>
</form>
</center>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -