📄 mod_card.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%>
<% '接收页面传递过来的卡号值
card_id=Request.QueryString("card_id")
%>
<HEAD>
<TITLE>图书馆管理系统</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="../css/scss.css" type=text/css rel=stylesheet>
<style TYPE="text/css">
<!--
.in
{
BORDER-RIGHT: rgb(127,127,127) 1px solid;
BORDER-TOP: rgb(127,127,127) 1px solid;
FONT-SIZE: 9pt;
BORDER-LEFT: rgb(127,127,127) 1px solid;
BORDER-BOTTOM: rgb(127,127,127) 1px solid;
BACKGROUND-COLOR: #ffffff
}
//-->
</STYLE>
</HEAD>
<BODY text=#000000 bgColor=#f7f7f7 leftMargin=0 topMargin=40 >
<DIV ID="commentsboard" CLASS="popcomments"> </DIV>
<center><h4>图书借阅信息</h4></center>
<%'获取书籍借阅的信息
sql="select * from lend_book where card_id='"&card_id&"'"
set rs=session("cn").execute(sql)
%>
<center>
<table cellpadding=0 align=center bordercolor="#006666"
width=90% border=0>
<tr bgcolor=#cccccf height=20>
<th>书籍编号</th>
<th>书籍名称</th>
<th >借阅时间</th>
<th >返回时间</th>
</tr>
<%
do while not rs.eof
%>
<tr align=left bgcolor=#e4eaef>
<td><%=rs("book_id")%></td>
<td><%=rs("book_name")%></td>
<td><%=rs("lend_time")%></td>
<td>
<%if isnull(rs("return_time"))=false then
Response.Write rs("return_time")
end if%>
</td>
</tr>
<%
rs.movenext
loop
rs.close()
set rs=nothing
%>
<tr>
<td height=30 align=middle valign=center
bgcolor=#f7f7f7 colspan=4>
<input type=button name=butt value=" 关闭 " class=in
onclick="javascript:window.close()">
</td>
</tr>
</table>
</center>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -