📄 dir_tree.asp
字号:
tbl_obj1.cellPadding="0";
tbl_obj.insertAdjacentElement("afterEnd",tbl_obj1);
//建立本节点TBody
tbody_obj=document.createElement("tbody");
tbody_obj.id="tbody"+ownerId
tbl_obj1.appendChild(tbody_obj);
//建立本节点TR
tr_obj=document.createElement("TR");
tbody_obj.appendChild(tr_obj);
//建立本节点TD
td_obj=document.createElement("td");
td_obj.align="left";
td_obj.vAlign="bottom"
tr_obj.appendChild(td_obj);
//插入图片
if (foldersNode.length>=4)
leftSide(foldersNode,td_obj);
imgNode_obj=document.createElement("img");
if (finalSign) //判断是否最后节点
{
imgNode_obj.src="../images/lastnode.gif";
}
else
{
imgNode_obj.src="../images/node.gif";
}
imgNode_obj.border="0";
imgNode_obj.width="16";
imgNode_obj.height="22";
td_obj.appendChild(imgNode_obj);
imgFolder_obj=document.createElement("img");
if (zt==0) //判断当前节点状态close/open
{
imgFolder_obj.src="../images/closedfolder.gif";
}
else
{
imgFolder_obj.src="../images/openfolder.gif";
}
imgFolder_obj.id="img"+foldersNode[4];
imgFolder_obj.border="0"
imgFolder_obj.width="39";
imgFolder_obj.height="22";
imgFolder_obj.style.cursor="hand";
td_obj.appendChild(imgFolder_obj);
imgFolder_obj.attachEvent("onclick",clickFun);
td_obj=document.createElement("td"); //分类名称
td_obj.vAlign="bottom";
td_obj.id="tdright"+foldersNode[4];
td_obj.innerHTML="<nobr><a style='cursor:hand' onclick='javascript:dfwh(\"" + foldersNode[4] + "\")'><font id='textid" +foldersNode[4] + "' >" + checktxt_w(foldersNode[3]) + "</a></nobr>";
tr_obj.appendChild(td_obj);
zhhId=foldersNode[4];
}
///////////////////删除节点分程序////////////////////
function delNode(foldersNode)
{var i
for(i=szcd;i<foldersNode.length;i++)
{delNode(foldersNode[i]);
}
var j
j="tbody" + foldersNode[4];
obj=document.getElementById(foldersNode[4]);
obj1=document.getElementById(j);
if (obj!=null && obj1!=null)
{obj1.deleteRow([0]);
delmain_wer(obj1);
delmain_wer(obj);
}
}
function delmain_wer(obj)
{
var length,i,j
if (obj.haschildNodes)
{
length=obj.childNodes.length
for(i=(length-1);i>= 0;i--)
{
delmain_wer(obj.childNodes(i))
if (obj.childNodes.length==0)
{
obj.removeNode(false) ;
}
}
}
else
{
obj.removeNode(false);
}
}
/*************** End public Part******************/
//////////////////////////////////
//新增分类
//////////////////////////////////
function addNode(sjID,foldersNode,newNode)
{
var i
if (foldersNode[4]==sjID)
{
newNode[5]=img_open1;
newNode[6]=img_close1;
//if (sjID=="0")
// {foldersNode[foldersNode.length]=foldersNode[foldersNode.length-1];
// foldersNode[foldersNode.length-2]=newNode;
// }
//else
// {foldersNode[foldersNode.length]=newNode;}
foldersNode[foldersNode.length]=newNode;
refreshNode(foldersNode);
}
else
{for(i=szcd;i<foldersNode.length;i++)
{addNode(sjID,foldersNode[i],newNode);
}
}
}
////////////修改分类信息////////////////
function editNode(id,foldersNode,temp)
{ var i;
var fontcolor="";
if (foldersNode[4]==id)
{
foldersNode[3]=temp;
var obj=document.getElementById("tdright"+id)
if (obj!=null)
{
if (foldersNode[4]==pubId)
{ fontcolor=" color='white' ";}
obj.innerHTML="<nobr><a style='cursor:hand' onclick='javascript:dfwh(\"" + foldersNode[4] + "\")'><font id='textid" +foldersNode[4] + "'" + fontcolor + ">" + checktxt_w(foldersNode[3]) + "</a></nobr>";
obj=null;
}
}
else
{for(i=szcd;i<foldersNode.length;i++)
{editNode(id,foldersNode[i],temp);
}
}
}
function changefocus(flag)
{var obj=document.getElementById("textid" + pubId);
if (obj!=null)
{ obj.color="";
obj=null;
}
obj=document.getElementById("tdright"+pubId);
if(obj!=null)
{ obj.style.backgroundColor="";
obj=null;
}
obj=document.getElementById("tdright" + flag);
if (obj!=null)
{obj.focus();
obj.style.backgroundColor="000080";
pubId=flag;
}
obj=null
obj=document.getElementById("textid" + flag);
if (obj!=null)
{
obj.color="white";
pubId=flag;
}
}
//删除分类信息
function removeNode(foldersNode,id)
{
var i
var folder_temp
for(i=szcd;i<foldersNode.length;i++)
{
folder_temp=foldersNode[i];
if (folder_temp[4]==id)
{reIndex(foldersNode,i,id)
}
else
{removeNode(foldersNode[i],id);
}
}
}
function reIndex(foldersNode,i,id)
{ var j;
delNode(foldersNode[i]);
for (j=i;j<foldersNode.length-1;j++)
{foldersNode[j]=foldersNode[j+1];}
foldersNode.length=foldersNode.length-1;
refreshNode(foldersNode);
}
function refreshNode_del(foldersNode)
{ var i
delNode(foldersNode);
for(i=szcd;i<foldersNode.length;i++)
{
refreshNode_del(foldersNode[i]);
}
}
function refreshNode(foldersNode)
{var i
for(i=szcd;i<foldersNode.length;i++)
{
refreshNode_del(foldersNode[i]);}
if (foldersNode[0]==0)
{foldersNode[0]=1;
openBranch(foldersNode[4],foldersTree);
}
else
{foldersNode[0]=0;
openBranch(foldersNode[4],foldersTree);
}
}
////////////////////////////////////////////////////
</script>
<body class=tdbottom>
<img src="../images/tree.gif" align="absmiddle"> <a href=# onclick="javascript:div_tree.style.display=''; div_search.style.display='none'; return false;">目录列表</a>
<img src="../images/search.gif" align="absmiddle"> <a href=# onclick="javascript:div_search.style.display=''; div_tree.style.display='none'; return false;">档案查询</a>
<hr>
<div id="div_tree">
<table id="0" border="0" cellspacing=0 cellpadding=0 >
<tbody id="tbody0">
<tr>
<td valign="middle"><img src="../images/closedfolder.gif" id="img0" width="39" style="cursor:hand" height="22" border="0" onclick="javascript:openBranch('0',foldersTree)"></td>
<td valign="bottom" id="tdright0"><nobr><a style="cursor:hand;" onclick="javascript:dfwh('0')" ><font id="textid0" >文档分类目录</font></a></nobr></td>
</tr>
</tbody>
</table>
<script language="javascript">
function doSearchNode(id,foldersNode)
{ var i
if(id==foldersNode[4])
{
pubfolder=folderNode(foldersNode[3],foldersNode[4],foldersNode[7],foldersNode[5],foldersNode[6]);
}
else
{
for(i=szcd;i<foldersNode.length;i++)
{
doSearchNode(id,foldersNode[i]);
}
}
}
function dfwh(flag)
{
doSearchNode(flag,foldersTree);
var obj
if (pubId!=null)
{obj=document.getElementById("tdright" + pubId);
if (obj!=null)
{obj.style.backgroundColor="";
}
obj=null
obj=document.getElementById("textid" + pubId);
if (obj!=null)
{obj.color="";
}
obj=null
}
obj=document.getElementById("tdright" + flag);
if (obj!=null)
{obj.focus();
obj.style.backgroundColor="000080";
}
obj=null
obj=document.getElementById("textid" + flag);
if (obj!=null)
{
obj.color="white";
pubId=flag;
}
parent.middle.location=pubfolder[7];
}
</script>
<script language="javascript">
initializeTree();
</script>
</div>
<div id="div_search" style="display:none">
<table align="center" class="InputFrameMain"><tr><td><table border=0 cellspacing='1' cellpadding='0' width=100% align=center>
<form name="frmxx" id="frmxx" action="dir_searched.asp" method="get" target="middle">
<tr>
<td><nobr>类别目录： <input type="checkbox" name="FLH_Mod" value="1">搜索子目录</nobr><br>
<select style="width:170" id="FLH" name="FLH">
<option value="" selected>全部</option>
<%=pOptions2("tbioaDocument_Sort","LMMC",0,mFLH,"","SJFLH")%>
</select>
</td>
</tr>
<!--tr>
<td><nobr>收发文：</nobr><br>
<select style="width:170" name="DocMod" id="DocMod">
<option value="">全部</option>
<option value="收文">收文</option>
<option value="发文">发文</option>
</select>
</td>
</tr>
<tr>
<td><nobr>文号包含：</nobr><br>
<input type="text" class="input" style="width:170" name="DocFileNo" id="DocFileNo">
</td>
</tr-->
<tr>
<td><nobr>标题包含：</nobr><br>
<input type="text" class="input" style="width:170" name="Subject" id="Subject">
</td>
</tr>
<!--tr>
<td><nobr>报表类别：</nobr><br>
<select style="width:170" name="DC_Doc_Sort" id="DC_Doc_Sort">
<option value="">全部</option>
<%
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open "select * from tbioaOffice_Document_Sort order by id",oConn,1,1
do while not rs.eof
%>
<option value="<%=rs("id")%>"><%=server.HTMLEncode(rs("doc_sort") & "")%></option>
<%
rs.movenext
loop
rs.close
%>
</select>
</td>
</tr>
<tr>
<td><nobr>报表密级：</nobr><br>
<select style="width:170" name="DC_Doc_Security" id="DC_Doc_Security">
<option value="">全部</option>
<option value='普通'>普通</option>
<option value='秘密'>秘密</option>
<option value='机密'>机密</option>
<option value='绝密'>绝密</option>
</select>
</td>
</tr-->
<tr>
<td><nobr>归档日期：</nobr><br>
从 <input TYPE="TEXT" style="width:130" MAXLENGTH="12" NAME="File_Date" class="input" readonly> <a href=# title="选择日期" onClick="fPopUpDlg('../js/calendar.htm', document.frmxx.File_Date, 'winpop', 234, 261);return false"><img src="../images/datetime.gif" border=0></a>
到 <input TYPE="TEXT" style="width:130" MAXLENGTH="12" NAME="File_Date_end" class="input" readonly> <a href=# title="选择日期" onClick="fPopUpDlg('../js/calendar.htm', document.frmxx.File_Date_end, 'winpop', 234, 261);return false"><img src="../images/datetime.gif" border=0></a>
</td>
</tr>
<tr>
<td><nobr>保存日期：</nobr><br>
从 <input TYPE="TEXT" style="width:130" MAXLENGTH="12" NAME="File_Save" class="input" readonly> <a href=# title="选择日期" onClick="fPopUpDlg('../js/calendar.htm', document.frmxx.File_Save, 'winpop', 234, 261);return false"><img src="../images/datetime.gif" border=0></a>
到 <input TYPE="TEXT" style="width:130" MAXLENGTH="12" NAME="File_Save_end" class="input" readonly> <a href=# title="选择日期" onClick="fPopUpDlg('../js/calendar.htm', document.frmxx.File_Save_end, 'winpop', 234, 261);return false"><img src="../images/datetime.gif" border=0></a>
</td>
</tr>
<tr>
<td align="middle" colspan="2"><br>
<input type="submit" class="button0" onmouseout=className="button0" onmouseover=className="button1" value=开始查询 name="bQD" id="bQD">
</td>
</tr>
</form>
</table></td></tr></table>
</div>
</body>
</HTML>
<%
oConn.close
set oConn=nothing
%>
<%
Function pOptions2(TableName,Field,ParentID,Selected,Heads,ParentField)
'递归下拉菜单(表名,字段名,选中字段ID,起始字段ID,分割头,存放上级栏目ID的字段名)-----
set rs_department=Server.CreateObject("ADODB.RecordSet")
sql="select * from "& TableName &" where "&ParentField&" = '"& ParentID &"' order by FLH"
rs_department.open sql,oConn,1,1
while not rs_department.EOF '循环
if Selected="" then Selected="0"
if rs_department("FLH")= Selected then
response.write "<option value='"&rs_department("FLH")&"' selected>"& Heads & rs_department(Field)&"</option>" & vbcrlf
else
response.write "<option value='"&rs_department("FLH")&"'>"& Heads & rs_department(Field)&"</option>" & vbcrlf
end if
Call pOptions2(TableName,Field,rs_department("FLH"),Selected,Heads&"·",ParentField)
rs_department.MoveNext: wend
rs_department.close
End Function
%> ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -