繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 网上“店铺”DIY(2)
- ASP
- 分享一段代码show.asp?id=26变成show/?26的形式
- 多域名一网站时如果返回最原来的域名
- [原创]完美解决ASP 不能更新。数据库或对象为只读。
- 5天学会asp
- TSYS中生成静态页时溢出: ''CInt''
- 对象标记具有无效的 ''MSWC.MyInfo'' ProgID
- [原创]随机增加网站点击的一个不错的方法
- Microsoft JET Database Engine 错误 ''80004005'' 未指定的错误的完美解决方法
- 反SPAM新思路—换Z-BLOG的验证码！
- 七步倒┈→专用asp后门
- asp下实现代码的“运行代码”“复制代码”“保存代码”功能源码
- 使用ASP实现网站的“目录树”管理的代码
- ShowPage 显示“上一页 下一页”等信息的封装代码
- [原创]站长感慨asp编程究竟何去何从
- 响应对象 错误 ''ASP 0185 : 80020003'' 缺少默认属性
- [原创]asp下用实现模板加载的的几种方法总结
- [原创]asp获取URL参数的几种方法分析总结
- Access数据库中“所有记录中均未找到搜索关键字”的解决方法
- ASP程序中输出Excel文件实例一则
- ASP应用中如何限制同一表单被多次提交
ASP 中的 网上“店铺”DIY(2)
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 163 ::
收藏到网摘: n/a
项目结构：
该项目主要由几个ASP文件和一个数据库组成：
book.mdb：存放数据库的内容
index.asp：网站主要的文件，大部分的内容均由它来显示
buy.asp：购物蓝的内容
in.asp：供登录使用
registry.asp：使您成为我们的会员
数据库（book.mdb）：
第一个表是Book，用于存储关于书目的一些相关的信息，结构如下：
ID
整型
书的序号
Name
字符
书的名字
Author
字符
作者
Brief
字符
简介
Ifcover
整型
是否首页显示
Price
双精度
价格
Publisher
字符
出版社
Cover
字符
封面的图片的路径
Flag
整型
标志
第二个表是info，用于存储会员的信息，结构如下：
Id
字符
会员登录号
Name
字符
会员姓名
Pwd
字符
登录密码
字符
Address
字符
地址
Phone
字符
电话
Post
字符
邮编
Sfz
字符
身份证号码
第三个表是class，用于存储书目的类别，其结构如下：
ID
字符
编号
Name
字符
类别
几个ASP文件的内容：
Index.asp
<!--
分三个TD，最主要的中间的一个，大多数操作都是对中间的一个。
-->
<%@ Language=VBScript %>
<script language=javascript>
function openwindow(num){
window.open ("info.asp?key=" + num,"yu",0,0)
}
</script>
<script language=javascript>
function buy(name){
window.open ("buy.asp?name=" + name ,"yu",0,0)
}
</script>
<script language=javascript>
function viewPage(ipage){
document.Page.txtPage.value=ipage
document.Page.submit()
}
</script>
<HTML>
<HEAD>
<title>网上书店</title>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY bgColor=lightcyan>
<P align=center><IMG alt="网上书店"
src="/upload/tech/20091103/20091103102632_9cc138f8dc04cbf16240daa92d8d50e2.jpg""><br>
<TABLE align=center border=0 cellPadding=0 cellSpacing=10
width="100%" style="BORDER-BOTTOM-COLOR: red; BORDER-LEFT-COLOR: red;
BORDER-RIGHT-COLOR: red; BORDER-TOP-COLOR: red">
<tr>
<td colspan=3>
<table border=1 width=100% bgcolor=Khaki cellpadding=0 cellspacing=0>
<tr>
<td bgcolor=MediumSeaGreen ><% =year(date()) & "年" & month(date)
& "月" & day(date) & "日" %></td>
<td bgcolor=MediumSeaGreen ><a href="about.htm">关于我们</a></td>
<td bgcolor=MediumSeaGreen ><a href=buy.asp?name=view>查询购物蓝
</a></td>
<%
if session("UserID")<>"" then
Response.Write "<td bgcolor=MediumSeaGreen> 会员：" & session
("UserName") & "</td>"
else
Response.Write "<td bgcolor=MediumSeaGreen>会员：未登录</td>"
end if
if session("sum")="" then session("sum")=0
Response.Write "<td bgcolor=MediumSeaGreen>购货总金额：" & session
("sum") & "</td>"
%>
</tr>
</table>
</td>
</tr>
<TR>
<TD width="15%" valign=top bordercolor=deeppink bgcolor=beige>
<A href=index.asp?ifcover=1><P align=center>
最新书目</a><br>
畅销书目<br>
<hr color=deeppink>
<P></P>
<p align=center>
图书分类<br>
<table border=1 cellspacing=0 cellpadding=0 width=100%>
<% set rs=server.Cr
评论 (0) All
