网上书店代码 wssd.asp wssd.rar

<HTML>

<HEAD>

<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb_2312-80">

<TITLE>网上书店</TITLE>

<BODY BACKGROUND="../cys.jpg">

<!--#include file="wssd_t.asp"-->

<%

'4.打开图书记录表

rs.open"select * from 图书记录表",cn,3

%>

<div align="center">

<center>

<table bordercolor="#0000FF" border="1" cellspacing="0" cellpadding="5">

<tr>

<td align="center">图书号</td>

<td align="center">图书名称</td>

<td align="center">作者</td>

<td align="center">出版社</td>

<td align="center">图书定价</td>

<td align="center">图书类别</td>

<td align="center">选购图书

</td>

</tr>

<%

'5.循环输出记录

do while not rs.eof

%>

<tr>

<td align="center"><% =rs("图书号")%></td>

<td align="center"><% =rs("图书名称")%></td>

<td align="center"><% =rs("作者")%></td>

<td align="center"><% =rs("出版社")%></td>

<td align="center"><% =rs("图书定价")%></td>

<td align="center"><% =rs("图书类别")%></td>

<td align="center">

<a href="tsdg.asp?yfcz=select&tsh=<%=rs("图书号")%>"><img border="0" src="xgwc.gif"></a>

<a href="tsdg.asp?yfcz=select&tsh=<%=rs("图书号")%>">购买</a>

</td>

</tr>

<%

'6.移到下一记录

if not rs.eof then rs.movenext

loop

 

'7.关闭 Recordset 对象

rs.close

 

'关闭连接,并释放 Recordset 对象

cn.close

set rs=nothing

%>

</table>

</center>

</div>

<p align="center">

<a href="../index.asp"><img border="0" src="../fhzy.gif"></a>

<a href="wssd.asp"><img border="0" src="../fhsy.gif"></a>

/p>

</BODY>

</HTML>