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

📄 hyquest_ok.asp

📁 《网上图书管理系统》 开发及测试环境 操作系统:Windows 2000 Server 后台数据库:Access 2000 Web服务器:IIS 5.0  系统在该环境下测试通过运行。
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/conn.asp" -->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM DB_Sell WHERE HYID = '" + session("UserID") + "'"
rs.Open sql,conn,3
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>会员购书情况查询!</title>
<link href="style.css" rel="stylesheet">
</head>
<body leftmargin="0" topmargin="0">
<table width="640" height="133" border="0" cellpadding="-1" cellspacing="-1">
  <tr>
    <td background="images/hyquest.gif">&nbsp;</td>
  </tr>
</table>
<table width="640" border="0" cellpadding="-1" cellspacing="-1"
 background="images/buycar_bottom.jpg">
  <tr>
  
    <td valign="top"> 
      <div align="center"> 
          &nbsp;
          <table width="97%" border="0" align="right" cellpadding="-1" cellspacing="-1">
            <tr> 
              <td height="37" valign="top"> 
                <table width="624" border="1" align="center" cellpadding="0"
				 cellspacing="0" bordercolor="#FFFFFF" bordercolorlight="#FFFFFF"
				  bordercolordark="#0099FF">
                  <tr>
                    <td width="80"><div align="center">OrderID</div></td>
                    <td width="82"><div align="center">书号</div></td>
                    <td width="166"><div align="center">书名</div></td>
                    <td width="38"><div align="center">单价</div></td>
                    <td width="38"><div align="center">数量</div></td>
                    <td width="45"><div align="center">金额</div></td>
                    <td width="93"><div align="center">购书日期</div></td>
                  </tr>
				<% '分页'
				rs.pagesize=7
				page=CLng(Request("page"))
				if page<1 then page=1
				rs.absolutepage=page
				for i=1 to rs.pagesize	%>
                  <tr>
                    <td>&nbsp;<%=(rs("OrderID"))%></td>
                    <td>&nbsp;<%=(rs("BookID"))%></td>
                    <td>&nbsp;<%=(rs("BookName"))%></td>
                    <td><div align="center"><%=(rs("Price"))%></div></td>
                    <td><div align="center"><%=(rs("bnumber"))%></div></td>
                    <td><div align="center"><%=(rs("sum"))%></div></td>
                    <td><div align="center"><%=(rs("OrderDate"))%></div></td>
                  </tr>
					<% rs.movenext
					if rs.eof then exit for 
				next %>

                </table>
                <table width="616" height="32" border="0" cellpadding="-2" cellspacing="-2">
                  <tr><td width="552">
				<% if page<>1 then %><a href=<%=path%>?page=1>第一页</a>
				<a href=<%=path%>?page=<%=(page-1)%>>上一页</a> 
				<%end if 
				if page<>rs.pagecount then %>
   				<a href=<%=path%>?page=<%=(page+1)%>>下一页</a> 
				<a href=<%=path%>?page=<%=rs.pagecount%>>最后一页</a> 
				<%end if %>				  </td>
                    <td width="64"><a href="member.htm">返回</a><a href="member.htm">&nbsp;<img src="images/MORE.GIF" width="30" height="9" border="0"></a></td>
                  </tr>
                </table>
			  </td>
			</tr>
		</table>
                <br>
      </div></td>
  </tr>
            <tr> 
              <td height="107" valign="top"> <table width="100%" border="0" 
			  align="center" cellpadding="-1" cellspacing="-1">
                <tr>
                  <td><div align="center">本站请用IE4.0或以上版本浏览,
				  800*600为最佳效果 <br>
        		  版权所有:长春市明日科技有限责任公司 <br>
        		  客户信箱:<a href="mailto:mingrisoft@sina.com">mingrisoft@sina.com
				  </a> 联系电话:0431-4972266</div></td>
                </tr>
              </table></td>
            </tr>
</table>
      </div></td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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