课程实训报告书
课程名称： 电子商务网站建设
* ** * *
学 号： 0 3
专业班级： 电商S09-2
系 （院）： 经济管理系
设计时间： 第14周
设计地点： 5408
成绩：
指导教师评语：
签名：吴代文
| 2011年11月 |
网上书店又名电子书店、线上书店和虚拟书店，其内涵都一样，都是利用信息技术、数字技术、虚拟技术和网络技术在因特网上进行图书贸易的一种新型书店，是图书出版发行的另一个新型市场。
二实训题目及要求
实训题目：设计一个网上书店系统，功能模块包括：登录和密码验证系统，商品信息维护系统和集成的购物车系统。
2.1 设计要求：
数据库设计：account表包括username、password、authlevel和name4个字段；shopingcart表包括username、productID和quantity;catalog表包括productID、name、description、image、listprice、numinstock和category；orde表包括orderID、username、productID、listprice、quantity和orderdate。
2.2 应用程序界面设计
2.21 登录和密码验证系统
1 系统功能与组成
2 数据库设计
3 实现用户登录功能
4 实现新用户注册功能
5 实现密码修改功能
2.22 商品信息维护系统
1 实现商品信息输入功能
2 实现商品信息修改功能
3 实现商品信息查询功能
2.23 集成的购物车系统
1 实现商品搜索功能
2 实现专门的放入购物车功能
3 完善购物车系统
4 实现下订单功能
三 需求分析与可行性分析
3.1需求分析
3.12网上购书的优势
(1)网上书店挤压盗版空间
(2)网上书店浓缩了图书的库存空间
(3)数量、种类多,出版时间跨度大
(4)不受时间、地域
(5)信息丰富
(6)多途径综合检索
(7)价格低廉
(8)个性服务
1.2 可行性分析
随着计算机技术的发展和网络人口的增加，网络世界也越来越广博，越来越丰富，电子商务已经成为网上的一股潮流。相信要不了太长有时间，顾客就可以在网络世界上获得他们在现实世界上可以获得的所有商品和服务。
可行性研究是为了弄清楚系统开发的项目是不是可以实现和值得进行研究的过程，实际上是一次大大简化系统分析和系统设计的过程，所以，进行可执行性的分析是非常必要的，也是很重要的，经过最初的设计目标和进行的市场调查得出以下四点的可行性分析
(1)经济：实现这个平台设计有没有什么经济效益。该平台设计只是作为本人的课程设计，=设计能力有限，其功能还不能完善，所以没有什么经济效益可谈。
(2)技术：现有的技术能否开发该平台，会有哪些困难。
(3)运行：该平台规定的运行方式是否可行。
(4)法律：该平台的开发会不会在社会上引起侵权或其它责任问题。因为该平台是作为课程设计与商业无关，又因为是自主开发设计，因此不会构成侵权，在法律上是可行的。
四 整体图示
4.1 网站拓补结构图
4.2整体操作流程图
4.3功能模块描述
4.31销售模块
4.32会员操作模块
4.33 后台操作模块
五 实训步骤
5.1数据库设计
本系统选择的是SQL数据库，采用导出sql脚本的方式，便于检查和移植，修改方便。
设计表如下图：
数据库连接代码如下：
<%
' FileName="Connection_odbc_conn_dsn.htm"
' Type="ADO"
' DesigntimeType="ADO"
' HTTP="false"
' Catalog=""
' Schema=""
Dim MM_PurchaseSys_STRING
MM_PurchaseSys_STRING = "dsn=PurchaseSys;"
%>
5.2 用户登录
成功登录代码如下：
MM_loginSQL = "SELECT username, password"
If MM_fldUserAuthorization <> "" Then MM_loginSQL = MM_loginSQL &
MM_loginSQL = MM_loginSQL & " FROM accout WHERE username = ? AND password = ?"
Set MM_rsUser_cmd = Server.CreateObject ("ADODB.Command")
MM_rsUser_cmd.ActiveConnection = MM_PurchaseSys_STRING
MM_rsUser_cmd.CommandText = MM_loginSQL
MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param1", 200, 1, 50, MM_valUsername) ' adVarChar
MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param2", 200, 1, 50, Request.Form("password")) ' adVarChar
MM_rsUser_cmd.Prepared = true
Set MM_rsUser = MM_rsUser_cmd.Execute
用户注册界面如下：
注册成功的代码如下：
<%
' *** Redirect if username exists
MM_flag = "MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
Dim MM_rsKey
Dim MM_rsKey_cmd
MM_dupKeyRedirect = "registerexist.asp"
MM_dupKeyUsernameValue = CStr(Request.Form("username"))
Set MM_rsKey_cmd = Server.CreateObject ("ADODB.Command")
MM_rsKey_cmd.ActiveConnection = MM_PurchaseSys_STRING
MM_rsKey_cmd.CommandText = "SELECT username FROM accout WHERE username = ?"
MM_rsKey_cmd.Prepared = true
MM_rsKey_cmd.Parameters.Append MM_rsKey_cmd.CreateParameter("param1", 200, 1, 50, MM_dupKeyUsernameValue) ' adVarChar
Set MM_rsKey = MM_rsKey_cmd.Execute
If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then
' the username was found - can not add the requested username
MM_qsChar = "?"
If (InStr(1, MM_dupKeyRedirect, "?") >= 1) Then MM_qsChar = "&"
MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValue
Response.Redirect(MM_dupKeyRedirect)
End If
MM_rsKey.Close
End If
%>
5.3 添加书籍
添加书籍代码：
<% String mesg = "";
String submit = request.getParameter("Submit");
if (submit!=null && !submit.equals("")){
if(book.getRequest(request)){
if(book.insert()){
mesg = "新图书资料提交成功！";
界面如下：
5.4 查看商品
查看商品的代码如下：
If (MM_size > 1) Then
MM_moveParam = "offset"
If (MM_keepMove <> "") Then
MM_paramList = Split(MM_keepMove, "&")
MM_keepMove = ""
For MM_paramIndex = 0 To UBound(MM_paramList)
MM_nextParam = Left(MM_paramList(MM_paramIndex), InStr(MM_paramList(MM_paramIndex),"=") - 1)
If (StrComp(MM_nextParam,MM_moveParam,1) <> 0) Then
MM_keepMove = MM_keepMove & "&" & MM_paramList(MM_paramIndex)
End If
Next
If (MM_keepMove <> "") Then
MM_keepMove = Right(MM_keepMove, Len(MM_keepMove) - 1)
End If
界面如下：
5.5 购买商品
选择商品并成功放入购物车的代码：
<%
' *** Redirect if username exists
MM_flag = "MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
Dim MM_rsKey
Dim MM_rsKey_cmd
MM_dupKeyRedirect = "alreadybuy.asp"
MM_dupKeyUsernameValue = CStr(Request.Form("select"))
Set MM_rsKey_cmd = Server.CreateObject ("ADODB.Command")
MM_rsKey_cmd.ActiveConnection = MM_PurchaseSys_STRING
MM_rsKey_cmd.CommandText = "SELECT productID FROM shopingcart WHERE productID = ?"
MM_rsKey_cmd.Prepared = true
MM_rsKey_cmd.Parameters.Append MM_rsKey_cmd.CreateParameter("param1", 200, 1, 50, MM_dupKeyUsernameValue) ' adVarChar
Set MM_rsKey = MM_rsKey_cmd.Execute
If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then
' the username was found - can not add the requested username
MM_qsChar = "?"
If (InStr(1, MM_dupKeyRedirect, "?") >= 1) Then MM_qsChar = "&"
MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValue
Response.Redirect(MM_dupKeyRedirect)
End If
MM_rsKey.Close
End If
%>
<%
If (CStr(Request("MM_insert")) = "form1") Then
If (Not MM_abortEdit) Then
' execute the insert
Dim MM_editCmd
Set MM_editCmd = Server.CreateObject ("ADODB.Command")
MM_editCmd.ActiveConnection = MM_PurchaseSys_STRING
MM_editCmd.CommandText = "INSERT INTO shopingcart (productID, quantity) VALUES (?, ?)"
MM_editCmd.Prepared = true
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202, 1, 50, Request.Form("select")) ' adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 202, 1, 50, Request.Form("textfield")) ' adVarWChar
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close
' append the query string to the redirect URL
Dim MM_editRedirectUrl
MM_editRedirectUrl = "showcart.asp"
If (Request.QueryString <> "") Then
If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then
MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
End If
End If
Response.Redirect(MM_editRedirectUrl)
End If
End If
%>
界面如下图：
六 实训心得
这次实训，虽然时间不是很长，仅仅为期五天，但是我受益匪浅，这次实训，让我对网上书店系统有了更深的了解，对此次实训，颇有体会。
本次实训主要任务是设计登录和密码验证系统，商品信息维护系统和集成的购物车系统三个模块，构成一个小型网站。网站系统实现了前台功能和后台的管理功能，后台系统实现主要功能有：图书的管理、前台首页的管理、添加管理员、定单管理、公告管理、管理员登录；前台实现主要功能有：填写定单、图书的查看、用户的登录、添加用户、修改密码。后台主要是对前台所显示的内容进行添加、删除、修改等操作。对于网上书店还应该实现图书的收藏、购物车、个人信息的管理等功能。
由于时间和能力有作的系统还很粗糙，有许多需要改进的地方。要想在短暂的实训时间内，尽可能能多的学一些东西，这就需要我们跟老师有很好的沟通，多多询问。
这次实训让我感觉最难的是编写代码，虽然有指导文档，而且也挺具体的，但是最后却得不到自己想要的结果，经过多次的尝试和努力才勉强有些小的进展。
“纸上得来终觉浅，绝知此事要躬行！”在短暂的实习过程中，让我深深的感觉到自己在实际运用中的专业知识的匮乏。让我们真正领悟到“学无止境”的含义。在进行实训的过程中，我真正学到了计算机教科书上所没有或者真正用到了课本上的知识，这样，既巩固了旧知识，又掌握了新知识。
此外，在此次实训的过程中，给我感受最深的就是我们设计一个小型网站，包括项目的需求分析，网络拓扑图的制作以及网络搭建方案的撰写，还要上网搜查相关配件。在这些过程中，我不仅知道了相关网站连接的技术，而且让我深深的体会到一个设计方案的重要性，他不仅要考虑到技术问题，还要考虑实用问题。
这次实训让我学到的东西太多，使我受益非浅。虽然辛苦了点，但能让我学到不同的东西，我心里还是高兴的。人非生而知之，要学得知识，一靠学习，二靠实践。没有实践，学习就是无源之水，无本之木。
总之，这次实训中我们解决了许多书本中没有遇到的问题，也真正了解了网络中的实际操作，学到了许多网页技能。
短暂的实训课就结束了，从中我学到了许多东西，从书本上的知识运用到实际动手操作上来，收获颇多在进行实训的过程中，我真正学到了计算 机教科书上所没有或者真正用到了课本上的知识，这样，既巩固了旧知识，又掌握了新知识。，不仅提高了自己的动手能力，更体会到了团体合作的精神。更加深入的了解了计算机网络技术的实际应用。为我们将来的实践打下了良好的基础。
以上就是我在实训的心得和感受。 下载本文
