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

📄 editwuzi.asp

📁 对学校物资管理系统的一份设计
💻 ASP
字号:
<!--#include file = "Startup.asp"-->
<!-- #include file="Function.asp" -->
<%
call adminer()
id=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from cangku where id="&id
rs.open sql,oconn,1,1
%>
<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="90%" border="0">
        <tr>
          <td align="center">
<form name="form1" method="post" action="edit_wuzi_save.asp?id=<%=id%>">
              <table width="100%" 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" value="<%=rs("编号")%>"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>名称</td>
                  <td><input name="wzname" type="text" id="wzname" value="<%=rs("名称")%>"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>单位</td>
                  <td><input name="danwei" type="text" id="danwei" value="<%=rs("单位")%>"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>单价</td>
                  <td><input name="danjia" type="text" id="danjia" value="<%=rs("单价")%>"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>供应商</td>
                  <td><input name="gongyin" type="text" id="gongyin" value="<%=rs("供应商")%>"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>质保起始时间</td>
                  <td><input name="jbtime" type="text" id="jbtime" value="<%=rs("质保起始时间")%>"> 
                  </td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>报修记录</td>
                  <td><input name="baoxiou" type="text" id="baoxiou" value="<%=rs("报修记录")%>"></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td bgcolor="#FFFFFF">借用记录</td>
                  <td bgcolor="#FFFFFF"> <input name="jieyon" type="text" id="jieyon" value="<%=rs("借用记录")%>"> 
                  </td>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <td bgcolor="#FFFFFF">所属校区</td>
                  <td bgcolor="#FFFFFF"><select name="shcoolname" size="1" id="shcoolname">
                      <%
						set rs2=server.createObject("adodb.recordset")
						sql2="select * from shcool_class"
						rs2.open sql2,oconn,1,1
						do while not rs2.eof
						zhuanye=rs2("校区名称")
						  if zhuanye=rs("所属校区") then 
						  s="selected"
						  else
						  s=""
						  end if
						response.write "<option "&s&" value="&zhuanye&">"&zhuanye&"</option>"
						rs2.movenext
						loop
						rs2.close
			%>
                    </select></td>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <td bgcolor="#FFFFFF">所属部门</td>
                  <td bgcolor="#FFFFFF"><select name="bmname" size="1" id="bmname">
                      <%
						set rs3=server.createObject("adodb.recordset")
						sql3="select * from bumen"
						rs3.open sql3,oconn,1,1
						do while not rs3.eof
						zhuanye=rs3("部门名称")
						  if zhuanye=rs("所属部门") then 
						  s="selected"
						  else
						  s=""
						  end if
						response.write "<option "&s&" value="&zhuanye&">"&zhuanye&"</option>"
						rs3.movenext
						loop
						rs3.close
			%>
                    </select></td>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <td bgcolor="#FFFFFF">所属机房</td>
                  <td bgcolor="#FFFFFF"><select name="jfcode" size="1" id="select2">
                      <%
						set rs4=server.createObject("adodb.recordset")
						sql4="select * from jifang"
						rs4.open sql4,oconn,1,1
						do while not rs4.eof
						zhuanye=rs4("机房编号")
						  if zhuanye=rs("所属机房") then 
						  s="selected"
						  else
						  s=""
						  end if
						response.write "<option "&s&" value="&zhuanye&">"&zhuanye&"</option>"
						rs4.movenext
						loop
						rs4.close
			%>
                    </select></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>状态</td>
                  <td bgcolor="#FFFFFF"> <input name="zhuangtai" type="text" id="zhuangtai" value="<%=rs("状态")%>"> 
                    <font color="#FF0000">参考选项:使用中、报修中、报损中、闲置中、已报废</font></td>
                </tr>
                <tr bgcolor="#FFFFFF"> 
                  <td>备注</td>
                  <td><textarea name="beizhu" cols="30" rows="5" id="beizhu"><%=rs("备注")%></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 + -