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

📄 noreturn.asp

📁 图书馆模拟管理系统,对里面的功能简单容易懂,一看就会,是学习asp的好东西!
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="inc/conn.asp"-->

<html>
<head>

<style type="text/css">
<!--
body {
	font-size:10pt;
	
}
td {font-size:9pt}
table{font-size:9pt}
-->
</style>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<!--#include file="head.asp"-->

<table width="980" border="0" cellpadding="0" cellspacing="0" align="center">
  <!--DWLayoutTable-->
  <tr>
    <td height="14" colspan="2" valign="top">
	  <table width="100%" border="0" cellpadding="0" cellspacing="0">
        <!--DWLayoutTable-->
        <tr>
          <td width="980" height="14">&nbsp;</td>
        </tr>
              </table></td>
  </tr>
  <tr>
    <td width="220" rowspan="3" valign="top">
	<table width="100%" border="0" cellpadding="0" cellspacing="0">
      <!--DWLayoutTable-->
      <tr>
        <td width="139" height="250"><!--#include file="left.htm"--></td>
      </tr>
    </table></td>
    <td width="760" height="36" valign="top">
	<table width="100%" border="0" cellpadding="0" cellspacing="0">
      <!--DWLayoutTable-->
      <tr>
        <td width="760" height="36"><div align="center"><font color="#E8A477" size="+2"><strong>你未还的书如下</strong></font></div></td>
      </tr>
	  <tr><td width="100%"><hr></td></tr>
    </table></td>
  </tr>
  <tr>
    <td height="36" valign="top">
	<table width="100%" border="0" cellpadding="0" cellspacing="0">
        <!--DWLayoutTable-->
        <tr>
          <td width="760" height="36">
		    <table width="100%">
			   <tr>
			      <Td width="20%" bgcolor="#F9AE86">图书名称</Td>
				  <Td width="20%" bgcolor="#F9AE86">图书编号</Td>
				  <Td width="11%" bgcolor="#F9AE86">作者</Td>
				  <Td width="22%" bgcolor="#F9AE86">出版社</Td>
				  <Td width="16%" bgcolor="#F9AE86">图书类别</Td>
				  <td width="11%" bgcolor="#F9AE86">归还</td>
			   </tr>
			    <tr><%
					dim i
					set rs=server.CreateObject("adodb.recordset")
	                rs.open "select top 8 author,name,id,class,press from borrow where stuid='" & session("id") & "' and ifreturn=0 order by id desc",conn,1,1
	               if rs.eof and rs.bof then 
				    %>
		         <td >对不起,<font color="red"><%=session("id")%></font>到现在为止还没有借书,欢迎你借阅图书!</td>
						
						
						
		           <%
				   end if
		           i=0
		           do while not rs.eof
                   %>
				   </tr>
			   <tr>
			      <td bgcolor="#E8E8E8"><%= rs("name") %></td>
				  <td bgcolor="#E8E8E8"><%= rs("id") %></td>
				  <td bgcolor="#E8E8E8"><%= rs("author") %></td>
				  <td bgcolor="#E8E8E8"><%= rs("press") %></td>
				  <td bgcolor="#E8E8E8"><%= rs("class") %></td>
			      <td bgcolor="#E8E8E8"><a href="return.asp?bookid=<%=rs("id")%>"><font color="#993333">归还</font></a></td>
			   </tr>
			   <%
                       i=i+1
			           if i>=8 then exit do
			           if not rs.eof then  rs.movenext
			           loop
			           rs.close
                    %>		

			</table>
		  
		  </td>
        </tr>
    </table></td>
  </tr>
  <tr>
    <td height="217">&nbsp;</td>
  </tr>
</table>
<!--#include file="foot.htm"-->
</body>

</html>

⌨️ 快捷键说明

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