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

📄 zcshow.asp

📁 能完成公司资产和资源的管理
💻 ASP
字号:
<!--#include file="connection.asp" -->
<!--#include file="tools.asp" -->
<!--#include file="check.asp"-->
<%

table="zcdj"

id=request("id")
set rs=Server.CreateObject("ADODB.RECORDSET")
rs.Open "select * from " & table & " where id =" & id ,conn
name=rs("name")
bh=rs("bh")
lb=rs("lb")
jldw=rs("jldw")
sl=rs("sl")
ggxh=rs("ggxh")
jszs=rs("jszs")
wqjz=rs("wqjz")
azf=rs("azf")
zj=rs("zj")
jz=rs("jz")
jzdw=rs("jzdw")
jzny=rs("jzny")
ccbh=rs("ccbh")
syrq=rs("syrq")
synx=rs("synx")
sydw=rs("sydw")
szd=rs("szd")
bgr=rs("bgr")
szd1=rs("szd1")
bgr1=rs("bgr1")
szd2=rs("szd2")
bgr2=rs("bgr2")
zcgly=rs("zcgly")
zclry=rs("zclry")


%>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="style.css">
<title>固定资产卡片</title>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>

<META http-equiv=Content-Type content="text/html; charset=gb2312">
<SCRIPT language=JavaScript> 
<!-- // RightClickMenu 
var intDelay=1; //设置菜单显示速度,越大越慢 
var intInterval=30; //每次更改的透明度 
function showmenuie5(){ 
var rightedge=document.body.clientWidth-event.clientX 
var bottomedge=document.body.clientHeight-event.clientY 
if (rightedge<ie5menu.offsetWidth) 
ie5menu.style.left=document.body.scrollLeft+event.clientX-ie5menu.offsetWidth 
else 
ie5menu.style.left=document.body.scrollLeft+event.clientX 
if (bottomedge<ie5menu.offsetHeight) 
ie5menu.style.top=document.body.scrollTop+event.clientY-ie5menu.offsetHeight 
else 
ie5menu.style.top=document.body.scrollTop+event.clientY 
ie5menu.style.visibility="visible" 
//ie5menu.style.visibility="" 
ie5menu.filters.alpha.opacity=0 
GradientShow() 
return false 
} 
function hidemenuie5(){ 
//ie5menu.style.visibility="hidden" 
GradientClose() 
} 
function highlightie5(){ 
if (event.srcElement.className=="menuitems"){ 
event.srcElement.style.backgroundColor="highlight" 
event.srcElement.style.color="white" 
} 
} 
function lowlightie5(){ 
if (event.srcElement.className=="menuitems"){ 
event.srcElement.style.backgroundColor="" 
event.srcElement.style.color="#000000" 
} 
} 
function jumptoie5(){ 
if (event.srcElement.className=="menuitems"){ 
if (event.srcElement.url != ''){ 
if (event.srcElement.getAttribute("target")!=null) 
window.open(event.srcElement.url,event.srcElement.getAttribute("target")) 
else 
window.location=event.srcElement.url 
} 
} 
} 

function GradientShow() //实现淡入的函数 
{ 
ie5menu.filters.alpha.opacity+=intInterval 
if (ie5menu.filters.alpha.opacity<100) setTimeout("GradientShow()",intDelay) 
} 

function GradientClose() //实现淡出的函数 
{ 
ie5menu.filters.alpha.opacity-=intInterval 
if (ie5menu.filters.alpha.opacity>0) { 
 setTimeout("GradientClose()",intDelay) 
 } 
else { 
 ie5menu.style.visibility="hidden" 
 } 
} 

function ChangeBG() //改变菜单项的背景颜色,这里的两种颜色值可以改为你需要的 
{ 
oEl=event.srcElement 
if (oEl.style.background!="navy") { 
  oEl.style.background="navy" 
  } 
  else { 
  oEl.style.background="#cccccc" 
  } 
} 
// --> 
</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" leftmargin="0" topmargin="0" marginwidth="0" marginheight="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>

<div id="Layer1" style="position:absolute; left:1px; top:58px; width:175px; height:18px; z-index:1"><font size="2">单位名称:包头铁路工程学校</font></div>
<div id="Layer2" style="position:absolute; left:556px; top:58px; width:171px; height:22px; z-index:2"><font size="2">类别:<% =HtmlOut(lb) %></font></div>
<!--#include file="top.inc"-->
<div align=center></div>
<div align="center">
  <h1><font face="仿宋_GB2312">固定资产卡片</font> 
  </h1>
  <table width="100%" height="307" border="1" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF" bordercolorlight="#000000" bordercolordark="#FFFFFF">
    <tr> 
      <td width="16%" height="29"><div align="center">固 定 资 产 名 称</div></td>
      <td colspan="3"> 
        <% =HtmlOut(name) %>
      </td>
      <td>编 号</td>
      <td colspan="2"> 
        <% =HtmlOut(bh) %>
      </td>
      <td width="12%"><div align="center">卡 片 号</div></td>
      <td width="22%"><div align="center">第 
          <% =HtmlOut(id) %>
          号</div></td>
    </tr>
    <tr> 
      <td height="30"><div align="center">计 量 单 位</div></td>
      <td width="6%"> 
        <% =HtmlOut(jldw) %>
      </td>
      <td width="6%"><div align="center">数 量</div></td>
      <td width="13%"> 
        <% =HtmlOut(sl) %>
      </td>
      <td>规格型号</td>
      <td colspan="2"> 
        <% =HtmlOut(ggxh) %>
      </td>
      <td><div align="center">技 术 证 书 号</div></td>
      <td> 
        <% =HtmlOut(jszs) %>
      </td>
    </tr>
    <tr> 
      <td height="32"><div align="center">原值或完全价值</div></td>
      <td colspan="2"> 
        <% =HtmlOut(wqjz) %>
      </td>
      <td><div align="center">其中:安装费</div></td>
      <td width="8%"> 
        <% =HtmlOut(azf) %>
      </td>
      <td width="6%"><div align="center">折旧</div></td>
      <td width="11%"> 
        <% =HtmlOut(zj) %>
      </td>
      <td><div align="center">净 值</div></td>
      <td> 
        <% =HtmlOut(jz) %>
      </td>
    </tr>
    <tr> 
      <td height="37"><div align="center">建 造 单 位</div></td>
      <td colspan="8"> 
        <% =HtmlOut(jzdw) %>
      </td>
    </tr>
    <tr> 
      <td height="37"><div align="center">建 造 年 月</div></td>
      <td colspan="3"> 
        <% =HtmlOut(jzny) %>
      </td>
      <td colspan="2"><div align="center">出 厂 编 号</div></td>
      <td> 
        <% =HtmlOut(ccbh) %>
      </td>
      <td><div align="center">交付使用日期</div></td>
      <td> 
        <% =HtmlOut(syrq) %>
      </td>
    </tr>
    <tr> 
      <td height="31"><div align="center">预计使用年限</div></td>
      <td colspan="3"> 
        <% =HtmlOut(synx) %>
      </td>
      <td colspan="2"><div align="center">使 用 状 态</div></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%>
		已报废
	<%else if rs("dbf")=true and rs("bf")=true and rs("czcl")=true then%>
		残值处理
	<%else if rs("dbf")=true and rs("bf")=false and rs("czcl")=false then%>
		待报废
	<%end if%>
	<%end if%>
	<%end if%>
	<%end if%>
      </td>
      <td><div align="center">使 用 单 位</div></td>
      <td> 
        <% =HtmlOut(sydw) %>
      </td>
    </tr>
    <tr> 
      <td rowspan="3"><div align="center">使用单位及保管人</div></td>
      <td colspan="3">所在地: 
        <% =HtmlOut(szd) %>
      </td>
      <td colspan="5">保管人: 
        <% =HtmlOut(bgr) %>
      </td>
    </tr>
    <tr> 
      <td colspan="3">所在地: 
        <% =HtmlOut(szd1) %>
      </td>
      <td colspan="5">保管人: 
        <% =HtmlOut(bgr1) %>
      </td>
    </tr>
    <tr> 
      <td colspan="3">所在地: 
        <% =HtmlOut(szd2) %>
      </td>
      <td colspan="5">保管人: 
        <% =HtmlOut(bgr2) %>
      </td>
    </tr>
  </table>
  <div align="left"> <font size="2">资产管理员:<% =HtmlOut(zcgly) %>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
    资产录入员:<% =HtmlOut(zclry) %>  
    <!--#include file="buttom.inc"-->
    </font></div>
</div>
</body></html>

⌨️ 快捷键说明

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