📄 add_wuzi.asp
字号:
<!--#include file = "Startup.asp"-->
<!-- #include file="Function.asp" -->
<%
call adminer()
Call ComeUrl()
'Call adminqx()
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="common.css" type="text/css" rel="stylesheet">
<title>无标题文档</title>
</head>
<%
set rs=oConn.execute("select * from bumen")
set rs2=oConn.execute("select * from office")
set rs3=oConn.execute("select * from jifang")
%>
<script language = "JavaScript">
var onecount;
var onecount2;
var onecount3;
onecount3=0;
onecount2=0;
onecount=0;
subcat = new Array();
subcat2= new Array();
subcat3= new Array();
<%
dim count:count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs("部门名称"))%>","<%= trim(rs("所属校区"))%>");
<%
count = count + 1
rs.movenext
loop
rs.close
set rs=nothing
%>
onecount=<%=count%>;
//办公室
<%
dim count2:count2 = 0
do while not rs2.eof
%>
subcat2[<%=count2%>] = new Array("<%= trim(rs2("办公室名称"))%>","<%= trim(rs2("所属校区"))%>");
<%
count2 = count2 + 1
rs2.movenext
loop
rs2.close
set rs2=nothing
%>
onecount2=<%=count2%>;
//机房
<%
dim count3:count3=0
do while not rs3.eof
%>
subcat3[<%=count3%>]=new Array("<%=trim(rs3("机房编号"))%>","<%=trim(rs3("所属校区"))%>");
<%
count3=count3+1
rs3.movenext
loop
rs3.close
set rs3=nothing
%>
onecount3=<%=count3%>;
function changelocation(bigclassid)
{
document.editform.bmname.length = 0;
document.editform.office.length = 0;
document.editform.jfcode.length = 0;
var bigclassid=bigclassid;
var i;
var ii;
var iii;
document.editform.bmname.options[0] = new Option('请选择部门','');
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == bigclassid)
{
document.editform.bmname.options[document.editform.bmname.length] = new Option(subcat[i][0], subcat[i][0]);
}
}
//办公室
document.editform.office.options[0] = new Option('请选择办公室','');
for (ii=0;ii < onecount2; ii++)
{
if (subcat2[ii][1] == bigclassid)
{
document.editform.office.options[document.editform.office.length] = new Option(subcat2[ii][0], subcat2[ii][0]);
}
}
//机房
document.editform.jfcode.options[0] =new Option('请选择机房','');
for (iii=0;iii < onecount3; iii++)
{
if (subcat3[iii][1] == bigclassid)
{
document.editform.jfcode.options[document.editform.jfcode.length] = new Option(subcat3[iii][0],subcat3[iii][0]);
}
}
}
</script>
<script language=javascript>
function wuzisub(){
if (document.editform.bianhao.value==""){
alert("请填写物资编号！");
document.editform.bianhao.focus( );
document.editform.bianhao.select( );
return false
}
if(document.editform.wzname.value==""){
alert("请填写物资名称！");
document.editform.wzname.focus( );
document.editform.wzname.select( );
return false
}
if(document.editform.danwei.value==""){
alert("请填写物资单位！");
document.editform.danwei.focus( );
document.editform.danwei.select( );
return false
}
if(document.editform.danjia.value==""){
alert("请填写物资单价！");
document.editform.danjia.focus( );
document.editform.danjia.select( );
return false
}
if(!isNumber(document.editform.danjia.value)){
alert("物资单价填写不合法！\n请填写数字！");
document.editform.danjia.focus( );
document.editform.danjia.select( );
return false
}
if(document.editform.gongyin.value==""){
alert("请填写物资供应商！");
document.editform.gongyin.focus( );
document.editform.gongyin.select( );
return false
}
if(document.editform.jbtime.value==""){
alert("请填写物资质保起始时间！");
document.editform.jbtime.focus( );
document.editform.jbtime.select( );
return false
}
if(document.editform.wzclass.value==""){
alert("请选择物资所属类别！");
document.editform.wzclass.focus( );
return false
}
if(document.editform.shcoolname.value==""){
alert("请选择物资所属校区！");
document.editform.shcoolname.focus( );
return false
}
if(document.editform.zhuangtai.value==""){
alert("请选择物资状态！");
document.editform.zhuangtai.focus( );
return false
}
}
function isNumber(String)
{
var Letters = "1234567890"; //可以自己增加可输入值
var i;
var c;
if(String.charAt( 0 )=='-')
return false;
if( String.charAt( String.length - 1 ) == '-' )
return false;
for( i = 0; i < String.length; i ++ )
{
c = String.charAt( i );
if (Letters.indexOf( c ) < 0)
return false;
}
return true;
}
</script>
<body>
<table width="100%" height="100%" border="0">
<tr>
<td align="center" valign="top"> <p> </p>
<table width="80%" border="0">
<tr>
<td align="center">
<form name="editform" method="post" action="add_wuzi_save.asp" onSubmit="return wuzisub()">
<table width="95%" border="0" cellpadding="3" cellspacing="1" bgcolor="#CCCCCC">
<tr align="center">
<td colspan="2" bgcolor="#E1E1E1"><strong><font color="#FF0000">添
加 物 资 </font></strong></td>
</tr>
<tr>
<td width="100" bgcolor="#FFFFFF">编号</td>
<td bgcolor="#FFFFFF"> <input name="bianhao" type="text" id="bianhao"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">名称</td>
<td bgcolor="#FFFFFF"> <input name="wzname" type="text" id="wzname"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">单位</td>
<td bgcolor="#FFFFFF"> <input name="danwei" type="text" id="danwei"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">单价</td>
<td bgcolor="#FFFFFF"> <input name="danjia" type="text" id="danjia"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">供应商</td>
<td bgcolor="#FFFFFF"> <input name="gongyin" type="text" id="gongyin"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">质保起始时间</td>
<td bgcolor="#FFFFFF"> <input name="jbtime" type="text" id="jbtime">
填写格式：2005.10至2007.10</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">报修记录</td>
<td bgcolor="#FFFFFF"> <input name="baoxiou" type="text" id="baoxiou"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">借用记录</td>
<td bgcolor="#FFFFFF"> <input name="jieyon" type="text" id="jieyon">
</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">所属分类</td>
<td bgcolor="#FFFFFF"><select name="wzclass" id="wzclass">
<option value="">请选择分类</option>
<%
set rs2=server.createObject("adodb.recordset")
sql2="select * from wuzi"
rs2.open sql2,oconn,1,1
do while not rs2.eof
banji=rs2("物资名称")
response.write "<option "&s&" value="&banji&">"&banji&"</option>"
rs2.movenext
loop
rs2.close
%>
</select></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">所属校区</td>
<td bgcolor="#FFFFFF"><select name="shcoolname" id="shcoolname" onChange="changelocation(document.editform.shcoolname.options[document.editform.shcoolname.selectedIndex].value)">
<option value="">请选择校区</option>
<%
ssxq=trim(request("所属校区"))
if ssxq="" then
response.write "<option value=>请选择校区</option>"
set rs2=server.createObject("adodb.recordset")
sql2="select * from shcool_class"
rs2.open sql2,oconn,1,1
do while not rs2.eof
banji=rs2("校区名称")
response.write "<option "&s&" value="&banji&">"&banji&"</option>"
rs2.movenext
loop
rs2.close
else
response.write "<option selected value="&ssxq&">"&ssxq&"</option>"
end if
%>
</select></td>
</tr>
<tr>
<td colspan="2" bgcolor="#E4E4E4"><font color="#FF0000">注：下面3项任选一个</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td colspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr bgcolor="#FFFFFF">
<td width="33%">所属部门：<br>
<select name="bmname" id="bmname">
<option value="">请选择部门</option>
</select>
</td>
<td width="33%">所属办公室：<br>
<select name="office" id="office">
<option value="">请选择办公室</option>"
</select>
</td>
<td width="33%">所属机房：<br>
<select name="jfcode" id="jfcode">
<option value="">请选择机房</option>
</select></td>
</tr>
</table></td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF"> </td>
</tr>
<tr>
<td bgcolor="#FFFFFF">状态</td>
<td bgcolor="#FFFFFF"> <select name="zhuangtai" id="select3">
<option value="">请选择状态</option>
<%
set rs5=server.createObject("adodb.recordset")
sql5="select * from 状态"
rs5.open sql5,oconn,1,1
do while not rs5.eof
banji=rs5("状态")
response.write "<option "&s&" value="&banji&">"&banji&"</option>"
rs5.movenext
loop
rs5.close
%>
</select></td>
</tr>
<tr align="left">
<td colspan="2" bgcolor="#E4E4E4"><font color="#FF0000">以下为主机配置表单，非主机物资可不填写</font></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">CPU</td>
<td bgcolor="#F6F6F6"> <input name="cpu" type="text" id="cpu"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">主板</td>
<td bgcolor="#F6F6F6"> <input name="zhuban" type="text" id="zhuban"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">硬盘</td>
<td bgcolor="#F6F6F6"> <input name="disk" type="text" id="disk"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">内存</td>
<td bgcolor="#F6F6F6"> <input name="leicuen" type="text" id="leicuen"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">显卡</td>
<td bgcolor="#F6F6F6"> <input name="xianka" type="text" id="xianka"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">显示器</td>
<td bgcolor="#F6F6F6"> <input name="xianshiqi" type="text" id="xianshiqi"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">声卡</td>
<td bgcolor="#F6F6F6"> <input name="shenka" type="text" id="shenka"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">网卡</td>
<td bgcolor="#F6F6F6"> <input name="wangka" type="text" id="wangka"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">机箱</td>
<td bgcolor="#F6F6F6"> <input name="jixiang" type="text" id="jixiang"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">光驱/刻录机/DVD</td>
<td bgcolor="#F6F6F6"> <input name="cdrom" type="text" id="cdrom"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">音箱</td>
<td bgcolor="#F6F6F6"> <input name="yinxiang" type="text" id="yinxiang"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">键盘</td>
<td bgcolor="#F6F6F6"> <input name="jianpan" type="text" id="jianpan"></td>
</tr>
<tr>
<td bgcolor="#F6F6F6">鼠标</td>
<td bgcolor="#F6F6F6"> <input name="shubiao" type="text" id="shubiao"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">备注</td>
<td bgcolor="#FFFFFF"> <textarea name="beizhu" cols="30" rows="5" id="beizhu"></textarea></td>
</tr>
<tr align="center">
<td colspan="2" bgcolor="#FFFFFF"> <input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置">
</td>
</tr>
</table>
</form></td>
</tr>
</table>
<p> </p> </td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -