当前位置: 首页 > 图文教程 > 网络编程 > ASP > 网上“店铺”DIY(2)

ASP
JS复制特定内容到粘贴板
ASP+Access数据库安全设置方法小结
ADSI+ASP添加IP到IIS禁止访问列表中
ASP Google的translate API代码
最小asp后门程序
asp xml 缓存类
asp 过滤尖括号内所有内容的正则代码
ASP去掉字符串头尾连续回车和空格的Function
ASP IE地址栏参数的判断
SQL 注入式攻击的终极防范
ASP也使用ORM,给ASP上所有的SQL注入画上句号
判断Session的过期时间 采用JavaScript实时显示剩余多少秒
asp 动态生成rss(不成生xml文件)代码
ASP XML制作菜单管理程序
asp之自动闭合HTML/ubb标签函数附简单注释
asp 读取文件和保存文件函数代码
asp 随机字符串函数
asp form 表单验证函数
ASP 循环导入导出数据处理 不使用缓存
asp 数据库连接函数代码

ASP 中的 网上“店铺”DIY(2)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 159 ::
收藏到网摘: 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
字符
登录密码

Email
字符
 
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