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

📄 wuzi2_add.asp

📁 对学校物资管理系统的一份设计
💻 ASP
字号:
<!--#include file = "Startup.asp"-->
<!-- #include file="Function.asp" -->
<%
call adminer()
Call ComeUrl()
%>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="common.css" type="text/css" rel="stylesheet">
<title>无标题文档</title>
</head>
<body>
<table width="100%" height="100%" border="0">
  <tr>
    <td align="center" valign="top"> <p>&nbsp;</p>
      <table width="80%" border="0">
        <tr>
          <td align="center">
<form name="form1" method="post" action="add_wuzi_save.asp">
              <table width="80%" border="0" cellpadding="3" cellspacing="1" bgcolor="#CCCCCC">
                <tr align="center" bgcolor="#E1E1E1"> 
                  <td colspan="2"><strong><font color="#FF0000">添 加 物 资 到 仓 库</font></strong></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td width="100">编号</td>
                  <td><input name="bianhao" type="text" id="bianhao"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>名称</td>
                  <td><input name="wzname" type="text" id="wzname"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>单位</td>
                  <td><input name="danwei" type="text" id="danwei"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>单价</td>
                  <td><input name="danjia" type="text" id="danjia"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>供应商</td>
                  <td><input name="gongyin" type="text" id="gongyin"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>质保起始时间</td>
                  <td><input name="jbtime" type="text" id="jbtime">
                    填写格式:2005.10至2007.10</td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>报修记录</td>
                  <td><input name="baoxiou" type="text" id="baoxiou"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td bgcolor="#FFFFFF">借用记录</td>
                  <td bgcolor="#FFFFFF"> <input name="jieyon" type="text" id="jieyon"> 
                  </td>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <td bgcolor="#FFFFFF">所属校区</td>
                  <td bgcolor="#FFFFFF"><select name="shcoolname" id="shcoolname">
                      <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
			         %>
                    </select></td>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <td bgcolor="#FFFFFF">所属部门</td>
                  <td bgcolor="#FFFFFF"><select name="bmname" id="bmname">
                      <option value="">请选择部门</option>
                      <%
						set rs3=server.createObject("adodb.recordset")
						sql3="select * from bumen"
						rs3.open sql3,oconn,1,1
						do while not rs3.eof
						banji=rs3("部门名称")
						response.write "<option "&s&" value="&banji&">"&banji&"</option>"
						rs3.movenext
						loop
						rs3.close
			         %>
                    </select></td>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <td bgcolor="#FFFFFF">所属机房</td>
                  <td bgcolor="#FFFFFF"><select name="jfcode" id="select2">
                      <option value="">请选择机房</option>
                      <%
						set rs4=server.createObject("adodb.recordset")
						sql4="select * from jifang"
						rs4.open sql4,oconn,1,1
						do while not rs4.eof
						banji=rs4("机房编号")
						response.write "<option "&s&" value="&banji&">"&banji&"</option>"
						rs4.movenext
						loop
						rs4.close
			         %>
                    </select></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>状态</td>
                  <td><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 bgcolor="#FFFFFF"> 
                  <td>备注</td>
                  <td><textarea name="beizhu" cols="30" rows="5" id="beizhu"></textarea></td>
                </tr>
                <tr align="center" bgcolor="#FFFFFF"> 
                  <td colspan="2"> <input type="submit" name="Submit" value="提交"> 
                    &nbsp;&nbsp; <input type="reset" name="Submit2" value="重置"> 
                  </td>
                </tr>
              </table>
            </form></td>
        </tr>
      </table>
      <p>&nbsp;</p> </td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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