<%
Head="您尚未选购任何物品!"

DbPath = SERVER.MapPath("ShopBag.mdb")
Set conn = Server.CreateObject("ADODB.Connect">

一个简单的网上书城的例子(六)

80酷酷网    80kuku.com

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

<%
Head="您尚未选购任何物品!"

DbPath = SERVER.MapPath("ShopBag.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DbPath
%>

nothing.asp:处理用户察看但还没有购物的情况!

<HTML>

<HEAD><TITLE><%=Head%></TITLE></HEAD>
<BODY BACKGROUND="b01.jpg">
<H2 ALIGN=CENTER><%=Head%><HR></H2>
<CENTER>
<% ListCategory conn %>
</CENTER>
</BODY>
</HTML>












分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: