?? book.asp
字號(hào):
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select>
日
<br>
<font color="#000000">
<select name="date11" id="date11">
<option value="01">01</option>
<option value="02">02</option>
<option value="03">03</option>
<option value="04">04</option>
<option value="05">05</option>
<option value="06">06</option>
<option value="07" selected="selected">07</option>
</select>
年
<select name="date22" id="select2">
<option value="1" selected>1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
</select>
月
<select name="date33" id="select3">
<option value="1" selected>1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select>
日 </td>
</tr>
<tr align="center">
<td colspan="2"><input name="active" type="hidden" id="active" value="yes">
<input type="submit" name="Submit" value="查詢(xún)">
<input type="reset" name="Submit2" value="重置"></td>
</tr>
</table>
</form>
<%end if
'查詢(xún)結(jié)束%>
<%'圖書(shū)分類(lèi)添加 過(guò)程：如果請(qǐng)求操作是分類(lèi)增加，首先判斷是否有請(qǐng)求類(lèi)型，有的話執(zhí)行添加，沒(méi)有就執(zhí)行輸入類(lèi)型
if request("query")="type_add" then
if request("booktype")<>"" then
set rs=server.createobject("adodb.recordset")
sql="select * from booktype where booktype='"&request("booktype")&"'"
rs.open sql,db,1,3
if not rs.eof or not rs.bof then
response.write "<script language=javascript>alert('已經(jīng)有這個(gè)分類(lèi)');history.back(-1)</script>"
else
rs.addnew
rs("booktype")=request("booktype")
rs.update
rs.close
set rs=nothing
response.redirect ("book.asp?query=all_type")
end if
else'如果分類(lèi)增加得到確認(rèn)但是沒(méi)有數(shù)據(jù),提示輸入
if request("add")="add" then
response.write "<script language=javascript>alert('分類(lèi)增加得到確認(rèn)但是沒(méi)有數(shù)據(jù),提示輸入~');history.back(-1)</script>"
end if
%>
<table width="88%" border="0" align="center" cellpadding="5" cellspacing="0">
<tr>
<td align="center" >添 加 分 類(lèi) </td>
</tr><form name="form1" method="post" action="">
<tr>
<td height="61" align="center">
<input name="booktype" type="text" id="booktype">
<input type="submit" name="Submit" value="添加">
<input type="hidden" name="add" value="add">
</td>
</tr></form>
</table>
<%end if%>
<%end if
'圖書(shū)分類(lèi)添加結(jié)素%>
<%'分類(lèi)刪除 確認(rèn)該分類(lèi)下已經(jīng)沒(méi)有圖書(shū)了再刪除該分類(lèi)
if request("query")="type_del" then
if request("id")<>"" then
sql1="select * from booktype where id ="&request("id")
set rs1=db.execute(sql1)
qq="select * from book where booktype='"&rs1("booktype")&"'"
set rq=db.execute(qq)
if rq.eof or rq.bof then
sql="delete from booktype where id ="&request("id")
db.execute(sql)
response.write "<script>alert('刪除成功');window.location.href='book.asp?query=all_type'</script>"
else '分類(lèi)下存在書(shū)，跳到該分類(lèi)下的書(shū)，如果還想繼續(xù)刪除該分類(lèi)的話
response.write "<script>alert('分類(lèi)下存在書(shū)，不能刪除');window.location.href='book.asp?query=books_of_type&booktype="&rs1("booktype")&"'</script>"
end if
else
%>
<form action="" method="post">請(qǐng)輸想刪除的分類(lèi)id:
<input name="id" type="text" size="15" value="">
<input type="submit" value="刪除">
<input type="reset" value="重置">
</form><a href="book.asp?query=all_type" target="right">瀏覽所有分類(lèi)</a>
<%end if %>
<%end if '分類(lèi)刪除結(jié)束%>
<%'圖書(shū)增加
if request("query")="book_add" then
sql="select * from booktype"
set rs=db.execute(sql)
%>
<%
if request("active")="" then
else
if request("name")="" or request("money")="" or request("num")="" or request("publishing")="" or request("select")="" then
response.write "<script>alert('輸入錯(cuò)誤');history.go(-1)</script>"
else
set rs2=server.createobject("adodb.recordset")
date1=request("date1")
date2=request("date2")
date3=request("date3")
qdate=date1&"-"&date2&"-"&date3
sql="select * from book"
rs2.open sql,db,1,3
rs2.addnew
rs2("bookname")=trim(request("name"))
rs2("bookmoney")=trim(request("money"))
rs2("num")=trim(request("num"))
rs2("publishing")=trim(request("publishing"))
rs2("pdate")=date1&"-"&date2&"-"&date3
rs2("booktype")=trim(request("select"))
rs2.update
response.write "<script>alert('添加圖書(shū)成功');window.location.href('book.asp?query=all_book')</script>"
end if
end if
%>
<form name="form1" method="post" action="">
<tr>
<td height="20" colspan="2" valign="top">
<br>
<table class=1 width="333" border="0" align="center" cellpadding="3" cellspacing="0">
<tr >
<td colspan="2" align="center">（添 加 圖 書(shū))</td>
</tr>
<tr align="center" >
<td width="35%">書(shū)名:</td>
<td width="65%">
<input name="name" type="text" id="name" size="15">
</td>
</tr>
<tr align="center" >
<td>分類(lèi):</td>
<td>
<select name="select">
<%
rs.movefirst
do while not rs.eof%>
<option value=<%=rs("booktype")%>><%=rs("booktype")%></option>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
</select>
</td>
</tr>
<tr align="center" >
<td>價(jià)格:</td>
<td>
<input name="money" type="text" id="money" size="10">
元</td>
</tr>
<tr align="center" >
<td>數(shù)量:</td>
<td>
<input name="num" type="text" size="15">
</td>
</tr>
<tr align="center" >
<td>出版社:</td>
<td>
<input name="publishing" type="text" id="publishing" size="15">
</td>
</tr>
<tr align="center" >
<td>出版日期:</td>
<td>
<select name="date1" id="date1">
<option value="01">01</option>
<option value="02">02</option>
<option value="03">03</option>
<option value="04">04</option>
<option value="05">05</option>
<option value="06">06</option>
<option value="07">07</option>
</select>
年
<select name="date2" id="date2">
<option value="1" selected>1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
</select>
月
<select name="date3" id="date3">
<option value="1" selected>1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select>
日</td>
</tr>
<tr align="center">
<td colspan="2">
<input type="submit" value="添加">
<input type="reset" value="重置">
<input name="active" type="hidden" id="active" value="yes">
</td>
</tr>
</table>
</td>
</tr></form>
</table>
<%end if
'圖書(shū)增加結(jié)束%>
<%'實(shí)現(xiàn)圖書(shū)的刪除,如果刪除操作執(zhí)行后書(shū)數(shù)量=0，刪除書(shū)的所有信息
if request("query")="del" then
if request("id")<>"" then 'id存在 直接執(zhí)行刪除
sql="update book set [num]=[num]-1 where id='"&request("id")&"'"
sql1="select * from book where id="&request("id")
db.execute(sql)
set rs1=db.execute(sql1)
db.execute("delete from book where id="&request("id"))
response.write "<script>alert('成功刪除');history.go(-1)</script>"
else'id不存在，輸入它
if request("del")<>"" then'如果刪除請(qǐng)求有但是沒(méi)有id，提示輸入id
response.write "<script>alert('刪除請(qǐng)求有但是沒(méi)有id')</script>"
end if
%>
<form action="" method="post">請(qǐng)輸想刪除的圖書(shū)id:
<input name="id" type="text" size="15" value="">
<input type="submit" value="刪除">
<input type="reset" value="重置">
<input type="hidden" name="del" value="del">
</form><a href="book.asp?query=all_book" target="right">瀏覽所有圖書(shū)</a>
<%
end if
end if
'圖書(shū)刪除結(jié)束%>
<%'圖書(shū)修改
if request("query")="mod" then
if request("id")<>"" then '如果請(qǐng)求id存在,導(dǎo)出該ID的圖書(shū)信息,否則返回錯(cuò)誤
if request("active")="yes" then'如果確認(rèn)更改操作,執(zhí)行更改,否則依然出現(xiàn)圖書(shū)信息.
sql="update book set bookname='"&request("name")&"',booktype='"&request("type")&"',publishing='"&request("publishing")&"',pdate='"&request("date")&"',bookmoney='"&request("money")&"',num='"&request("num")&"' where id="&request("id")
db.execute(sql)
response.write "<script>alert('修改成功');window.location.href='book.asp?query=all_book'</script>"
end if
set rs1=db.execute("select * from book where id="&request("id"))
%>
<form action="" method="post">
<table width="200" align="center">
<tr>圖書(shū)修改
</tr>
<tr>
<td>書(shū)名:</td>
<td><input name="name" type="text" id="name" size="15" value="<%=rs1("bookname")%>"></td>
</tr>
<tr>
<td>分類(lèi):</td>
<td>
<select name="type">
<%
q="select * from booktype"
set rs=db.execute(q)
%>
<option value="<%=rs1("booktype")%>"><%=rs1("booktype")%></option>
<%
do while not rs.eof
%>
<%if rs("booktype")<>rs1("booktype") then '防止分類(lèi)重復(fù)出現(xiàn)%>
<option value="<%=rs("booktype")%>"><%=rs("booktype")%></option>
<%end if%>
<%
rs.movenext
loop
%>
</select></td>
</tr>
<tr>
<td>價(jià)格:</td>
<td><input name="money" type="text" id="money" size="10" value="<%=rs1("bookmoney")%>"></td>
</tr>
<tr>
<td>數(shù)量:</td>
<td><input name="num" type="text" id="money" size="10" value="<%=rs1("num")%>"></td>
</tr>
<tr>
<td>出版社:</td>
<td><input name="publishing" type="text" id="publishing" size="15" value="<%=rs1("publishing")%>" ></td>
</tr>
<tr>
<td>出版日期:格式<%=rs1("pdate")%></td>
<td><input name="date" type="text" id="date" size="15" value="<%=rs1("pdate")%>" ></td>
</tr>
<tr>
<td><input type="submit" name="Submit3" value="修改">
<input name="id" type="hidden" id="id" value="<%=rs1("id")%>">
<input name="active" type="hidden" id="active" value="yes"></td>
<td><input type="reset" value="重置"></td>
</tr>
</table></form>
<%else response.Write"<script>alert('沒(méi)有指定圖書(shū)id');history.go(-1)</script>"
end if%><%end if'圖書(shū)修改結(jié)束%>
<br><br><br>
<div><a href="index.asp" target="right">首頁(yè)</a>
<a href="javascript:history.go(-1)" target="right">返回</a>
</div>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -