电影票售票系统毕业设计论文

1、 编号 毕毕业业设设计计（ 论论文文 ）题目:电影票售票管理系统学生姓名学 号090302241144系 部软件与服务外包学院专 业软件技术班 级软件 0913指导教师 评阅教师2012 年 5 月摘 要I摘摘 要要随着 Internet 的迅猛发展，当今社会已进入网络时代，计算机网络已经成为社会和经济发展的强大动力。与此同时，国内娱乐行业特别是电影行业也发展迅猛，电影票房屡创新高，为了能使大众更为便捷的购买到电影票，使影迷购票能够有更多可选择的方式，网上购票方式营运而生，一个完善的电影院网上售票系统已经成为各个电影院的心的追求目标。本次设计以 Microsoft Office Studio

2、2005 为前台主要开发工具，以ASP.NET 作为开发技术，后台数据库采用微软的数据 Microsoft Office Office Access,并结合 VB.NET 技术开发出一个全面支持广域网络办公模式的应用系统，该系统具有页面友好、操作便捷等优势，它为使用者提供一个全新的平台，有较好的应用前景。随着计算机的革新，程序的编程也随之简便化，为的是方便设计系统的工作者更好的设计系统，运用熟练的 PS 技术，可以美化我们的网页排版，更进一步的吸引消费者，也让系统设计人员把系统的网页更加美化出来，以便设计让人满意的界面效果等。本文首先介绍了当前电影售票管理系统的背景情况，接着分析了本次设计所涉

3、及到的理论知识，紧接着接受了本系统的数据库设计过程、页面的设计和程序的详细设计与实现过程，以及对系统实行的效果图和结果。又紧接着分析了系统的运用的代码实现的效果。最后对本次做了总结，总结这一开发的感受与经验教训等等。关键词：电影售票管理系统；VB.NETVB.NET；MicrosoftMicrosoft VisualVisual StudioStudio 2005.2005.目 录II目目 录录摘摘 要要 .I I第一章第一章 绪论绪论 .1 11.1 开发背景.11.2 本课题研究的目标.11.3 本课题研究意义和研究内容.21.3.1 本课题研究意义.21.3.2 本课题研究内容.2第二章

4、第二章 系统需求分析系统需求分析 .3 32.1 系统可行性分析.32.1.1 经济可行性.32.1.2 技术可行性.32.1.3 用户使用可行性.42.1.4 操作可行性.42.1.5 调度可行性.42.2 系统需求分析.42.2.1 系统需求功能概括.52.2.2 系统需求角色分析.52.2.3 系统数据需求分析.52.2.4 系统功能模块分析.6第三章第三章 电影票售票管理系统总体设计电影票售票管理系统总体设计 .9 93.1 电影票售票管理系统的系统目标.93.2 电影票售票系统的功能结构.93.3 电影票售票流程图.10目 录III3.4 数据库设计.103.5 数据库概念设计.10

5、3.6 数据库逻辑结构设计.133.7 文件夹组织结构.153.8 公共类设计.16第四章第四章 电影票售票管理系统部分功能详细设计电影票售票管理系统部分功能详细设计 .18184.1 登录模块设计.184.1.1 登录模块概述.184.1.2 登录模块实现过程.184.1.3 注册模块实现过程.194.2 管理员模块设计.204.2.1 管理员模块设计概述.204.2.2 管理员模块技术分析.214.2.3 管理员模块实现过程.214.3 客户操作模块.244.3.1 客户操作模块设计概述.244.3.2 客户操作模块技术分析.264.3.3 客户操作模块实现过程.26第五章第五章 结论结论

6、 .3939参考文献参考文献 .4040致致 谢谢 .4141电影票售票管理系统1第一章第一章 绪论绪论1.11.1 开发背景开发背景随着现代计算机技术的发展，计算机在各个领域中都得到了广泛的应用。当今社会已经步入了数字化时代。计算机正在潜移默化的改变着我们的生活。以往我们企业系统维护要上门服务，现在随着 Internet 的飞速发展，我们已经实现了网上宣传和系统维护。对于传统电影票售票而言，通过前台购买排队等待，其对顾客广泛的宣传和服务不便利。电影票售票系统的开发的便利和进入的网络时代，使得许多影视公司拥有了参与电影票售票系统网站的开发和设计，从而能够有效地改善电影的宣传有限和市场竞争结构，

7、显著提高影视公司的知名度。网络发展到今天，是必然的结果。网络使人们的生活发生了深刻的变革，Internet 成为很多活动的重要场所。电影票售票系统现在虽然还处于发展阶段，但是随着互联网经济的发展，越来越多的人投入倒电影票售票系统维护这个领域中来。网上维护最大程度的方便了顾客。顾客足不出户，在电影网站通过 www浏览器实现网上把售票员请到家服务，便可将得到自己喜欢的电影，无需东奔西跑。本次设计的电影票售票系统-是一种具有交互功能的商业网站，可以方便服务于每一个客户。1.2 本课题研究的目标本课题研究的目标随着科技的发展，时代的进步，互联网已经成为了人们生活中不可缺少的东西，网上购物提劲成为了一种

8、时代的象征，人们生活水平日以提高，压力也越来越大，人们需要放松自己的心情，看电影显然是个不错的选择，但是传统的窗口售票工作效率低，人们王王需要排很长的队伍才能买到票，不仅浪费了宝贵的时间，而且可能还会影响购票人的心情，工作人员的工作量也大，因此拥有一套完整的高效的实用的网上售票系统就显得非常重要了，他可以帮你解决排队问题，还可以足不出户就可以在家网上查询电影票价和购买情况，节约了很多宝贵的时间，故而本次研究的目标就在此。技术学院毕业设计（论文）21.3 本课题研究意义和研究内容本课题研究意义和研究内容.1 本课题研究意义本课题研究意义本网站的设计与开发后的主要是对影视公司宣传影

9、片，方便客户购买影票，更好的做好电影票的管理，以及资源的共享，便捷客户的需求，节省客户的时间让客户得到优厚服务。.2 本课题研究内容本课题研究内容本系统使用.NET 平台中的 ASP.NET 开发基于 B/S 体系结构的 web 应用系统，运用 VB 语言实现系统功能的实现，结合 Microsoft Office Access 应用程序数据库设计和搭建数据库等等。研究该系统，实现电影票管理员与客户之间直接对面交流，目的是通过搭建一个无缝对接的交流平台实现和谐网络交易平台，方便客户放心大胆的选择自己喜爱的影片。电影票售票管理系统3第二章第二章 系统需求分析系统需求分析对于需求分析

10、来说，它是开发程序设计中最关键的一个步骤，是其他步骤的基础。具体地说，就是确定系统必须具有的功能和性能，系统要求的运行环境，并且预测系统开发的前景；必须仔细分析系统中的数据，既要分析系统中的数据流，又要分析长期使用的数据存储，通过分析来得出功能模块图、数据库表以及界面设计的系统逻辑模型。 2.12.1 系统可行性分析系统可行性分析针对电影票的售票管理系统的实际情况，讲可行性分析分为经济可行性、技术可行性、用户使用可行性、操作可行性和调度可行性五部分进行。.1 经济可行性经济可行性随着我国国民经济的飞速发展，网店管理已经作为一个新兴的服务行业，经过这几年的发展，已经逐步形成企业化

11、经营、专业化管理和社会服务化的管理机构。使用计算机对各个企业各项信息进行管理，因为具有着手工管理所无法比拟的优点。例如：查询方便、可靠性高、存储量大、保密性好和成本低等。目前，几乎所有的影院影视公司都建立了针对售票职能工作的管理信息系统，如网上购物管理系统，电影票售票管理系统、淘宝网等等。这些系统在很大程度上提高了部门的工作效率和管理水平。电影票售票管理系统的开发，是为了规范网络化的影票购买管理，为电影票管理提供一套高效、快捷的应用软件，电影售票管理质量的好坏不仅关系到工作和客户的需求，也关系到影视行业的发展。所以电影票售票管理系统的开发一定会得到影视影院的支持。保证开发资金的充足，从而保证设

12、计和开发的顺利展开。.2 技术可行性技术可行性（1）运用的技术可行性根据系统的的运行，主要用到了 VB 语言，Microsoft Office Access 数据库管理技术。当今社会，VB 语言和数据库技术的结合在世界上已经成为系统运行的普遍基础模式，故而 VB 语言和数据库技术的结合的可行性，给系统带来了技术可行性，从而达到需求效果。技术学院毕业设计（论文）4（2） 功能强大的信息平台目前的电影票售票系统开发平台的功能已经十分强大。Microsoft Visual Studio 2005 具有 Web 开发的强大优势，Microsoft Office Access 应用程序是

13、性能稳定的服务器平台。Microsoft Office Access 应用程序+ ASP.NET 正是开发信息系统的最需要的组合。（3） 硬件配置 服务器：Pentium4 以上配置的高性能 PC 机，内存应在 256M 以上，硬盘在 40G 以上。确认该计算机已经安装 Microsoft Office Access 数据库软件. 操作系统： Windows XP，分辨率：1024*768。 客户端：Pentium233 以上配置的 PC 机，内存应在 32M 以上，硬盘在 1G以上。.3 用户使用可行性用户使用可行性目前，电脑已经普及到各家各户，无论是家庭还是办公室均已介入I

14、nternet，上网十分方便。对于客户，可以随时上网搜索自己喜欢的电影各方面信息，而对于管理员，也便于对电影的信息进行修改、添加和删除等操作。.4 操作可行性操作可行性在投入使用电影票售票管理系统前，会由开发并熟练操作本系统的工程人员对用户人员进行专业系统的培训。培训主要包括熟练掌握系统的各个功能和简单的系统维护，总样操纵系统等。在计算机普及的今天，用户对于计算机功能都非常的熟悉，故而本系统使用人员也不必过多担心技术问题，掌握基本功能便可操作，本系统适合任何计算机以及计算机内部系统类型，所以本系统的操作完全可行。.5 调度可行性调度可行性所以开发期限的选定也是非

15、常重要的因素，根据电影售票管理的日常的正常的售票运作规律和工作性质，可以看出这些内容是我们平时常见的工作，所以开发人员在开发起来比较容易入手，所以可以判断开发本系统的周。因为调度可行性指的是建议的计算机系统能否在规定的期限内交付给用户，所以，应该可以在规定时间内，快速的、完整的交付给客户使用。因为本系统操作完全可行。电影票售票管理系统52.22.2 系统需求分析系统需求分析客户需求往往是不完善的、不明确的，因此电影票管理系统的开发目标必须以满足客户需求为前提，而在系统开发的第一阶段中，需要开发者调查客户对需求的内容以及想法，并分析其可行性，从而满足客户需求。可是一个相对完善的客户操作系统的开发

16、虽然有了良好的开端，但也会在开发中遇到很多问题，走很多弯路，这就需要开发前备齐自己需要的资料，来让开发中尽量减少问题，减少弯路。.1 系统需求功能概括系统需求功能概括从调研到可行性分析中，出于对客户、管理员需求的考虑，设计了这套电影票售票管理系统，本系统主要考虑到电影售票管理员和客户的普遍要求。在电影售票管理的要求中，对新电影资料的录入和增、删、改和查询等功能，运用这些新电影的资源来对电影票进行管理。在具有了所有的基本资料信息后，需要实现实质性的电影售票管理。主要的管理包括：影票价格管理、客户评论管理等操作。如此就可以便于影院能够对网络影票进行全面的管理和了解。

17、.2 系统需求角色分析系统需求角色分析知道电影票售票管理系统设计的目标是：管理功能完整、数据共享和信息传递方便快捷，结合影院售票管理的工作特点，实现影院管理员对电影信息的网上管理，并实现客户能够及时获取电影资源的各方面信息。在开发设计过程中，首先要对系统进行分析，确定系统角色，即各类用户在系统中所承担的角色。本系统的角色包括了以下两个：电影票售票管理员：对网络最新电影资源通知发布、新闻更新等等，以及对相关数据进行增、删、改、查等操作。普通客户：对自己的信息、电影票的价格和电影资源的查看，还有对电影的评价等等。.3 系统数据需求分析系统数据需求分析本系统是电影售票管理系统，所以在

18、这个过程中需要电影资源的信息、影院信息、电影价格的信息及日常管理过程中需要的信息表。针对以上情况一共建了张 4 张表来存储查询系统所需要的相关信息。技术学院毕业设计（论文）6电影信息表信息表 xinxi，用来存储电影信息的资料价格数量等的表。如下表 xinxi 表所示：xinxi 表categoryidproductidnamepriceimagedetail编号电影序号影片名称价格图片影片内容回复信息表 newpost，用来存储客户对电影评论的回复。如下表 newpost 所示newpost 表postidsubjectmessagepostdateiprepliesviews编号主题回复内

19、容回复日期回复地址回复次数访问次数评论信息表 reply，用来存储客户对影片的评论回复。如下表 replay 所示:reply 表replyidsubjectipmessagepostidpostdate编号主题评论地址评论内容评论次数评论日期管理员用户信息表 userinfo,用来存储管理员信息。如下表 userinfo 所示：userinfoidusernamepwemailgllb编号用户姓名密码邮箱用户类别.4 系统功能模块分析系统功能模块分析电影票售票管理系统根据需求分析和可行性分析，按系统角色分两个大的模块：管理员管理模块和客户操作模块。下面分别介绍两个大模块中子模

20、块：管理员模块，如图 2-1 所示：电影票售票管理系统7图 2-1 管理员模块管理员模块总共分为五个子模块：客户信息管理，对客户相关信息进行操作；票的价格信息管理，删除或修改票的价格，影片信息管理，及时上传影片的信息，管理员信息管理，更改管理员的密码等操作；放映时间管理，主要是通知该影片放映时间。客户操作模块，如图 2-2 所示：图 2-2 客户操作模块客户操作模块总共分为五个子模块：个人基本信息，根据登录者的类型显示相对应的客户基本信息等；评论信息管理，对影片的评价；票的价格查询，方便客户了解票的价格；放映时间查询，影院的放映时间，让客户了解；影片技术学院毕业设计（论文）8信息查询，方便了解

21、影片的信息，找自己喜欢的影片。电影票售票管理系统9第三章第三章 电影票售票管理系统总体设计电影票售票管理系统总体设计电影票售票管理总体设计的基本目的就是确定系统应该如何实现运行，因此总体设计又称为概要设计。总体设计的过程通常由两个主要阶段组成：结构设计，确定系统结构系统设计；系统设计，确定系统具体实现运行方案。这两个阶段主要通过电影售票管理系统的设计开发方案，利用现有的软硬件环境，提高系统的开发水平，充分的利用资源，以便完善系统设计。3.13.1 电影票售票管理系统的系统目标电影票售票管理系统的系统目标电影票售票管理管理系统是一个小型的管理系统，根据系统需求分析分，系统分为两个角色，管理员主要

22、对系统进行维护和客户提交的信息进行管理，客户主要根据自己的需求提交一些信息。本系统主要实现以下目标：1. 本系统采用人机交互的方式，界面美观友好，信息查询灵活、方便数据存储安全可靠。2. 对用户输入的数据，进行严格的数据检验，尽可能避免人为错误。3. 系统管理员拥有系统维护的所有权限。4. 系统最大限度的实现了易维护性和易操作性。3.23.2 电影票售票系统的功能结构电影票售票系统的功能结构电影票售票管理系统功能结构图，如图 3-1 所示：图 3-1 电影票售票管理系统功能结构图技术学院毕业设计（论文）103.33.3 电影票售票流程图电影票售票流程图电影票售票管理的流程图，如图 3-2 所示

23、：图 3-2 电影票售票管理的流程图3.43.4 数据库设计数据库设计在设计数据库前，分析了此数据库需要的数据量，因为所需数据量不是很大，因此用 Microsoft Office Access 储存了数据量，设计了 xinxi 表，newpost 表，reply 表，userinfo 表等。3.53.5 数据库概念设计数据库概念设计在开发本系统时，为了灵活的维护系统，设计了管理员管理模块，通过管理员模块可以方便的对整个系统进行维护。这是需要建立一个数据表用来存储所有管理员的信息。管理员信息实体 E-R 图，如图 3-3 所示：电影票售票管理系统11图 3-3 管理员信息实体 E-R 图当客户登

24、录系统时，系统要根据登录人的用户名来显示相对应的个人信息，登录者不同，显示的信息也不同，客户信息实体 E-R 图，如图 3-4 所示：图 3-4 客户信息实体 E-R 图当客户登录系统后，电影信息表实体 E-R 图，如图 3-5 所示：技术学院毕业设计（论文）12图 3-5 电影信息表实体 E-R 图登录类型表实体 E-R 图，如图 3-6 所示：图 3-6 登录类型表实体 E-R 图放映时间表类型表实体 E-R 图，如图 3-7 所示：电影票售票管理系统13图 3-7 放映时间表类型表实体 E-R 图3.63.6 数据库逻辑结构设计数据库逻辑结构设计根据设计好的 E-R 图在数据库中创建数据

25、表，系统数据库中部分表的结构如下。表 userinfo 表用来保存所有系统管理员信息和用户信息，如下表 3-1 所示：Userinfo 表字段名称数据类型id自动编号username文本pw文本email文本gllb文本表 3-1 管理员信息和用户信息 userinfo 表表 newpost 用来储存用户对影片评论的发表，如下表 3-2 所示：Newpost 表字段名称数据类型postid自动编号帖子序号subject文本发帖标题message备注帖子内容postdate日期/时间userid数字回帖用户序号ip文本发帖用户地址replies数字回帖数量技术学院毕业设计（论文）14views数

26、字被浏览次数表 3-2 评论表 Newpost 表表 reply 储存用户对影片的评论回复，如表 3-3 所示：reply 表字段名称数据类型replyid自动编号回复帖子序号subject文本回复帖子标题ip文本回复用户的 ip 地址userid数字回帖用户序号message备注回复帖子内容postid数字原帖序号postdate日期/时间回帖日期表 3-3 回复表 reply 表表 xinxi 表信息表用来储存电影的资源信息价格以及放映时间如表 3-4 所示：Xinxi 表字段名称数据类型categoryid数字productid数字name文本price数字image文本detail备注

27、表 3-4 信息表 xinxi 表文本 list 用来储存用户订购的名单，如果用户通过登录进入电影商城，点击购买，会出现订单界面，需要用户填写姓名、地址、影票数量、价格以及联系电话，填写完成后，我们系统会在文本中生成订单形式以便查询和保存。如图 3-8 所示：电影票售票管理系统15图 3-8 文本结构图3.73.7 文件夹组织结构文件夹组织结构每个网站都会有相应的文件夹组织结构，因为网页不是很多，可以将图片、公共类或者程序资源文件放在相应的文件夹中，而网页可以直接放在网站的根目录下。电影票售票管理系统就是按照此的文件夹组织结构排列的，如图 3-9所示：技术学院毕业设计（论文）16图 3-9 电

28、影票售票管理系统文件夹的组织结构图3.83.8 公共类设计公共类设计在开发项目过程中以类的形式来组织、封装一些常用的方法和事件，不仅可以提高代码的重用率，也大大方便了代码的管理。本系统中创建了一个公共类设计，用 vb 语言绑定 Access 数据库管理员和用户的身份判定，判断业主登录和管理员登录。具体代码如下：Protected Sub logo_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles logo.Click Dim con As New OleDbConnection

29、 con.ConnectionString = Provider=Microsoft.jet.oledb.4.0;data source= & Server.MapPath(App_Databbs.mdb) con.Open() Dim sqlcmd = select id,pw from userinfo where username= & Trim(username.Text) & and gllb= & DropDownList1.SelectedValue & Dim cmd As New OleDbCommand cmd.CommandText

30、 = sqlcmd cmd.Connection = con Dim dr As OleDbDataReader dr = cmd.ExecuteReader() If dr.Read() = True Then If dr.GetValue(1) = password.Text Then Session(curuserid) = dr.GetInt32(0) Session(curname) = username.Text If DropDownList1.Text = 用户 Then If username.Text = Then电影票售票管理系统17 Response.Write(ale

31、rt( & 请输入用户名);) Else Session(username) = username.Text Session(password) = password.Text End If Else Response.Redirect(admin.aspx) End If If DropDownList1.Text = 管理员 Then If username.Text = Then Response.Write(alert( & 请输入用户名);) Else Session(username) = username.Text Session(password) = pass

32、word.Text End If Else Response.Redirect(Default.aspx) End If Else Label1.Text = 密码不正确 Label1.Visible = True password.Text = End If Else Label1.Text = 没有这个用户！或者用户类型不正确！ Label1.Visible = True End If dr.Close() con.Close() End Sub Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventA

33、rgs) Handles Me.Load End SubEnd Class技术学院毕业设计（论文）18第四章第四章 电影票售票管理系统部分功能详细设计电影票售票管理系统部分功能详细设计4.14.1 登录模块设计登录模块设计.1 登录模块概述登录模块概述并不是任何人都可以登录电影售票管理系统，默认是不允许匿名登录的，只有输入正确的用户名和密码才能登录电影票售票管理系统进行相关操作，这是需要通过登录模块验证登录用户的合法性。登录模块是电影票售票管理系统的第一道安全屏障，登录模块运行结果如图 4-1 所示：图 4-1 登录的界面.2 登录模块实现过程登录模块实现过程输

34、入账号和密码等信息无误后，单击“登录”按钮，进行登录。程序首先会判断输入登录身份调用公共类中相应的方法验证账号和密码是否正确，如果登录的账号和密码正确，则会转向与登录身份相符合的页面。关键代码如下：Protected Sub logo_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles logo.Click Dim con As New OleDbConnection con.ConnectionString = Provider=Microsoft.jet.oledb.4.0;

35、data source= & Server.MapPath(App_Databbs.mdb) con.Open() Dim sqlcmd = select id,pw from userinfo where username= & Trim(username.Text) & and gllb= & DropDownList1.SelectedValue & Dim cmd As New OleDbCommand cmd.CommandText = sqlcmd cmd.Connection = con Dim dr As OleDbDataReader

36、dr = cmd.ExecuteReader() If dr.Read() = True Then If dr.GetValue(1) = password.Text Then Session(curuserid) = dr.GetInt32(0) Session(curname) = username.Text If DropDownList1.Text = 用户 Then电影票售票管理系统19 If username.Text = Then Response.Write(alert( & 请输入用户名);) Else Session(username) = username.Tex

37、t Session(password) = password.Text End If Else Response.Redirect(admin.aspx) End If If DropDownList1.Text = 管理员 Then If username.Text = Then Response.Write(alert( & 请输入用户名);) Else Session(username) = username.Text Session(password) = password.Text End If Else Response.Redirect(Default.aspx) End

38、 If Else Label1.Text = 密码不正确 Label1.Visible = True password.Text = End If Else Label1.Text = 没有这个用户！或者用户类型不正确！ Label1.Visible = True End If dr.Close() con.Close().3 注册模块实现过程注册模块实现过程如没有您的信息和用户名密码，可以通过注册来实现你的权限，注册代码如下：Imports System.DataImports System.Data.OleDbPartial Class reg Inherits Syste

39、m.Web.UI.Page Protected Sub ok_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ok.Click Dim con As New OleDbConnection con.ConnectionString = provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(App_Databbs.mdb) Dim sqlcmd1 = select * from userinfo w

40、here username= & username.Text & Dim cmd As New OleDbCommand cmd.CommandText = sqlcmd1 cmd.Connection = con con.Open() Dim dr As OleDbDataReader dr = cmd.ExecuteReader() If dr.Read() Then Label1.Text = 很抱歉，已经有人注册了这个名字！请更换用户名技术学院毕业设计（论文）20 Label1.Visible = True Else dr.Close() Dim sqlcmd2 = i

41、nsert into userinfo(username,pw,email) values( & username.Text & , & password1.Text & , & email.Text & ) cmd.CommandText = sqlcmd2 cmd.ExecuteNonQuery() Label1.Text = 恭喜你注册成功! Label1.Visible = True End If con.Close() End Sub Protected Sub Reset_Click(ByVal sender As Object, B

42、yVal e As System.Web.UI.ImageClickEventArgs) Handles Reset.Click username.Text = email.Text = password1.Text = password2.Text = End SubEnd Class4.24.2 管理员模块设计管理员模块设计.1 管理员模块设计概述管理员模块设计概述在电影售票管理系统中，管理员模块具有最高权限，管理员通过登录模块成功登录之后可以对用户信息、电影资源的信息、评选回复信息、发表评论信息和管理员密码等进行管理，使系统维护起来更为简便。管理员模块运行的结果如图 4-

43、2 所示：电影票售票管理系统21图 4-2 管理员模块运行的结果图.2 管理员模块技术分析管理员模块技术分析在开发后台管理员模块过程中，使用了比较频繁的con.ConnectionString（）方法绑定数据。.3 管理员模块实现过程管理员模块实现过程管理员管理模块实现的具体功能有管理用户信息、电影票资源信息、评论信息、回复信息，管理员密码等。以用户信息管理为例，介绍具体的实现步骤：（1）管理用户基本信息登录网页如图 4-3 所示：技术学院毕业设计（论文）22图 4-3 管理员登录界面图代码运行如下：Protected Sub logo_Click(ByVal

44、sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles logo.Click Dim con As New OleDbConnection con.ConnectionString = Provider=Microsoft.jet.oledb.4.0;data source= & Server.MapPath(App_Databbs.mdb) con.Open() Dim sqlcmd = select id,pw from userinfo where username= & Trim(u

45、sername.Text) & and gllb= & DropDownList1.SelectedValue & Dim cmd As New OleDbCommand cmd.CommandText = sqlcmd cmd.Connection = con Dim dr As OleDbDataReader dr = cmd.ExecuteReader() If dr.Read() = True Then If dr.GetValue(1) = password.Text Then Session(curuserid) = dr.GetInt32(0) Sessi

46、on(curname) = username.Text If DropDownList1.Text = 用户 Then If username.Text = Then Response.Write(alert( & 请输入用户名);) Else电影票售票管理系统23 Session(username) = username.Text Session(password) = password.Text End If Else Response.Redirect(admin.aspx) End If If DropDownList1.Text = 管理员 Then If username.

47、Text = Then Response.Write(alert( & 请输入用户名);) Else Session(username) = username.Text Session(password) = password.Text End If Else Response.Redirect(Default.aspx) End If Else Label1.Text = 密码不正确 Label1.Visible = True password.Text = End If Else Label1.Text = 没有这个用户！或者用户类型不正确！ Label1.Visible = Tr

48、ue End If dr.Close() con.Close() End Sub可以管理用户信息，如图 4-4 所示：技术学院毕业设计（论文）24图 4-4 管理用户界面其他类似此，点击管理链接，就可直接对电影信息，评论信息，回复信息进行删除修改更新等操作，既方便又便捷。4.34.3 客户操作模块客户操作模块.1 客户操作模块设计概述客户操作模块设计概述在电影信息管理系统中，客户的操作极为重要，因为一个售票系统的操作主要是以客户为主，它是网上的一个店铺，必须要客户自己来挑选自己喜欢的产品。下面大概说下用户的操作，下一节做详解。客户登录界面如图 4-5 所示：电影票售票管理系统2

49、5图 4-5 客户登录界面如需评论影片点击左下行链接影片论坛，效果如图 4-6 所示：技术学院毕业设计（论文）26图 4-6 评论回复影片的评论界面.2 客户操作模块技术分析客户操作模块技术分析在开发客户操作模块过程中，使用了比较频繁的con.ConnectionString（）方法绑定数据。.3 客户操作模块实现过程客户操作模块实现过程用户操作模块实现的具体功能有对个人基本信息、影片的查询、对影片的发表评论信息、回复信息、提交资料购物和设置密码等。介绍其具体实现步骤：（1）注册重置信息，如图 4-7 所示：图 4-7 注册重置信息电影票售票管理系统27具体实现

50、注册重置代码如下： Protected Sub ok_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ok.Click Dim con As New OleDbConnection con.ConnectionString = provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(App_Databbs.mdb) Dim sqlcmd1 = select * from userinfo where

51、 username= & username.Text & Dim cmd As New OleDbCommand cmd.CommandText = sqlcmd1 cmd.Connection = con con.Open() Dim dr As OleDbDataReader dr = cmd.ExecuteReader() If dr.Read() Then Label1.Text = 很抱歉，已经有人注册了这个名字！请更换用户名 Label1.Visible = True Else dr.Close() Dim sqlcmd2 = insert into userinf

52、o(username,pw,email) values( & username.Text & , & password1.Text & , & email.Text & ) cmd.CommandText = sqlcmd2 cmd.ExecuteNonQuery() Label1.Text = 恭喜你注册成功! Label1.Visible = True End If con.Close() End Sub Protected Sub Reset_Click(ByVal sender As Object, ByVal e As System.W

53、eb.UI.ImageClickEventArgs) Handles Reset.Click username.Text = email.Text = password1.Text = password2.Text = End SubEnd Class(2)注册信息后登录界面，跳转到电影票的购买界面如图 4-8 所示：技术学院毕业设计（论文）28图 4-8 电影票的购买界面点击图片购买自己喜欢的电影类型国外、国内、动漫效果如图 4-9、4-10、4-11 所示：电影票售票管理系统29图 4-9 国外电影图 4-10 国内电影技术学院毕业设计（论文）30图 4-11 动漫电影(3)点击购买，选择

54、你需要的票数如图 4-12 所示：图 4-12 购买界面电影票售票管理系统31然后按照需要对自己喜欢的影片购买，购买以及以上运行代码如下：Imports System.IOImports system.dataImports System.Data.OleDbPartial Class _Default Inherits System.Web.UI.Page Sub updateshoppingcart() Dim dt As New DataTable() Dim orderlist As ArrayList Dim qtylist As ArrayList Dim i As Integer

55、 Dim product As DataRow Dim productid As Integer Dim mydatatable As DataTable = New DataTable(mydatatable) Dim mydatacolumn As DataColumn Dim mydatarow As DataRow mydatacolumn = New DataColumn() mydatacolumn.DataType = System.Type.GetType(System.Int32) mydatacolumn.ColumnName = qty mydatatable.Colum

56、ns.Add(mydatacolumn) mydatacolumn = New DataColumn() mydatacolumn.DataType = System.Type.GetType(System.String) mydatacolumn.ColumnName = name mydatatable.Columns.Add(mydatacolumn) mydatacolumn = New DataColumn() mydatacolumn.DataType = System.Type.GetType(System.Double) mydatacolumn.ColumnName = pr

57、ice mydatatable.Columns.Add(mydatacolumn) mydatacolumn = New DataColumn mydatacolumn.DataType = System.Type.GetType(System.Double) mydatacolumn.ColumnName = total mydatatable.Columns.Add(mydatacolumn) orderlist = Session(orderlist) qtylist = Session(qtylist) For i = 0 To orderlist.Count - 1 producti

58、d = orderlist(i) product = GetProduct(productid) mydatarow = mydatatable.NewRow() mydatarow(qty) = qtylist(i) mydatarow(name) = product(name) mydatarow(price) = product(price) mydatarow(total) = mydatarow(qty) * product(price) mydatatable.Rows.Add(mydatarow) Next shoppingcartlist.DataSource = mydata

59、table.DefaultView shoppingcartlist.DataBind() updateshopchart() End Sub Sub updateshopchart() Dim orderlist As ArrayList Dim qtylist As ArrayList Dim productid As Integer Dim product As DataRow Dim i As Integer技术学院毕业设计（论文）32 Dim subt, tal As Double Dim de As Double = 0.8 orderlist = Session(orderlis

60、t) qtylist = Session(qtylist) subt = 0 For i = 0 To orderlist.Count - 1 productid = orderlist(i) product = getproduct(productid) subt += product(price) * qtylist(i) Next tal = subt * de subtotal.Text = String.Format(0:c, subt) dec.Text = de total.Text = String.Format(0:c, tal) End Sub Function getproduct(ByVal productid As Integer) As DataRow Dim myconnectionstring As String = provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(电