您现在的位置: 军旅同心 >> 读书赏析 >> 学习园地 >> 电脑网络 >> 技术文章 >> 文章正文
网上“店铺”DIY(2)
作者:采集员 文章来源:来源于网络 点击数: 更新时间:2005-9-10 13:57:36
/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>

上一页  [1] [2] 


 
免责声明:作品版权归所属媒体与作者所有!!本站刊载此文不代表同意其说法或描述,仅为提供更多信息。如果您认为我们侵犯了您的版权,请告知!本站立即删除。有异议请联系我们。
文章录入:烟灰缸    责任编辑:烟灰缸 
  • 上一篇文章:
  • 下一篇文章:
  • 网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)
    | 设为首页 | 加入收藏 | 联系站长 | 友情链接 | 版权申明 | 网站公告 | 管理登录 |