📄 readerview.asp
字号:
<!--#include File="ConnDB.asp"-->
<html>
<head>
<title>查看读者信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=style.css rel=STYLESHEET type=text/css>
</head>
<Script language="javascript">
function newOrder(url) {
var oth="toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,left=200,top=200";
oth = oth+",width=500,height=150";
var newOrder=window.open(url,"newOrder",oth);
newOrder.focus();
return false;
}
//放入购物车
function OpenBask(rdr_id){
var url;
url = "ReaderIn.asp?rdr_id=" + rdr_id;
newOrder(url);
}
</Script>
<body>
<%
set rs=server.createobject("adodb.recordset")
Dim id,iname
id = Request.QueryString("rdr_id")
sql = "Select * From reader_info Where rdr_id="&Cint(id)
Set rsreader_info = conn.Execute(sql)
If rsreader_info.Eof Then
Response.Write "没有此读者信息"
Response.End
Else
conn.Execute(sql)
%>
<form method="POST" name="form1">
<table border="1" width="100%" cellspacing="1" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF">
<tr>
<td><font color=blue>读者证号</font>
<%=rsreader_info("rdr_id")%></td>
</tr>
<tr>
<td><font color=blue>读者姓名</font>
<%=rsreader_info("rdr_name")%></td>
</tr>
<tr>
<td><font color=blue>读者类型</font>
<%=rsreader_info("rdr_type")%></td>
</tr>
<tr>
<td><font color=blue>注册日期</font>
<%=rsreader_info("rdr_regtime")%></td>
</tr>
<tr>
<td colspan="1"><font color=blue>押金数</font>
<%=rsreader_info("rdr_deposit")%></td>
</tr>
<tr>
<td colspan="1"><font color=blue>已借书数</font>
<%=rsreader_info("rdr_bktotal")%></td>
</tr>
<tr>
<td colspan="2"><font color=blue>超期欠款</font>
<%=rsreader_info("rdr_Arrearage")%></td>
</tr>
<tr>
<td colspan="1"><font color=blue>是否有效</font>
<%=rsreader_info("rdr_Entitle")%></td>
</tr>
<tr>
<td colspan="1"><font color=blue>备注</font>
<%=rsreader_info("Rdr_remark")%></td>
</tr>
</table>
<p align="center"><center>
<a href='javascript:OpenBask(<%=rsreader_info("rdr_id")%>)'></a><BR><BR>
<a href="javascript:window.close();">[关闭]</a></center></p>
</form>
<%End If%>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -