?? ambook.asp
字號:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<!--對用戶登錄身份進行判斷,非法用戶返回登錄頁面-->
<%if not session("user_session_id")=Session.SessionID then%>
<SCRIPT LANGUAGE=javascript>
parent.window.location.href="../default.asp"
</SCRIPT>
<%end if%>
<HEAD>
<TITLE>圖書館管理系統</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="../css/scss.css" type=text/css rel=stylesheet>
<title>圖書館管理系統</title>
</head>
<SCRIPT LANGUAGE=javascript>
<!--
function cli(book_id)
{
open("mbook.asp?book_id="+book_id,"newwin","toolbar=no,width=400,height=500,status=no,location=no,resizable=1,scrollbars=1;menubar=no,left=80,top=25")
}
function clik(book_id)
{
open("del_book.asp?book_id="+book_id,"newwin","toolbar=no,width=400,height=500,status=no,location=no,resizable=1,scrollbars=1;menubar=no,left=80,top=25")
}
//-->
</SCRIPT>
<body leftMargin=0 topMargin=0>
<!--#include file=../inc/top.asp-->
<br>
<table width="750" height="371" border="0" align="center"
cellpadding="0" cellspacing="0">
<tr>
<td valign=top width=160 height="390">
<table border="1" cellpadding="0" bordercolor="#111111"
cellspacing="0" width="100" align="center">
<tr align=center>
<td height=30>
<a href="book.asp?if=add">書籍信息添加</a>
</td>
</tr>
<tr align=center>
<td height=30>
<a href="ambook.asp?if=mod">書籍信息修改</a>
</td>
</tr>
<tr align=center>
<td height=30>
<a href="ambook.asp?if=del">書籍信息刪除</a>
</td>
</tr>
</table>
<p><br></p>
</td>
<td width="1" valign="top" bgcolor="#00CC00" height="390">
</td>
<td width="565" valign="top" height="390">
<%
if Request.QueryString ("if")<>"add" then
'接收數據
'查詢圖書信息
sql="select * from library_book "
sql=sql&" order by book_id"
set rs=session("cn").execute(sql)
%>
<table cellpadding=0 align=right
bordercolor="#006666" width=538>
<tr bgcolor=#cccccf>
<th width="79">書籍編號</th>
<th width="120">書籍名稱</th>
<th width=60>書籍作者</th>
<th width="90">出版社名</th>
<th width="80">圖書類別</th>
<th width="110">圖書位置</th>
<th width="40">是否返還</th>
</tr>
<%
do while not rs.eof
'查找書籍的組
sql="select book_team from library_team where team_id="&rs("team_id")
set team=session("cn").execute(sql)
book_team=team(0)
set team=nothing
%>
<tr align=left bgcolor=#e4eaef>
<%if rs("sf_return")="" or rs("sf_return")="N" then%>
<%if Request.QueryString ("if")="mod" then%>
<td><a href="javascript:cli('<%=rs("book_id")%>')">
<%=rs("book_id")%></td>
<%else%>
<td><a href="javascript:clik('<%=rs("book_id")%>')">
<%=rs("book_id")%></td>
<%end if%>
<%else%>
<td><%=rs("book_id")%></td>
<%end if%>
<td><%=rs("book_name")%></td>
<td><%=rs("book_author")%></td>
<td><%=rs("book_concern")%></td>
<td><%=book_team%></td>
<td><%=rs("stand")%>架<%=rs("floor")%>層</td>
<td>
<%if rs("sf_return")="" or rs("sf_return")="N" then%>
是
<%else%>
否
<%end if%>
</td>
</tr>
<%
rs.movenext
loop
rs.close()
set rs=nothing
%>
</table>
<%end if%>
</td>
</tr>
</table>
<hr width=700 color=green size=1>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -