?? zcsearch.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("結(jié)束年份不能為空");
document.myform.jn.focus();
return false ;
}
if (document.myform.jy.value=="")
{
alert("結(jié)束月份不能為空");
document.myform.jy.focus();
return false ;
}
if (document.myform.jr.value=="")
{
alert("結(jié)束日期不能為空");
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(權(quán)限)='b'"
set rs_user=server.createobject("adodb.recordset")
rs_user.open sql1,conn,1,1
dim rs_userl
sql10="select 姓名 from user where trim(權(quán)限)='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>包頭鐵路工程學(xué)校資產(chǎn)管理系統(tǒng)</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,"固定資產(chǎn)名稱")) 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,"數(shù)量")) return false;
//if (!checkvalue(add.ggxh,0,0,1,"規(guī)格型號")) return false;
//if (!checkvalue(add.jszs,0,0,1,"技術(shù)證書號")) 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,"預(yù)計使用年限")) return false;
//if (!checkvalue(add.syzt,0,0,1,"使用狀態(tài)")) 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,"資產(chǎn)管理員")) return false;
//if (!checkvalue(add.zclry,0,0,1,"資產(chǎn)錄入員")) return false;
}
//-->
</SCRIPT>
<% end if '************************************************* %>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<SCRIPT language=JavaScript>
<!-- // RightClickMenu
var intDelay=1; //設(shè)置菜單顯示速度，越大越慢
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() //實現(xiàn)淡入的函數(shù)
{
ie5menu.filters.alpha.opacity+=intInterval
if (ie5menu.filters.alpha.opacity<100) setTimeout("GradientShow()",intDelay)
}
function GradientClose() //實現(xiàn)淡出的函數(shù)
{
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=zcmanage.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">資產(chǎn)條件復(fù)合查詢</div></td>
<td> </td>
</tr>
<tr>
<td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>固定資產(chǎn)名稱：</span></td>
<td width=359><input type=text name="name" 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="bh" 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="szd" size=20 class=fstyle value="">
</td>
</tr>
<tr>
<td align=right bgcolor=#D2D8BE><span class=fstyle>保管人：</span></td>
<td><input type=text name="bgr" 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="zcmanage.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="sydw" >
<%if myrs.eof and myrs.bof then
response.write "<font color='red'>還沒有任何內(nèi)容</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="zcmanage.asp">
<div align="center">
<table width=435 border=0 cellpadding=0 cellspacing=1>
<tr>
<td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>資產(chǎn)類型：</span></td>
<td width=359><SELECT NAME="lb">
<%if lbrs.eof and lbrs.bof then
response.write "<font color='red'>還沒有任何內(nèi)容</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="zcmanage.asp">
<div align="center">
<table width=435 border=0 cellpadding=0 cellspacing=1>
<tr>
<td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>資產(chǎn)管理員：</span></td>
<td width=359><SELECT NAME="zcgly">
<%if rs_user.eof and rs_user.bof then
response.write "<font color='red'>還沒有任何內(nèi)容</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="zcmanage.asp">
<div align="center">
<table width=435 border=0 cellpadding=0 cellspacing=1>
<tr>
<td width=208 align=right bgcolor=#D2D8BE><span class=fstyle>資產(chǎn)錄入員：</span></td>
<td width=359><SELECT NAME="zclry">
<%if rs_userl.eof and rs_userl.bof then
response.write "<font color='red'>還沒有任何內(nèi)容</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="rqcx.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> </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>結(jié)束日期：</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">資產(chǎn)審核查詢</div></td>
<td> </td>
</tr>
<tr>
<td width=208 align=right bgcolor=#D2D8BE> </td>
<td width=359>
<input type="button" name="Submit5" value="待審核"onClick="javascript:window.open('zcdshcx.asp','_new');">
<input type="button" name="Submit6" value="已審核" onClick="javascript:window.open('zcyshcx.asp','_new');">
</td>
</tr>
</table><br>
<table width=435 border=0 cellpadding=0 cellspacing=1>
<tr>
<td align=right bgcolor=#D2D8BE><div align="left">資產(chǎn)使用情況查詢</div></td>
<td> </td>
</tr>
<tr>
<td width=208 align=right bgcolor=#D2D8BE> </td>
<td width=359> <input type="button" name="Submit52" value="待報廢" onClick="javascript:window.open('zcdbfcx.asp','_new');"> <input type="button" name="Submit62" value="已報廢" onClick="javascript:window.open('zcybfcx.asp','_new');">
<input type="button" name="Submit7" value="殘值處理" onClick="javascript:window.open('zcczclcx.asp','_new');">
</td>
</tr>
</table>
<p> </p>
</div>
<p> </p>
<p> </p>
<!--#include file="buttom.inc"-->
</body>
</html>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -