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

📄 departdetail.asp

📁 一个VB的p2p聊天系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
	modify();
	frmDepart.txtOperate.value=3;
	frmDepart.submit();
}

function modify(){
	frmDepart.txtDName.disabled=false;
	frmDepart.txtDManager.disabled=false;
	frmDepart.taDIntro.disabled=false;
	frmDepart.btnNew.disabled=true;
	frmDepart.btnModify.disabled=true;
	frmDepart.btnDelete.disabled=true;
	frmDepart.btnSave.disabled=false;
	frmDepart.btnCancel.disabled=false;
	newTr.style.display='none';
}
</script>
</head>
<body background="images\bg.gif" class="detail2" style="CURSOR:AUTO">
<table width="500" border="0" cellpadding="0" cellspacing="0">
	<tr><td width="160" valign="top">
		<table width="150" height="10" border="0" cellpadding="0" cellspacing="0" class="title3">
		  <tr> 
			<td width="42" height="24"><a class=Parent id=1  style="CURSOR: hand" onClick="ExpandCollapse(1)"><img id=image1 height=22 
					src="./images/Ftv2mNode.gif" width=16 border=0 isopen="0"></a><img 
					class=classlogo id=folder1 height=22 src="./images/ftv2folderclosed.gif" width=24 border=0 clid="1"></td>
			<td width="158"><a class=bold id=1  style="CURSOR: hand" onClick="DoClick1('1')" target=""><span 
				  id=folder1d onMouseOver="this.className='red1'" onMouseOut="this.className=''">本公司</span></a>
		</td>
		  </tr>
		 <tr> 
			<td colspan="2" id="child1">
			  <table width="100%" height="20" border="0" cellpadding="0" cellspacing="0" class="title3">
		<%
			dim intCount,end1,end2,end3,intCount3
			end1=0
			end2=0
			end3=0
			intCount=1
			do while not rsDepart1.eof
			if rsDepart1.recordcount=intCount then
				end1=1
			end if
			end2=0
			end3=0
		%>
				<tr> 
				  <td width="60" height="20"><img height=22 src="./images/blank.gif" width=16 border=0><%if rsDepart1("Depart_Sub")<>0 then %><a class=Parent
				   id=1<%=rsDepart1("Depart_ID")%> style="CURSOR: hand" onClick=ExpandCollapse(1<%=rsDepart1("Depart_ID")%>)><img id=image1<%=rsDepart1("Depart_ID")%> height=22 
					src="./images/Ftv2mNode.gif" width=16 border=0 isopen="0"></a><% else  if  end1=1 then
					%><img src="images/ftv2Lastnode.gif" width=16 border=0><% else %><img src="images/ftv2node.gif" width=16 border=0><%end if
					end if %><img class=classlogo id=folder1<%=rsDepart1("Depart_ID")%> height=22 
					src="./images/ftv2folderclosed.gif" width=24 border=0 clid="1<%=rsDepart1("Depart_ID")%>"></td>
				  <td width="110"><a class=bold id=1<%=rsDepart1("Depart_ID")%> style="CURSOR: hand" onClick="DoClick1('1<%=rsDepart1("Depart_ID")%>')" target="">
				  <span id=folder1<%=rsDepart1("Depart_ID")%>d onMouseOver="this.className='red1'" onMouseOut="this.className=''"><%=rsDepart1("Depart_Name")%></span></a></td>
				</tr>
			<%
				if rsDepart1("Depart_Sub")<>0 then
			%>
				<tr> 
				  <td colspan="2" id="child1<%=rsDepart1("Depart_ID")%>">
				  <table width="100%" height="20" border="0" cellpadding="0" cellspacing="0" class="title2">
				<%
					rsDepart2.movefirst
					do while not rsDepart2.eof
						end3=0
						if rsDepart2("Depart_Super")=rsDepart1("Depart_ID") then
							rsDepart2.movenext
							if rsDepart2.eof then
								end2=1
							else if rsDepart2("Depart_Super")<>rsDepart1("Depart_ID") then
										end2=1
									end if
							end if
							rsDepart2.moveprevious
'							response.write(end1)
				%>
						<TR> 
						  <TD width="95" id=self2<%=rsDepart2("Depart_ID")%> height="20"><IMG height=22 src="./images/blank.gif" 
					width=16 border=0><% if end1=1 then %><IMG height=22 src="./images/blank.gif" 
					width=16 border=0><% else %><IMG height=22 src="./images/ftv2vertline.gif" 
					width=16 border=0><% end if
					 if rsDepart2("Depart_Sub")<>0 then %><a class=Parent id=2<%=rsDepart2("Depart_ID")%> style="CURSOR: hand" 
					onClick=ExpandCollapse(2<%=rsDepart2("Depart_ID")%>)><img id=image2<%=rsDepart2("Depart_ID")%> height=22 
					src="./images/Ftv2mNode.gif" width=16 border=0 isopen="0"></a><% else if end2=1 then%><img src="images/ftv2Lastnode.gif" width=16 border=0><% else %><img src="images/ftv2node.gif" width=16 border=0><%end if
					 end if %><IMG class=classlogo id=folder2<%=rsDepart2("Depart_ID")%> height=22 
					src="./images/ftv2folderclosed.gif" width=24 border=0 
				  clid="2<%=rsDepart2("Depart_ID")%>"></TD>
						  <TD width="75" noWrap style="CURSOR: hand"><A class=bold id=2<%=rsDepart2("Depart_ID")%> 
					style="CURSOR:hand" onclick="DoClick1('2<%=rsDepart2("Depart_ID")%>')"><SPAN 
					id=folder2<%=rsDepart2("Depart_ID")%>d onMouseOver="this.className='red1'" onMouseOut="this.className=''"><%=rsDepart2("Depart_Name")%></SPAN></A></TD>
						</TR>
				<%
							if rsDepart2("Depart_Sub")<>0 then
				%>
						<tr><td colspan="2" id="child2<%=rsDepart2("Depart_ID")%>">
							<TABLE width="100%" height="20" cellSpacing=0 cellPadding=0 border=0 class="title1">
						<%
							rsDepart3.movefirst
							dim total
							total=0
							do while not rsDepart3.eof
								if rsDepart3("Depart_Super")=rsDepart2("Depart_ID") then
									total=total+1
								end if
								rsDepart3.movenext
							loop
							intCount3=1
							rsDepart3.movefirst
							do while not rsDepart3.eof 
								if rsDepart3("Depart_Super")=rsDepart2("Depart_ID") then
						%>
								<tr><td width="90" height="22"><IMG height=22 src="./images/blank.gif" 
					width=16 border=0><%if end1=1 then%><IMG height=22 src="./images/blank.gif" 
					width=16 border=0><%else%><IMG height=22 src="./images/ftv2vertline.gif" 
					width=16 border=0><%end if
					 if end2=1 then%><IMG height=22 src="./images/blank.gif" 
					width=16 border=0><% else %><IMG height=22 src="./images/ftv2vertline.gif" 
					width=16 border=0><% end if 
					if total=intCount3 then%><img src="images/ftv2Lastnode.gif" width=16 border=0><% else %><img src="images/ftv2node.gif" width=16 border=0><% end if %><img 
					class=classlogo id=folder3<%=rsDepart3("Depart_ID")%> height=22 
					src="./images/ftv2folderclosed.gif" width=24 border=0 clid="3<%=rsDepart3("Depart_ID")%>"></td>
					<td width="80"><A class=bold id=3<%=rsDepart3("Depart_ID")%> style="CURSOR:hand"
					onclick="DoClick1('3<%=rsDepart3("Depart_ID")%>')"><SPAN 
					id=folder3<%=rsDepart3("Depart_ID")%>d onMouseOver="this.className='red1'" onMouseOut="this.className=''"><%=rsDepart3("Depart_Name")%></SPAN></A></td></tr>
						<%
									intCount3=intCount3+1
								end if
								rsDepart3.movenext
							loop
						%>
							</table>
						</td></tr>
				<%
							end if
						end if
						rsDepart2.movenext
					loop
				%>
					</TABLE></td>
				</tr>
		<%
				end if
				rsDepart1.movenext
				intCount=intCount+1
			loop
		%>
			  </table></td>
		  </tr>
		</table>
	</td><td width="340" valign="top">
		<table width="100%" height="380" cellpadding="0" cellspacing="5" border="0">
		  <tr><td valign="top" style="BORDER-RIGHT: 1px outset; BORDER-TOP: 1px outset; BORDER-LEFT: 1px outset; BORDER-BOTTOM: 1px outset">
			<table width="100%" cellpadding="0" cellspacing="0" border="0">
			<form id="frmDepart" name="frmDepart" action="DepartDetail.asp" method="post">
			  <tr><td valign="top"><table width="100%" cellpadding="5" cellspacing="0"><tr>
			  <td width="20%" bgcolor="#66CCCC" height="35" align="center"><input type="button" style="width:50px;height:22px" id="btnNew" onClick="NewDepart();" value="新建"></td>
			  <td width="20%" bgcolor="#66CCCC" height="35" align="center"><input type="button" style="width:50px;height:22px" id="btnModify" onClick="ModifyDepart();" value="修改"></td>
			  <td width="20%" bgcolor="#66CCCC" height="35" align="center"><input type="button" style="width:50px;height:22px" id="btnDelete" onClick="DeleteDepart();" value="删除"></td>
			  <td width="20%" bgcolor="#66CCCC" height="35" align="center"><input type="submit" style="width:50px;height:22px" id="btnSave" onClick="SaveDepart(); return false" value="保存"></td>
			  <td width="20%" bgcolor="#66CCCC" height="35" align="center"><input type="button" style="width:50px;height:22px" id="btnCancel" onClick="CancelDepart();" value="取消"></td>
			  </tr>
			  <tr><td colspan="5" bgcolor="#00CCFF" class="title3"><label title="部门基本信息">部门基本信息:</label></td></tr>
			  <tr><td colspan="5" valign="top">
			  	<table border="0" cellspacing="5" cellpadding="0" width="100%" class="title2">
				<tr id="newTr"><td align="right">上级部门:</td><td><input type="text" id="txtDSuper" name="txtDSuper" width="100"><input type="text" id="txtDSuperID" name="txtDSuperID" style="width:20px;visibility:hidden"></td></tr>
				<tr><td align="right" width="70">部门编号:</td><td><input type="text" id="txtDID" name="txtDID" width="50" disabled>
				<input type="text" id="txtDepart" name="txtDepart" style="width:20px;visibility:hidden">
				<input type="text" id="txtOperate" name="txtOperate" style="width:20px;visibility:hidden"></td></tr>
				<tr><td align="right">部门名称:</td><td><input type="text" id="txtDName" name="txtDName" width="100"></td></tr>
				<tr><td align="right">部门经理:</td><td><input type="text" id="txtDManager" name="txtDManager" width="100"></td></tr>
				<tr><td align="right">部门简介:</td><td rowspan="2"><textarea id="taDIntro" name="taDIntro" cols="40" rows="10"></textarea></td></tr>
				<tr><td></td></tr>
				</table>
			  </td></tr>
			  </table></td></tr>
			</form>
			</table></td></tr></table>
	</td></tr>
</table>
</body>
<script language="JavaScript">
	DoClick('<%=DepartID%>');
init();
function init(){
	frmDepart.txtDName.disabled=true;
	frmDepart.txtDManager.disabled=true;
	frmDepart.txtDepart.value=<%=DepartID%>;
	frmDepart.taDIntro.disabled=true;
<%
if level=3 then
	response.write(chr(13)&"frmDepart.btnNew.disabled=true;")
else
	response.write(chr(13)&"frmDepart.btnNew.disabled=false;")
end if
%>
	if(frmDepart.txtDepart.value=='1'){
		frmDepart.btnModify.disabled=true;
		frmDepart.btnDelete.disabled=true;
	}else{
		frmDepart.btnModify.disabled=false;
		frmDepart.btnDelete.disabled=false;
	}
	frmDepart.btnSave.disabled=true;
	frmDepart.btnCancel.disabled=true;
//	frmDepart.txtLevel.value=;
	newTr.style.display='none';
<%
	if DID<>"" then
		response.write(chr(13)&"frmDepart.txtDID.value='"&rsDepartDetail("Depart_ID")&"';")
		response.write(chr(13)&"frmDepart.txtDName.value='"&rsDepartDetail("Depart_Name")&"';")
		response.write(chr(13)&"frmDepart.txtDManager.value='"&rsDepartDetail("Depart_Manager")&"';")
		response.write(chr(13)&"frmDepart.taDIntro.value='"&rsDepartDetail("Depart_Intro")&"';")
	else
		response.write(chr(13)&"frmDepart.txtDID.value='';")
		response.write(chr(13)&"frmDepart.txtDName.value='';")
		response.write(chr(13)&"frmDepart.txtDManager.value='';")
		response.write(chr(13)&"frmDepart.taDIntro.value='';")
	end if
%>
}
</script>
</html>

⌨️ 快捷键说明

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