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

📄 freeadd.asp

📁 实验室设备管理系统目标:通过对多种一维条码的编码进行分析和算法设计在系统中能实现对多种一维条码的显示。 基础要求:非常熟悉C或C++或JAVA语言、熟悉SQL SERVER的相关知识、VB或Delp
💻 ASP
字号:
<!--#include file="conn.asp"-->
<%
if session("admin")="" then
  response.redirect "admin.asp"
end if
%>
<!--#include file="../include/const.asp"-->
<!--#include file="../include/CODE.asp"-->
<html>
<script>
function preview(){
window.open(document.myform.images.value)
}
</script>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<title>添 加 文 章</title>
<link rel="stylesheet" type="text/css" href="../include/STYLE.CSS">
<%
dim rs
dim sql
dim count
set rs=server.createobject("adodb.recordset")
sql = "select * from ANclass order by Nclassid asc"
rs.open sql,conn,1,1
%>
<script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
        <%
        count = 0
        do while not rs.eof 
        %>
subcat[<%=count%>] = new Array("<%= trim(rs("Nclass"))%>","<%= trim(rs("classid"))%>","<%= trim(rs("Nclassid"))%>");
        <%
        count = count + 1
        rs.movenext
        loop
        rs.close
        %>
onecount=<%=count%>;

function changelocation(locationid)
    {
    document.myform.Nclassid.length = 0; 

    var locationid=locationid;
    var i;
    for (i=0;i < onecount; i++)
        {
            if (subcat[i][1] == locationid)
            { 
                document.myform.Nclassid.options[document.myform.Nclassid.length] = new Option(subcat[i][0], subcat[i][2]);
            }        
        }
        
    }    
</script>
</head>

<body>
<br><br>
<form method="POST" name="myform" action="adminsave.asp?action=add">
  <div align="center"><center><table class="border" cellspacing="0" width="80%" border="0" cellpadding="4" cellspacing="0" >
    <tr>
        <td width="100%" class="title" height="20"><center> <p><b>添 加 设 备 信 息</b></td>
    </tr>
    <tr align="center">
      <td class="tdbg" width="100%">
	<table width="80%" border="1" cellpadding="4" cellspacing="4" bordercolor="#CCCCCC">
            <tr> 
              <td width="37%" height="20" align="right" valign="top" class="b1"><div align="left"><b>产品类型:</b></div></td>
              <td width="63%"> 
                <%
        sql = "select * from Aclass"
        rs.open sql,conn,1,1
	if rs.eof and rs.bof then
	response.write "请先添加栏目。"
	response.end
	else
%>
                <select name="classid" onChange="changelocation(document.myform.classid.options[document.myform.classid.selectedIndex].value)" size="1">
                  <option selected value="<%=trim(rs("classid"))%>"><%=trim(rs("class"))%></option>
                  <%      dim selclass
         selclass=rs("classid")
        rs.movenext
        do while not rs.eof
%>
                  <option value="<%=trim(rs("classid"))%>"><%=trim(rs("class"))%></option>
                  <%
        rs.movenext
        loop
	end if
        rs.close
%>
                </select> <select name="Nclassid">
                  <%sql="select * from ANclass where classid="&selclass
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
%>
                  <option selected value="<%=rs("NclassID")%>"><%=rs("Nclass")%></option>
                  <% rs.movenext
do while not rs.eof%>
                  <option value="<%=rs("NclassID")%>"><%=rs("Nclass")%></option>
                  <% rs.movenext
loop
end if
        rs.close
        set rs = nothing
        conn.Close
        set conn = nothing
%>
                </select>
                ** </td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">设备编号:</div></td>
              <td height="15"><input name="sbbh" type="text"
          class="smallinput" id="sbbh" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">设备名称:</div></td>
              <td height="30"><input name="sbmc" type="text"
          class="smallinput" id="sbmc" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">型 
                  号</div></td>
              <td height="30"><input name="xh" type="text"
          class="smallinput" id="xh" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">规 
                  格</div></td>
              <td height="30"><input name="gg" type="text"
          class="smallinput" id="gg" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">国 
                  别</div></td>
              <td height="30"><input name="gb" type="text"
          class="smallinput" id="gb" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">生产厂(牌)</div></td>
              <td height="30"><input name="scc" type="text"
          class="smallinput" id="gg3" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">随机附件</div></td>
              <td height="30"><input name="sjfj" type="text"
          class="smallinput" id="gg4" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">销售单位</div></td>
              <td height="30"><input name="xsdw" type="text"
          class="smallinput" id="gg5" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">院 
                  (部)</div></td>
              <td height="30"><input name="yb" type="text"
          class="smallinput" id="gg6" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">使用单位</div></td>
              <td height="30"><input name="sydw" type="text"
          class="smallinput" id="gg7" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="32" align="right" class="b1"><div align="left">分类编号</div></td>
              <td height="32"> 教 <input name="flbh" type="text"
          class="smallinput" id="gg8" size="20" maxlength="100">
                财 <input name="flbh1" type="text"
          class="smallinput" id="flbh" size="20" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">经费来源</div></td>
              <td height="30"><input name="jfly" type="text"
          class="smallinput" id="gg9" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">使用方向</div></td>
              <td height="30"><input name="syfx" type="text"
          class="smallinput" id="gg10" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">出厂编号</div></td>
              <td height="30"><input name="ccbh" type="text"
          class="smallinput" id="gg11" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">出厂日期</div></td>
              <td height="30"><input name="ccrq" type="text"
          class="smallinput" id="gg12" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">购置日期</div></td>
              <td height="30"><input name="gzrq" type="text"
          class="smallinput" id="gg13" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-2" align="right" class="b1"><div align="left">单价(元)</div></td>
              <td height="14"><input name="dj" type="text"
          class="smallinput" id="gg14" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">附件金额</div></td>
              <td height="15"><input name="fjje" type="text"
          class="smallinput" id="gg15" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="-1" align="right" class="b1"><div align="left">总价(元)</div></td>
              <td height="30"><input name="zj" type="text"
          class="smallinput" id="gg16" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="0" align="right" class="b1"><div align="left">保 
                  管 员</div></td>
              <td height="30"><input name="bgy" type="text"
          class="smallinput" id="gg17" size="40" maxlength="100"></td>
            </tr>
            <tr> 
              <td width="37%" height="0" align="right" class="b1"><div align="left">备 
                  注</div></td>
              <td height="30"><input name="bz" type="text"
          class="smallinput" id="gg18" size="40" maxlength="100"></td>
            </tr>
          </table>
      </td>
    </tr>
  </table>
  </center></div><div align="center"><center><p><input type="submit" value=" 添 加 "
  name="cmdok" class="buttonface">&nbsp; <input type="reset" value=" 清 除 "
  name="cmdcancel" class="buttonface"></p>
  </center></div>
</form>
</body>
</html>

⌨️ 快捷键说明

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