|网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司|--一个简单的网上书城的例子（三）！

建站必读

网站建设知识

网站推广研究

当前位置：首页 -> 建站必读 -> ASP技术

一个简单的网上书城的例子（三）！

buy.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>

本站关键词：

|网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司||网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司||网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司||网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司||网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司||网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司||网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司||网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司||网站开发东莞|网络公司东莞|东莞做网站|东莞连邦软件|网页设计公司|东莞软件销售|东莞.com域名注册|东莞.cn域名注册|东莞雅虎推广|东莞网站建设|东莞网页设计|东莞网络公司|