毕业设计报告-ASP的数码专卖网站设计

毕业设计报告 指导老师： 作 者： 班 级： 系 别：电子商务毕业设计报告目录1摘要 32前言 43网站整体功能 54网站架构图 55数据库结构设计图 56正文 67附图 268结束语 30 9参考文献 30 一、内容摘要 毕业设计目的 通过进行实际的网站架构设计和程序设计，真正掌握并进一步深入了解电子商务的内部原理和程序运行机制，做到学以致用。毕业设计摘要本次课程设计取题为sunnybaby（阳光宝贝）数码专卖，通过ASP技术进行构建，数据库为Access，结合CSS进行网站整体布局和界面设计，并综合运用了FLASH等技术，来建设网站。One. Content Summary Purpose of Designed to GraduationThrough the actual site structure design and program design, and truly master and further in-depth understanding of e-commerce principles and procedures of internal operational mechanism, to apply what they have learned.Sunmary of Designed to GraduationThe curriculum design entitled sunnybaby admission (Sunnybaby Baby) Digital Monopoly by ASP technology for construction of the Access database, a web site with CSS overall layout and interface design, and the integrated use of the FLASH technology to build its website.二、前言 Sunnybaby（阳光宝贝）数码产品专卖采用横向三栏式布局，如图所示：LOGO+banner+导航栏右侧产品展示主体内容版权部分二级页面与首页布局类似，只是将主体与右侧产品展示合并构成新的主体内容区。Logo+banner+导航主题内容左侧导航版权部分三、网站整体功能用户注册、登录功能 商品搜索功能 商品评论功能购物车功能 留言功能 友情链接功能四、网站架构产品最终页面，用户可以在这里直接点击购买按钮进行购买二级导航二级导航二级导航二级导航二级导航首页 数据库五、数据库结构留言表订单表用户表产品表 评论表六、正文关键代码部分 数据库连接代码：（conn.asp）%Response.Buffer=TrueServer.ScriptTimeout=90On Error Resume Nextdbfolder=./database/dbname=hidfuhsdfi.mdbconnstr=Provider=Microsoft.Jet.OLEDB.4.0;DataSource=& Server.MapPath(dbfolder&dbname)Set conn = Server.CreateObject(ADODB.Connection)conn.Open connstrIf Err Thenset fs=createobject(scripting.filesystemobject) set ts=fs.createtextfile(server.MapPath(Error/data_&month(now()&-&day(now()&_&hour(now()&-&minute(now()&-&second(now()&.txt),true)ts.write Err.Number&:&Err.Descriptionts.closeset ts=Nothingset fs=Nothingerr.ClearSet Conn = NothingResponse.Write 数据库连接出错！Response.Write 可能出错原因：数据库位置或名称不对、数据库损坏！Response.EndEnd If%首页代码：（index.asp）注册页面代码（login.asp）%comurl=request(comurl)if request(action)=login thenerrmeg1=登录名和密码为空！errmeg2=登录名和密码不匹配！user_name=DelStr(request(user_name)user_pass=md5(DelStr(request(user_pass)if request(user_name)= or request(user_pass)= thenresponse.Write alert(&errmeg1&);history.go(-1);Response.Cookies(redsunny)(user_name)=Response.Cookies(redsunny)(user_type)=Response.endend ifset rs=server.createobject(adodb.recordset)sql=select * from redsunny_user where username=&user_name& and userpass=&user_pass&rs.open sql,conn,1,3if rs.eof thenrs.closeset rs=nothingresponse.Write alert(&errmeg2&);history.go(-1);Response.Cookies(redsunny)(user_name)=Response.Cookies(redsunny)(user_type)=Response.endend ifResponse.Cookies(redsunny)(user_name)=rs(username)Response.Cookies(redsunny)(user_pass)=rs(userpass)Response.Cookies(redsunny)(user_type)=rs(user_type)rs(landtime)=now()rs(user_lastip)=request.servervariables(remote_addr)rs(degree)=rs(degree)+1rs.updaters.closeset rs=nothingif Request.Cookies(redsunny)(guest) thenguest=Request.Cookies(redsunny)(guest)set rs=server.createobject(adodb.recordset)rs.open select user_name from redsunny_basket where user_name=&guest& and basket_check=0,conn,1,3do while not rs.eofrs(user_name)=request(user_name)rs.updaters.movenextlooprs.closeset rs=nothingResponse.Cookies(redsunny)(guest)=end ifif comurl= thencomurl=index.aspend ifresponse.redirect comurlResponse.endelseif request(action)=quit thenResponse.Cookies(redsunny)(user_name)=Response.Cookies(redsunny)(user_type)=Response.Cookies(redsunny)(user_pass)=Response.Cookies(redsunny)(guest)=if Request.ServerVariables(Http_Referer) thenresponse.redirect &Request.ServerVariables(Http_Referer)&elseresponse.redirect index.aspend ifelse% IMG src=Skin/home.gif border=0 align=absmiddle您的位置： 首页  用户登录    新用户请点击注册 忘记密码请点击这里%if Request.Cookies(redsunny)(user_name) thenuser_name=Request.Cookies(redsunny)(user_name)%td colspan=2 background=Skin/logina1.gifheight=29img border=0src=Skin/logina3.gif width=143 height=80提示：您好，您已经登录成功!如果您不是，请退出重新登录!td colspan=2 background=Skin/logina2.gif height=29input name=comurl type=hidden value=td colspan=2 background=Skin/logina1.gifheight=29img border=0 src=Skin/logina3.gifwidth=143 height=80用 户 名：input type=image src=Skin/logina4.gif name=login用户密码：td colspan=2 background=Skin/logina2.gif height=29订单页面代码（Orders.asp） IMG src=Skin/home.gif border=0 align=absmiddle 您的位置： 首页  我的订单列表%ifRequest.Cookies (redsunny) (user_name)= and Request.Cookies(redsunny)(guest)= thenresponse.redirect login.asp?comurl=orders.aspresponse.endelseif Request.Cookies(redsunny)(user_name) thenuser_name=Request.Cookies(redsunny)(user_name)chklogin(user_name)elseif Request.Cookies(redsunny)(guest) thenuser_name=Request.Cookies(redsunny)(guest)end if%所有订单: a href=?zt=1未处理 a href=?zt=0无效订单 a href=?zt=-1等待付款订单 a href=?zt=2已付款 a href=?zt=3已收款 a href=?zt=4已发货 a href=?zt=5已收货订单号日期投诉状态%page=request(page)if page= then page=1if not(isnumeric(page) then page=1if page1 then page=1page=int(page)zt=request(zt)set rs=server.createobject(adodb.recordset)if zt thensql=select * from redsunny_sub where sub_name=&user_name& and sub_zt=&zt& order by sub_id DESCelsesql=select * from redsunny_sub where sub_name=&user_name& order by sub_id DESCend ifrs.open sql,conn,1,1if rs.eof then response.write 暂且没有任何订单 rs.close set rs=nothingelsers.pagesize=20totalrec=rs.recordcounttotalpage=rs.pagecountif pagetotalpage then page=totalpagers.absolutepage=pagers.cachesize=rs.pagesizei=0do while not rs.eof and (itd class=cartshow width=5td class=cartshowa href=# onclick=javascript:window.open(submore.asp?sub_id=,newwindow,toolbar=no,scrollbars=yes,resizable=no,top=0,left=0,width=650,height=600);tdclass=cartshow-td class=cartshow已投诉，管理员尚未处理投诉：回复：a href=# onclick=javascript:window.open(tousu.asp?sub_id=&sub_number=,newwindow,toolbar=no,scrollbars=yes,resizable=no,top=0,left=0,width=420,height=180);投诉td class=cartshow第页/共页  0 then%a href=?page=&zt上一页上一页  %if page+1 a href=?page=&zt下一页下一页 提示一：收货后请在订单详情中修改订单状态为已收货，谢谢合作提示二：点击订单号查看详情提示三：未收到货或其它订单相关问题，可以进行订单投诉，请说明原因购物代码（buy.asp） IMG src=Skin/home.gif border=0 align=absmiddle 您的位置： 首页  购物车%if Request.Cookies(redsunny)(user_name)= and Request.Cookies(redsunny)(guest)= thenresponse.redirect login.asp?comurl=buy.aspresponse.endelseif Request.Cookies(redsunny)(user_name) thenuser_name=Request.Cookies(redsunny)(user_name)elseif Request.Cookies(redsunny)(guest) thenuser_name=Request.Cookies(redsunny)(guest)end ifif request(action)=change then更改数量if request(count)= or Not(isNumeric(request(count) then count=1else count=Cint(request(count)end ifbasket_id=request(basket_id)set rs=server.createobject(adodb.recordset)sql=select hw_id,basket_count from redsunny_basket where user_name=&user_name& and basket_id=&basket_id& and basket_check=0rs.open sql,conn,1,3if not rs.eof thenhw_id=rs(hw_id)set rsh=server.createobject(adodb.recordset)sql=select hw_kucun from redsunny_hw where hw_id=&hw_id&rsh.open sql,conn,1,1hw_kucun=rsh(hw_kucun)if counthw_kucun thenResponse.Writealert(定购数量不能大于库存);window.location.href=&Request.ServerVariables(Http_Referer)&;response.Endelsersh.closeset rsh=nothingrs(basket_count)=countrs.updateend ifend ifrs.closeset rs=nothingresponse.redirect buy.aspresponse.Endelseif request(action)=del then删除定购basket_id=request(basket_id)set rs=server.createobject(adodb.recordset)sql=select * from redsunny_basket where user_name=&user_name& and basket_id=&basket_id& and basket_check=0rs.open sql,conn,1,3if rs.eof thenresponse.redirect buy.asprespon