📄 zclist.asp
字号:
} } // --> </SCRIPT>
<STYLE type=text/css>.cMenu {
BORDER-RIGHT: #666666 2px solid; BORDER-TOP: #e4e4e4 2px solid; FONT-SIZE: 9pt; FILTER: alpha(opacity=0); VISIBILITY: hidden; BORDER-LEFT: #e4e4e4 2px solid; WIDTH: 110px; CURSOR: default; COLOR: #000000; LINE-HEIGHT: 20px; BORDER-BOTTOM: #666666 2px solid; POSITION: absolute; BACKGROUND-COLOR: #d6d3ce; FONT-: normal
}
.menuitems {
PADDING-RIGHT: 3px; PADDING-LEFT: 15px; FONT-SIZE: 9pt; PADDING-BOTTOM: 0px; MARGIN: 2px; PADDING-TOP: 0px
}
</STYLE>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR>
</head>
<body bgcolor="#FFFFFF" topmargin="0" leftmargin="0">
<div id="Layer3" style="position:absolute; left:675px; top:14px; width:102px; height:25px; z-index:3">
<input type="submit" value="打印表格" ONCLICK="self.print()">
</div>
<OBJECT id=WebBrowser height=0 width=0
classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2></OBJECT><RIGHTCLICK><!--[if IE]>
<DIV class=cMenu id=ie5menu onmouseover=highlightie5() onclick=jumptoie5()
onmouseout=lowlightie5()>
<DIV class=menuitems url="javascript:click_obj(0)">后退</DIV>
<DIV class=menuitems url="javascript:click_obj(1)">前进</DIV>
<DIV class=menuhr>
<HR style="WIDTH: 100%">
</DIV>
<DIV class=menuitems url="javascript:click_obj(2)">刷新</DIV>
<DIV class=menuitems url="javascript:click_obj(4)">查看源文件</DIV>
<DIV class=menuhr>
<HR style="WIDTH: 100%">
</DIV>
<DIV class=menuitems url="javascript:click_obj(5)">属性</DIV></DIV><![endif]-->
<SCRIPT language=JavaScript> <!-- function click_obj(id){ switch(id){ case 0: history.back() break case 1: history.forward() break case 2: window.location.reload() break case 3: window.external.AddFavorite(location.href, document.title) break case 4: window.location = "view-source:" + window.location.href break case 5: document.all.WebBrowser.ExecWB(10,1) break } } if (document.all&&window.print){ ie5menu.className="cMenu" document.oncontextmenu=showmenuie5 document.body.onclick=hidemenuie5 } //--> </SCRIPT>
</RIGHTCLICK>
<!--#include file="top.inc"-->
<% if result_num<=0 then %>
<center><BR><BR><% =word %></center>
<% else %>
<table width="598" border="0" cellspacing="2" cellpadding="0" align="center">
<tr>
<td>共搜索到<font color="#FF0000"><% =result_num %></font>条符合条件的信息</td>
<font size="2">资产完全价值<font size="3" color="red"><%=rs1(0)%></font>元；数量<font size="3" color="red"><%=rs2(0)%></font>；
</tr>
</table>
<% call LastNextPage(maxpage,page,"width=100% ","<p align=center class=font2>") %>
<table width="1800" border="0" cellspacing="1" cellpadding="0" align="center">
<tr align=center bgcolor=#97D0FB>
<td><b>固定资产名称</b></td>
<td><b>编号</b></td>
<td><b>资产类别</b></td>
<td><b>计量单位</b></td>
<td><b>数量</b></td>
<td><b>规格型号</b></td>
<td><b>技术证书号</b></td>
<td><b>原值</b></td>
<td><b>安装费</b></td>
<td><b>折旧</b></td>
<td><b>净值</b></td>
<td><b>建造单位</b></td>
<td><b>建造年月</b></td>
<td><b>出厂编号</b></td>
<td><b>交付使用日期</b></td>
<td><b>预计使用年限</b></td>
<td><b>使用部门</b></td>
<td><b>所在地</b></td>
<td><b>保管人</b></td>
<td><b>所在地</b></td>
<td><b>保管人</b></td>
<td><b>所在地</b></td>
<td><b>保管人</b></td>
<td><b>资产管理员</b></td>
<td><b>资产录入员</b></td>
<td><b>录入日期</b></td>
<td><b>使用状态</b></td>
<td><b>附属设备</b></td>
<td><b>审核</b></td>
</tr>
<% for i=1 to rs.PageSize %>
<tr bgcolor=#EEF8FD>
<td align=center><a href="zcshow.asp?id=<% =rs("id") %>"><% =HtmlOut(rs("name")) %></a></td>
<td align=center><% =HtmlOut(rs("bh")) %></td>
<td align=center><% =HtmlOut(rs("lb")) %></td>
<td align=center><% =HtmlOut(rs("jldw")) %></td>
<td align=center><% =HtmlOut(rs("sl")) %></td>
<td align=center><% =HtmlOut(rs("ggxh")) %></td>
<td align=center><% =HtmlOut(rs("jszs")) %></td>
<td align=center><% =HtmlOut(rs("wqjz")) %></td>
<td align=center><% =HtmlOut(rs("azf")) %></td>
<td align=center><% =HtmlOut(rs("zj")) %></td>
<td align=center><% =HtmlOut(rs("jz")) %></td>
<td align=center><% =HtmlOut(rs("jzdw")) %></td>
<td align=center><% =HtmlOut(rs("jzny")) %></td>
<td align=center><% =HtmlOut(rs("ccbh")) %></td>
<td align=center><% =HtmlOut(rs("syrq")) %></td>
<td align=center><% =HtmlOut(rs("synx")) %></td>
<td align=center><% =HtmlOut(rs("sydw")) %></td>
<td align=center><% =HtmlOut(rs("szd")) %></td>
<td align=center><% =HtmlOut(rs("bgr")) %></td>
<td align=center><% =HtmlOut(rs("szd1")) %></td>
<td align=center><% =HtmlOut(rs("bgr1")) %></td>
<td align=center><% =HtmlOut(rs("szd2")) %></td>
<td align=center><% =HtmlOut(rs("bgr2")) %></td>
<td align=center><% =HtmlOut(rs("zcgly")) %></td>
<td align=center><% =HtmlOut(rs("zclry")) %></td>
<td align=center><% =HtmlOut(rs("lrtime")) %></td>
<td>
<% if rs("dbf")=false and rs("bf")=false and rs("czcl")=false then %>
情况良好
<%else if rs("dbf")=true and rs("bf")=true and rs("czcl")=false then%>
<a href="#" onClick="MM_openBrWindow('bfsm1.asp?id=<%=rs("id")%>','','width=500,height=300');">已报废</a>
<%else if rs("dbf")=true and rs("bf")=true and rs("czcl")=true then%>
<a href="#" onClick="MM_openBrWindow('czclsm.asp?id=<%=rs("id")%>','','width=500,height=300');">残值处理</a>
<%else if rs("dbf")=true and rs("bf")=false and rs("czcl")=false then%>
待报废
<%end if%>
<%end if%>
<%end if%>
<%end if%>
</td>
<td>
<a href="#" onClick="MM_openBrWindow1('fslist.asp?id=<%=rs("id")%>','','width=500,height=300');">附属设备</a>
</td>
<td>
<% if rs("zcsh")=true then %>已审核<%else%>待审核<%end if%>
</td>
</tr>
<% rs.movenext
if rs.EOF then Exit For
i=i+1 %>
<tr bgcolor=#D7EFFB>
<td align=center><a href="zcshow.asp?id=<% =rs("id") %>"><% =HtmlOut(rs("name")) %></a></td>
<td align=center><% =HtmlOut(rs("bh")) %></td>
<td align=center><% =HtmlOut(rs("lb")) %></td>
<td align=center><% =HtmlOut(rs("jldw")) %></td>
<td align=center><% =HtmlOut(rs("sl")) %></td>
<td align=center><% =HtmlOut(rs("ggxh")) %></td>
<td align=center><% =HtmlOut(rs("jszs")) %></td>
<td align=center><% =HtmlOut(rs("wqjz")) %></td>
<td align=center><% =HtmlOut(rs("azf")) %></td>
<td align=center><% =HtmlOut(rs("zj")) %></td>
<td align=center><% =HtmlOut(rs("jz")) %></td>
<td align=center><% =HtmlOut(rs("jzdw")) %></td>
<td align=center><% =HtmlOut(rs("jzny")) %></td>
<td align=center><% =HtmlOut(rs("ccbh")) %></td>
<td align=center><% =HtmlOut(rs("syrq")) %></td>
<td align=center><% =HtmlOut(rs("synx")) %></td>
<td align=center><% =HtmlOut(rs("sydw")) %></td>
<td align=center><% =HtmlOut(rs("szd")) %></td>
<td align=center><% =HtmlOut(rs("bgr")) %></td>
<td align=center><% =HtmlOut(rs("szd1")) %></td>
<td align=center><% =HtmlOut(rs("bgr1")) %></td>
<td align=center><% =HtmlOut(rs("szd2")) %></td>
<td align=center><% =HtmlOut(rs("bgr2")) %></td>
<td align=center><% =HtmlOut(rs("zcgly")) %></td>
<td align=center><% =HtmlOut(rs("zclry")) %></td>
<td align=center><% =HtmlOut(rs("lrtime")) %></td>
<td>
<% if rs("dbf")=false and rs("bf")=false and rs("czcl")=false then %>
情况良好
<%else if rs("dbf")=true and rs("bf")=true and rs("czcl")=false then%>
<a href="#" onClick="MM_openBrWindow('bfsm1.asp?id=<%=rs("id")%>','','width=500,height=300');">已报废</a>
<%else if rs("dbf")=true and rs("bf")=true and rs("czcl")=true then%>
<a href="#" onClick="MM_openBrWindow('czclsm.asp?id=<%=rs("id")%>','','width=500,height=300');">残值处理</a>
<%else if rs("dbf")=true and rs("bf")=false and rs("czcl")=false then%>
待报废
<%end if%>
<%end if%>
<%end if%>
<%end if%>
</td>
<td>
<a href="#" onClick="MM_openBrWindow1('fslist.asp?id=<%=rs("id")%>','','width=500,height=300');">附属设备</a>
</td>
<td>
<% if rs("zcsh")=true then %>已审核<%else%>待审核<%end if%>
</td>
</tr>
<%
rs.movenext:if rs.EOF then Exit For
next
%>
</table>
<% call LastNextPage(maxpage,page,"width=100% ","<p align=center class=font2>") %>
<% end if %>
<!--#include file="buttom.inc"-->
</body>
</html>
<%else%>
<%
search = ""
if request("name")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " name = '" & request("name") & "' "
end if
if request("bh")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " bh = '" & request("bh") & "' "
end if
if request("lb")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " lb = '" & request("lb") & "' "
end if
if request("jldw")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " jldw = '" & request("jldw") & "' "
end if
if request("sl")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " sl = '" & request("sl") & "' "
end if
if request("ggxh")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " ggxh = '" & request("ggxh") & "' "
end if
if request("jszs")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " jszs = '" & request("jszs") & "' "
end if
if request("wqjz")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " wqjz = '" & request("wqjz") & "' "
end if
if request("azf")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " azf = '" & request("azf") & "' "
end if
if request("zj")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " zj = '" & request("zj") & "' "
end if
if request("jz")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " jz = '" & request("jz") & "' "
end if
if request("jzdw")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " jzdw = '" & request("jzdw") & "' "
end if
if request("jzny")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " jzny = '" & request("jzny") & "' "
end if
if request("ccbh")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " ccbh = '" & request("ccbh") & "' "
end if
if request("syrq")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " syrq = '" & request("syrq") & "' "
end if
if request("synx")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " synx = '" & request("synx") & "' "
end if
if request("sydw")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " sydw = '" & request("sydw") & "' "
end if
if request("szd")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " szd = '" & request("szd") & "' "
end if
if request("bgr")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " bgr = '" & request("bgr") & "' "
end if
if request("szd1")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " szd1 = '" & request("szd1") & "' "
end if
if request("bgr1")<>"" then
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -