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

📄 dzsearch.asp

📁 一个小小的固定资产程序
💻 ASP
字号:
<!--#include file="connection.asp" -->
<!--#include file="tools.asp" -->
<!--#include file="check.asp"-->
<Script Language="javaScript">
    function  validate()
    {
        if  (document.myform.qn.value=="")
        {
            alert("其始年份不能为空");
            document.myform.qn.focus();
            return false ;
        }
        if  (document.myform.qy.value=="")
        {
            alert("起始月份不能为空");
            document.myform.qy.focus();
            return false ;
        }
		if  (document.myform.qr.value=="")
        {
            alert("起始日期不能为空");
            document.myform.qr.focus();
            return false ;
        }
		if  (document.myform.jn.value=="")
        {
            alert("结束年份不能为空");
            document.myform.jn.focus();
            return false ;
        }
		if  (document.myform.jy.value=="")
        {
            alert("结束月份不能为空");
            document.myform.jy.focus();
            return false ;
        }
		if  (document.myform.jr.value=="")
        {
            alert("结束日期不能为空");
            document.myform.jr.focus();
            return false ;
        }
	add_onsubmit(form5)
	return  true;
    }
</Script>
<%
dim sql
dim rs
 sql="select * from user where id="&session("uid")
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1

Set myrs= Server.CreateObject("ADODB.Recordset") 
strSql="select * from bumen"
myrs.open strSql,Conn,1,1 

Set lbrs= Server.CreateObject("ADODB.Recordset") 
lbSql="select * from lb"
lbrs.open lbSql,Conn,1,1

dim rs_user
 sql1="select 姓名 from user where trim(权限)='b'"
set rs_user=server.createobject("adodb.recordset")
rs_user.open sql1,conn,1,1

dim rs_userl
 sql10="select 姓名 from user where trim(权限)='a'"
set rs_userl=server.createobject("adodb.recordset")
rs_userl.open sql10,conn,1,1
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="style.css">
<title>包头铁路工程学校资产管理系统</title>

<% if request.form("addedit_subed")<>"true" then '********************* %>
<script language="JavaScript" src="check.js"></script>
<script LANGUAGE="javascript">
<!--

function add_onsubmit(add) {
	
//if (!checkvalue(add.name,0,0,1,"固定资产名称")) return false;
//if (!checkvalue(add.bh,0,0,1,"编号")) return false;
//if (!checkvalue(add.jldw,0,0,1,"计量单位")) return false;
//if (!checkvalue(add.sl,0,0,1,"数量")) return false;
//if (!checkvalue(add.ggxh,0,0,1,"规格型号")) return false;
//if (!checkvalue(add.jszs,0,0,1,"技术证书号")) return false;
//if (!checkvalue(add.wqjz,0,0,1,"原值")) return false;
//if (!checkvalue(add.azf,0,0,1,"安装费")) return false;
//if (!checkvalue(add.zj,0,0,1,"折旧")) return false;
//if (!checkvalue(add.jz,0,0,1,"净值")) return false;
//if (!checkvalue(add.jzdw,0,0,1,"建造单位")) return false;
//if (!checkvalue(add.jzny,0,0,1,"建造年月")) return false;
//if (!checkvalue(add.ccbh,0,0,1,"出厂编号")) return false;
//if (!checkvalue(add.syrq,0,0,1,"交付使用日期")) return false;
//if (!checkvalue(add.synx,0,0,1,"预计使用年限")) return false;
//if (!checkvalue(add.syzt,0,0,1,"使用状态")) return false;
//if (!checkvalue(add.sydw,0,0,1,"使用部门")) return false;
//if (!checkvalue(add.szd,0,0,1,"所在地")) return false;
//if (!checkvalue(add.bgr,0,0,1,"保管人")) return false;
//if (!checkvalue(add.szd1,0,0,1,"所在地1")) return false;
//if (!checkvalue(add.bgr1,0,0,1,"保管人1")) return false;
//if (!checkvalue(add.szd2,0,0,1,"所在地2")) return false;
//if (!checkvalue(add.bgr2,0,0,1,"保管人2")) return false;
//if (!checkvalue(add.zcgly,0,0,1,"资产管理员")) return false;
//if (!checkvalue(add.zclry,0,0,1,"资产录入员")) return false;


}
//-->
</SCRIPT>
<% end if '************************************************* %>

<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">
<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"-->

<form method=GET action=dzmanage.asp name=add LANGUAGE=javascript onsubmit="return add_onsubmit(this)">
<div align=center>
    <table border=0 cellpadding=0 width=435 cellspacing=1>
      <tr> 
        <td align=right bgcolor=#D2D8BE><div align="left">低值易耗品条件复合查询</div></td>
        <td>&nbsp;</td>
      </tr>
      <tr> 
        <td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>低值易耗品名称:</span></td>
        <td width=359><input type=text name="dzname" size=20 class=fstyle  value=""> 
        </td>
      </tr>
      <tr> 
        <td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>发票号数:</span></td>
        <td width=359><input type=text name="fph" size=20 class=fstyle  value=""> 
        </td>
      </tr>
      <tr> 
        <td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>发票日期:</span></td>
        <td width=359><input type=text name="fptime" size=20 class=fstyle  value=""> 
        </td>
      </tr>
      <tr> 
        <td align=right bgcolor=#D2D8BE><span class=fstyle>增置单位:</span></td>
        <td><input type=text name="zzdw" size=20 class=fstyle  value=""></td>
      </tr>
    </table>
</div>
<div align=center>
<input type=submit value="查询"  name=B1 class=fstyle>
<input type=reset value="重填" name=B2 class=fstyle>
</div>
</form>
<form name="form1" method=GET action="dzmanage.asp">
  <div align="center">
    <table width=435 border=0 cellpadding=0 cellspacing=1>
    <tr> 
        <td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>管理单位:</span></td>
      <td width=359><SELECT NAME="gldw" >  
<%if myrs.eof and myrs.bof then
	response.write "<font color='red'>还没有任何内容</font>"
else
	do while not (myrs.eof or myrs.bof)
	if myrs("type")=rs("部门") then
	sel="selected"
else 
	sel=""
end if
%>
	<option value="<%=myrs("type")%>" <%=sel%>><%=myrs("type")%></option>
		<%myrs.movenext 
			loop 
		end if%>               
	</SELECT>
	<input type="submit" name="Submit" value="查询"> </td>
    </tr>
  </table>
</div>
</form>
<form name="form2" method=GET action="dzmanage.asp">
<div align="center">
  <table width=435 border=0 cellpadding=0 cellspacing=1>
    <tr> 
      <td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>资产类型:</span></td>
      <td width=359><SELECT NAME="dzlb">  
<%if lbrs.eof and lbrs.bof then
response.write "<font color='red'>还没有任何内容</font>"
else
do while not (lbrs.eof or lbrs.bof)
if lbrs("type")=lbrs("type") then
sel="selected"
else 
sel=""
end if
%>
<option value="<%=lbrs("type")%>" <%=sel%>><%=lbrs("type")%></option>
<%lbrs.movenext 
loop 
end if%>               
</SELECT>
        <input type="submit" name="Submit2" value="查询"> </td>
    </tr>
  </table>
</div>
</form>
<form name="form3" method=GET action="dzmanage.asp">
<div align="center">
  <table width=435 border=0 cellpadding=0 cellspacing=1>
    <tr> 
      <td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>资产管理员:</span></td>
      <td width=359><SELECT NAME="dzgly">  
<%if rs_user.eof and rs_user.bof then
response.write "<font color='red'>还没有任何内容</font>"
else
do while not (rs_user.eof or rs_user.bof)
if rs_user("姓名")=rs_user("姓名") then
sel="selected"
else 
sel=""
end if
%>
<option value="<%=rs_user("姓名")%>" <%=sel%>><%=rs_user("姓名")%></option>
<%rs_user.movenext 
loop 
end if%>               
</SELECT>
        <input type="submit" name="Submit3" value="查询"> </td>
    </tr>
  </table>
  </div>
</form>
<form name="form4" method=GET action="dzmanage.asp">
<div align="center">
  <table width=435 border=0 cellpadding=0 cellspacing=1>
    <tr> 
      <td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>资产录入员:</span></td>
      <td width=359><SELECT NAME="dzlry">  
<%if rs_userl.eof and rs_userl.bof then
response.write "<font color='red'>还没有任何内容</font>"
else
do while not (rs_userl.eof or rs_userl.bof)
if rs_userl("姓名")=rs_userl("姓名") then
sel="selected"
else 
sel=""
end if
%>
<option value="<%=rs_userl("姓名")%>" <%=sel%>><%=rs_userl("姓名")%></option>
<%rs_userl.movenext 
loop 
end if%>               
</SELECT>
        <input type="submit" name="Submit4" value="查询"> </td>
    </tr>
  </table>
  </div>
</form>
<div align="center"> 
  <form name="form5" method=GET action="dzrqcx.asp" LANGUAGE=javascript onsubmit=" return validate()">
    <table width=435 border=0 cellpadding=0 cellspacing=1>
      <tr> 
        <td align=right bgcolor=#D2D8BE><div align="left">日期查询</div></td>
        <td>&nbsp;</td>
      </tr>
      <tr> 
        <td height="18" align=right bgcolor=#D2D8BE>起始日期:</td>
        <td><input name="qn" type="text" size="4" maxlength="4">
          <input name="qy" type="text" size="2" maxlength="2">
          <input name="qr" type="text" size="2" maxlength="2">
          日</td>
      </tr>
      <tr>
        <td align=right bgcolor=#D2D8BE>结束日期:</td>
        <td><input name="jn" type="text" size="4" maxlength="4">
          <input name="jy" type="text" size="2" maxlength="2">
          <input name="jr" type="text" size="2" maxlength="2">
          日</td>
      </tr>
      <tr> 
        <td width="157" align=right bgcolor=#FFFFFF><div align="right"></div></td>
        <td width="275"> <div align="center">
            <input type="submit" name="Submit8" value="查询">
          </div></td>
      </tr>
    </table>
  </form>
  <br>
  <table width=435 border=0 cellpadding=0 cellspacing=1>
  <tr>
    <td align=right bgcolor=#D2D8BE><div align="left">资产审核查询</div></td>
    <td>&nbsp;</td>
  </tr>
  
  <tr> 
    <td width=208 align=right bgcolor=#D2D8BE>&nbsp;</td>
	    <td width=359> 
      <input type="button" name="Submit5" value="待审核"onClick="javascript:window.open('dzdshcx.asp','_new');">
      <input type="button" name="Submit6" value="已审核" onClick="javascript:window.open('dzyshcx.asp','_new');"> 
      </td>
  </tr>
  </table><br>
  <table width=435 border=0 cellpadding=0 cellspacing=1>
    <tr> 
      <td align=right bgcolor=#D2D8BE><div align="left">资产使用情况查询</div></td>
      <td>&nbsp;</td>
    </tr>
    <tr> 
      <td width=208 align=right bgcolor=#D2D8BE>&nbsp;</td>
      <td width=359> <input type="button" name="Submit52" value="待报废" onClick="javascript:window.open('dzdbfcx.asp','_new');"> <input type="button" name="Submit62" value="已报废" onClick="javascript:window.open('dzybfcx.asp','_new');">
        <input type="button" name="Submit7" value="残值处理" onClick="javascript:window.open('dzczclcx.asp','_new');"> 
        </td>
    </tr>
  </table>
  <p>&nbsp;</p>
</div>
<p>&nbsp;</p>
<p>&nbsp;</p>
<!--#include file="buttom.inc"-->
</body>
</html>

⌨️ 快捷键说明

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