<link href="style.css" type="text/css" rel="stylesheet">
<!--#include file="conn.asp"-->
<div>請在左邊選擇操作</div><br><br><br>
<%if session("usertype")="" then
'response.Write"<script>alert('請先登陸');window.location.href('login.asp')" 
response.Redirect("login.asp")
end if%>
<%'最新圖書數據導出
sql="select top 10  * from book order by id desc "
set rs=server.CreateObject("adodb.recordset")
rs.open sql,db,1,3
'圖書類型到處
sql1="select * from booktype order by id desc "
set rs1=server.CreateObject("adodb.recordset")
rs1.open sql1,db,1,3
%>
<div>
<table width="593">
  <tr>
    <td>
	<table width="158" >
  <tr>
    <td background="images/a1.gif"><b>最新添加的圖書</b></td>
  </tr>
  <%do while not rs.eof %>
  <tr>
    <td align="left"><img src="images/topic.gif"><a href="book.asp?query=one_book&bookname=<%=rs("bookname")%>"><%=rs("bookname")%></a> </td>
  </tr><%rs.movenext
  loop%></table>
  </td>
    <td valign="top"><table width="158">
  <tr>
    <td background="images/21.gif"><b>圖書分類瀏覽</b></td>
  </tr><%do while not rs1.eof %>
  <tr>
    <td><img src="images/topic.gif">
	<a href="book.asp?query=books_of_type&booktype=<%=rs1("booktype")%>" target="right"><%=rs1("booktype")%></a></td>
  </tr><%rs1.movenext
  loop%>
</table>
</td>
<%'潮期用戶提醒
dim loan_time '現在時間和借書時間相差三十天則超期
loan_time = dateserial(year(date),month(date),day(date)-30)'轉換日期格式2007-3-31，函數參考topic.csdn.net 

sql2="select book.bookname as b_name,* from loans,u ,book where loans.time <'"&loan_time&"'   and u.id=loans.uid and book.id=loans.bid "
set rs2=server.CreateObject("adodb.recordset")
rs2.open sql2,db,1,3

if not rs2.eof then
sql3="select * from u where id="&rs2("uid")
set rs3=server.CreateObject("adodb.recordset")
rs3.open sql3,db,1,3
%>
    <td valign="top"><table width="158">
  <tr>
    <td background="images/1.gif"><b>超期用戶提醒</b></td>
  </tr><%do while not rs2.eof%>

  <tr>
    <td><img src="images/topic.gif"><%=rs3("name")%>:請速還{<%=rs2("b_name")%>}<br>
	</td>
  </tr><%rs2.movenext
  loop%>
  <%else
  %><tr>
    <td><img src="images/topic.gif">當前沒有超期用戶<br>
	</td>
  </tr><%end if%>
</table>
</td>
  </tr>
</table><br>@圖書管理系統(tǒng) 版權所有</div>