苏州市职业大学实习(实训)报告名称JSP商务网站设计实训年月日至年月日共1 周学院(部) 计算机工程学院班级 12网络技术2班学号 *********姓名樊祯超学院(部)负责人李金祥系主任周德富指导教师陈静朱敏目录目录 (2)一实训目的 (3)二实训题目及要求 (3)2.1 设计要求: (3)2.2 应用程序界面设计 (3)2.21 登录和密码验证系统 (3)2.22 商品信息维护系统 (4)2.23 集成的购物车系统 (4)三需求分析与可行性分析 (4)3.1需求分析 (4)3.12网上购书的优势 (4)1.2 可行性分析 (4)四整体图示 ....................................... 错误!未定义书签。
4.1 网站拓补结构图 (5)4.2整体操作流程图 (6)4.3功能模块描述 (6)4.31销售模块 (6)4.32会员操作模块 (7)4.33 后台操作模块 (7)五实训步骤 (8)5.1数据库设计 (8)5.2 用户登录 (9)5.3 添加书籍 (11)5.4 查看商品 (12)5.5 购买商品 (13)六实训心得 (16)一实训目的网上书店又名电子书店、线上书店和虚拟书店,其内涵都一样,都是利用信息技术、数字技术、虚拟技术和网络技术在因特网上进行图书贸易的一种新型书店,是图书出版发行的另一个新型市场。
二实训题目及要求实训题目:设计一个网上书店系统,功能模块包括:登录和密码验证系统,商品信息维护系统和集成的购物车系统。
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_STRINGMM_PurchaseSys_STRING = "dsn=PurchaseSys;"%>5.2 用户登录成功登录代码如下:MM_loginSQL = "SELECT username, password"If MM_fldUserAuthorization <> "" Then MM_loginSQL = MM_loginSQL & "," & MM_fldUserAuthorizationMM_loginSQL = MM_loginSQL & " FROM accout WHERE username = ? AND password = ?"Set MM_rsUser_cmd = Server.CreateObject ("mand")MM_rsUser_cmd.ActiveConnection = MM_PurchaseSys_STRINGMM_rsUser_mandText = MM_loginSQLMM_rsUser_cmd.Parameters.AppendMM_rsUser_cmd.CreateParameter("param1", 200, 1, 50, MM_valUsername) ' adVarCharMM_rsUser_cmd.Parameters.AppendMM_rsUser_cmd.CreateParameter("param2", 200, 1, 50, Request.Form("password")) ' adVarCharMM_rsUser_cmd.Prepared = trueSet MM_rsUser = MM_rsUser_cmd.Execute用户注册界面如下:注册成功的代码如下:<%' *** Redirect if username existsMM_flag = "MM_insert"If (CStr(Request(MM_flag)) <> "") ThenDim MM_rsKeyDim MM_rsKey_cmdMM_dupKeyRedirect = "registerexist.asp"MM_dupKeyUsernameValue = CStr(Request.Form("username"))Set MM_rsKey_cmd = Server.CreateObject ("mand")MM_rsKey_cmd.ActiveConnection = MM_PurchaseSys_STRINGMM_rsKey_mandText = "SELECT username FROM accout WHERE username = ?"MM_rsKey_cmd.Prepared = trueMM_rsKey_cmd.Parameters.AppendMM_rsKey_cmd.CreateParameter("param1", 200, 1, 50, MM_dupKeyUsernameValue) ' adVarCharSet MM_rsKey = MM_rsKey_cmd.ExecuteIf Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then' the username was found - can not add the requested usernameMM_qsChar = "?"If (InStr(1, MM_dupKeyRedirect, "?") >= 1) Then MM_qsChar = "&" MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValueResponse.Redirect(MM_dupKeyRedirect)End IfMM_rsKey.CloseEnd 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) ThenMM_moveParam = "offset"If (MM_keepMove <> "") ThenMM_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) ThenMM_keepMove = MM_keepMove & "&" & MM_paramList(MM_paramIndex) End IfNextIf (MM_keepMove <> "") ThenMM_keepMove = Right(MM_keepMove, Len(MM_keepMove) - 1)End If界面如下:5.5 购买商品选择商品并成功放入购物车的代码:<%' *** Redirect if username existsMM_flag = "MM_insert"If (CStr(Request(MM_flag)) <> "") ThenDim MM_rsKeyDim MM_rsKey_cmdMM_dupKeyRedirect = "alreadybuy.asp"MM_dupKeyUsernameValue = CStr(Request.Form("select"))Set MM_rsKey_cmd = Server.CreateObject ("mand")MM_rsKey_cmd.ActiveConnection = MM_PurchaseSys_STRINGMM_rsKey_mandText = "SELECT productID FROM shopingcart WHERE productID = ?"MM_rsKey_cmd.Prepared = trueMM_rsKey_cmd.Parameters.AppendMM_rsKey_cmd.CreateParameter("param1", 200, 1, 50, MM_dupKeyUsernameValue) ' adVarCharSet MM_rsKey = MM_rsKey_cmd.ExecuteIf Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then' the username was found - can not add the requested usernameMM_qsChar = "?"If (InStr(1, MM_dupKeyRedirect, "?") >= 1) Then MM_qsChar = "&" MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValueResponse.Redirect(MM_dupKeyRedirect)End IfMM_rsKey.CloseEnd If%><%If (CStr(Request("MM_insert")) = "form1") ThenIf (Not MM_abortEdit) Then' execute the insertDim MM_editCmdSet MM_editCmd = Server.CreateObject ("mand")MM_editCmd.ActiveConnection = MM_PurchaseSys_STRINGMM_mandText = "INSERT INTO shopingcart (productID, quantity) VALUES (?, ?)"MM_editCmd.Prepared = trueMM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202, 1, 50, Request.Form("select")) ' adVarWCharMM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2",202, 1, 50, Request.Form("textfield")) ' adVarWCharMM_editCmd.ExecuteMM_editCmd.ActiveConnection.Close' append the query string to the redirect URLDim MM_editRedirectUrlMM_editRedirectUrl = "showcart.asp"If (Request.QueryString <> "") ThenIf (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryStringElseMM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryStringEnd IfEnd IfResponse.Redirect(MM_editRedirectUrl)End IfEnd If%>界面如下图:六实训心得这次实训,虽然时间不是很长,仅仅为期五天,但是我受益匪浅,这次实训,让我对网上书店系统有了更深的了解,对此次实训,颇有体会。