📄 search_blank.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/conn.asp" -->
<%
set rs_search=Server.CreateObject("ADODB.RecordSet")
sql="SELECT BookID, BookName, Writer, Price FROM DB_bookinfo WHERE bookName='Visual FoxPro数据库开发实例解析'"
rs_search.open sql,conn,3,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>
<style>
<!--
td { font-size: 9pt;font_name:宋体;; line-height: 16pt}
a:hover { color: #ff0000; text-decoration: underline; font-size: 9pt }
a { font-size: 9pt; color: #0000FF; text-decoration: none }
p { font-size: 9pt; font-family: "宋体"; line-height: 11pt}
-->
</style>
</head>
<body background="images/bg_listmain.jpg" leftmargin="0" topmargin="0">
<table width="535" border="0" cellspacing="-1" cellpadding="-1">
<tr>
<td height="37" align="center" valign="top"><table width="97%" height="49" border="0" align="right" cellpadding="-2" cellspacing="-2">
<tr>
<td height="25" width="19%"> <div align="center"><strong>书号</strong></div></td>
<td width="43%" height="25"> <div align="center"><strong>书名</strong></div></td>
<td width="19%"><div align="center"><strong>作者</strong></div></td>
<td height="25" width="12%"> <div align="center"><strong>单价</strong></div></td>
<td width="7%" height="25"> </td>
</tr>
<%
'分页'
rs_search.pagesize=7
page=CLng(Request("page"))
if page<1 then page=1
rs_search.absolutepage=page
for i=1 to rs_search.pagesize %>
<tr>
<td><%=(rs_search.Fields.Item("BookID").Value)%></td>
<td ><%=(rs_search.Fields.Item("BookName").Value)%></td>
<td ><%=(rs_search.Fields.Item("Writer").Value)%></td>
<td><div align="right"><%=(rs_search.Fields.Item("Price").Value)%>（元）</div></td>
<td align="center"> <a href="buycar_add.asp?bookID=<%= rs_search.Fields("bookID").value %>" target="_blank"><img src="images/add.gif" alt="添加至购物车" width="18" height="18" border="0"></a></td>
</tr>
<%
rs_search.movenext
if rs_search.eof then exit for
next %>
</table></td>
</tr>
</table>
<table width="535" border="0" cellspacing="-1" cellpadding="-1">
<tr>
<td width="270" height="27">
<% if page<>1 then %><a href=<%=path%>?page=1>第一页</a>
<a href=<%=path%>?page=<%=(page-1)%>>上一页</a>
<%end if
if page<>rs_search.pagecount then %>
<a href=<%=path%>?page=<%=(page+1)%>>下一页</a>
<a href=<%=path%>?page=<%=rs_search.pagecount%>>最后一页</a>
<%end if %>
</div></td>
</tr>
</table>
<table width="535" height="40" border="0" cellpadding="-1" cellspacing="-1">
<tr>
<td>
<div align="center">
<% If rs_search.EOF And rs_search.BOF Then %>
<strong>无符合条件的记录！</strong>
<% End If %>
</div></td>
</tr>
</table>
</body>
</html>
<%
rs_search.Close()
Set rs_search = Nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -