bookadd.asp

来自「ASP+SQL Server的图书馆管理系统」· ASP 代码 · 共 110 行

ASP
110 行
字号 
<!--#include File="conndb.asp"-->
<html>
<head>
<title>添加图书</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style.css" rel="STYLESHEET" type="text/css">
<Script Language="JavaScript">
function ChkFields() {
  if (document.myform.book_type.selectedIndex < 0) {
    alert("请选择图书类别");
    return false;
  }
  if (document.myform.book_name.value=="") {
    alert("请输入图书名称");
    return false;
  }
   if (document.myform.book_id.value=="") {
    alert("请输入图书编号");
    return false;
  }
  if (document.myform.book_Press.value=="") {
    alert("请输入出版社");
    return false;
  }
   if (document.myform.book_PrsDate.value=="") {
    alert("请输入出版日期");
    return false;
  }
  return true;
 }
</Script>

</head>
<body bgcolor="#E1F5FF">
      <form name="myform"  method="POST" action="BookSave.asp?action=add" onsubmit="return ChkFields()">
        <table border="0" width="100%" cellspacing="1">
          <tr> 
            <td width="100%">图书类别 
<select size="1" name="book_type">
<%
  Set rs = Server.CreateObject("ADODB.RECORDSET") 
  '读取商品类别信息
  sql="SELECT * FROM BOOK_Type ORDER BY type_Id"
  Set rs = Conn.Execute(sql)
  If rs.EOF Then
%>
    <option value=""></option>
<%
  Else
    Do While Not rs.Eof%>
      <option value="<%=rs("type_id")%>"><%=rs("type_name")%></option>
<%
      rs.MoveNext
    Loop
  End If
  rs.Close
%>
              </select>
            </td>
          </tr>
          <tr> 
            <td width="100%">图书名称 
              <input type="text" name="book_name" size="20">
            </td>
          </tr>
          <tr> 
            <td width="100%">图书编号 
              <input type="text" name="book_id" size="20">
            </td>
          </tr>
          <tr> 
            <td width="100%"> 出版社
              <input type="text" name="book_Press" size="20">
</td>
          </tr>
          <tr> 
            <td width="100%">出版日期
              <input type="text" name="book_PrsDate" size="20">
            </td>
          </tr>
          <tr> 
            <td width="100%">图书数量
              <input type="text" name="book_Total" size="20">
            </td>
          </tr>
         
         <tr> 
            <td width="100%">上架日期
              <input type="text" name="Book_AddDate" size="20"></td>
          </tr>
         
          <tr> 
            <td width="100%">图书介绍</td>
          </tr>
          <tr> 
            <td width="100%"> 
              <textarea rows="6" name="content" cols="56">暂时没有……</textarea>
            </td>
          </tr>
          <tr> 
            <td width="100%"><iframe frameborder="0" height="40" width="400" scrolling="no" src="upload.asp" ></iframe>
            <input type="hidden" name="upimage"></td>
          </tr>
          <tr> 
            <td width="100%" align=center><input type="submit" value=" 提 交 " name="B1">&nbsp;&nbsp;&nbsp;&nbsp;
        <input type="reset" value=" 重 写 " name="B2"></td>
          </tr>
        </table>
      </form>
</body></html>

bookadd.asp - 源码说明

本页面展示了「ASP+SQL Server的图书馆管理系统」中的 bookadd.asp 源码文件，采用 ASP 编程语言编写，共 110 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Server相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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