/form>
<%
i=0
do while not rs.EOF and i<rs.PageSize
i=i+1
Response.Write "<tr>"
'Response.Write "<td>" & rs.Fields("ID") & "</td>" %>
<td><a href="javascript:openwindow(<% =rs.Fields("ID") %>)"><%
=rs.Fields("Name") %></a></td>
<% Response.Write "<td>" & rs.Fields("Author") & "</td>"
Response.Write "<td>" & rs.Fields("Publisher") & "</td>"
Response.Write "<td>" & rs.Fields("Price") & "</td>"
Response.Write "<td>订购</td>"
Response.Write "</tr>"
rs.MoveNext
loop
Response.Write "</table>"
end if
rs.Close
end if %>
<TD width="20%" valign=top bordercolor=orangered bgcolor=beige>
<form method=post action="in.asp" id=login name=login>
<p align=center>
会员登录</p><p align=center>用户<INPUT
id=text1 name=txtUser size=12>
<br>
密码<INPUT id=text2 name=txtPWD size=12 type=password></p>
<P align=center><INPUT id=cmdLogon name=cmdLogon type=submit value=进
入><INPUT id=cmdReg name=cmdReg type=button value=申请
onclick=window.location.href="registry.asp"></form></P>
<%
' session("num_book")=session("num")
' if session("num_book")<>"" then
' num_book=clng(session("num_book"))
' response.write "<table border=1 width=100%><tr><td>书号</td><td>单
价</td><td>数量</td></tr>"
' for i=0 to num_book
' response.write "<tr><td>" & session("ID_" & cstr(num_book))
& "</td><td>" & session("price_" & cstr(num_book)) & "</td><td>" &
session("num_" & cstr(num_book)) & "</td></tr>"
' next
' response.write "</table>"
' end if
%>
<P>为了您获得更优惠的价格,请您申请成为我们的会员,并在此进行登录。</P>
<p>付账方式:采用邮局付款或送货上门方式。
</p></TD></TR></TBODY></TABLE></P>
<p align=center><font size=2 color=blue>本站所包括文字和图片版权归于爱武
所有,未经许可,不得抄录<br>于爱武</font></p>
</BODY>
</HTML>
<%
i=0
do while not rs.EOF and i<rs.PageSize
i=i+1
Response.Write "<tr>"
'Response.Write "<td>" & rs.Fields("ID") & "</td>" %>
<td><a href="javascript:openwindow(<% =rs.Fields("ID") %>)"><%
=rs.Fields("Name") %></a></td>
<% Response.Write "<td>" & rs.Fields("Author") & "</td>"
Response.Write "<td>" & rs.Fields("Publisher") & "</td>"
Response.Write "<td>" & rs.Fields("Price") & "</td>"
Response.Write "<td>订购</td>"
Response.Write "</tr>"
rs.MoveNext
loop
Response.Write "</table>"
end if
rs.Close
end if %>
<TD width="20%" valign=top bordercolor=orangered bgcolor=beige>
<form method=post action="in.asp" id=login name=login>
<p align=center>
会员登录</p><p align=center>用户<INPUT
id=text1 name=txtUser size=12>
<br>
密码<INPUT id=text2 name=txtPWD size=12 type=password></p>
<P align=center><INPUT id=cmdLogon name=cmdLogon type=submit value=进
入><INPUT id=cmdReg name=cmdReg type=button value=申请
onclick=window.location.href="registry.asp"></form></P>
<%
' session("num_book")=session("num")
' if session("num_book")<>"" then
' num_book=clng(session("num_book"))
' response.write "<table border=1 width=100%><tr><td>书号</td><td>单
价</td><td>数量</td></tr>"
' for i=0 to num_book
' response.write "<tr><td>" & session("ID_" & cstr(num_book))
& "</td><td>" & session("price_" & cstr(num_book)) & "</td><td>" &
session("num_" & cstr(num_book)) & "</td></tr>"
' next
' response.write "</table>"
' end if
%>
<P>为了您获得更优惠的价格,请您申请成为我们的会员,并在此进行登录。</P>
<p>付账方式:采用邮局付款或送货上门方式。
</p></TD></TR></TBODY></TABLE></P>
<p align=center><font size=2 color=blue>本站所包括文字和图片版权归于爱武
所有,未经许可,不得抄录<br>于爱武</font></p>
</BODY>
</HTML>