|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
buy.asp:显示商品和用户购物! <!--#include file="Util.asp" --> <% DbPath = SERVER.MapPath("ShopBag.mdb") Set conn = Server.CreateObject("ADODB.Connection") conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DbPath CategoryID=Request("CategoryID") Description=Request("Description") Head="会文书城[" & Description & "] 区" sql = "Select * From Products Where CategoryID=" & CategoryID sql = sql & " Order By ProductID" Set rs = conn.Execute( sql ) %> <HTML> <HEAD><TITLE><%=Head%></TITLE></HEAD> <BODY BACKGROUND="b01.jpg"> <font color=blue><H2 ALIGN=CENTER><%=Head%></H2></font> <CENTER> <Form Action=Add.asp Method=POST> <TABLE Border=1> <TR BGCOLOR=#00FFFF> <TD>挑选</TD><TD>书刊编号</TD><TD>书刊名称</TD><TD>价格</TD><TD>书刊简介</TD></TR> <% While Not rs.EOF IsCheck="" If InStr(Session("ProductList"), rs("ProductID")) > 0 Then IsCheck="Checked" End If %> <TR> <TD Align=Center> <Input Type=CheckBox Name="ProductID" Value="<%=rs("ProductID")%>" <%=IsCheck%>> </TD> <TD><%=rs("ProductID")%></TD> <TD><%=rs("ProductName")%></TD> <TD Align=Right><%=rs("Price")%></TD> <TD><A HREF=<%=rs("Link")%>><%=rs("Description")%></A></TD> </TR> <% rs.MoveNext Wend %> </TABLE> <Input Type=Submit Value="放入购物袋"> </Form> <HR width=70%> <A HREF=Check.asp>查看购物袋</A> <A HREF=Clear.asp>退回所有物品</A><P> <% ListCategory conn %> </CENTER> </BODY> </HTML> 返回类别: 教程 上一教程: 利用XMLHTTP无刷新添加数据之POST篇 下一教程: 备份与恢复SQL SERVER 您可以阅读与"一个简朴的网上书城的例子(三)"相关的教程: · 一个简朴的网上书城的例子(一) · 一个简朴的网上书城的例子(四) · 一个简朴的网上书城的例子(五) · 一个简朴的网上书城的例子(三) · 一个简朴的网上书城的例子(六) |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |