VB515 旅游社管理系统设计与实现VB+ACCESS

随着国人生活水平的不断提高，人们的生活方式不再仅限于普通的衣、食、住、行。人们不仅要在物质方面得到提高，而且在精神方面也追求有一个质的突变。于是，人们越来越多的选择在周末或假期间外出旅游，换个环境来陶冶一下自己的情操，享受旅游给自己带来的乐趣，扩展视野。针对大众的这种需求，许许多多的旅行社就由此孕育而生，各种各样丰富多彩的旅游景点则需要由一个合适的管理系统来规范，所以旅行社综合管理系统的建立是十分必要的。
   旅行社综合管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备,易使用等特点。
   本论文主要阐述旅行社综合管理系统各个模块的设计思想和实现的关键技术。在本系统中，当使用者输入合法的登录信息后，就可以进入到主菜单操作界面，使用者可以通过主操作界面上的菜单项进行各项操作，以达到管理的目的。
计算机已成为我们生活、工作中不可缺少一部分。
今天，计算机的价格已经十分低廉，性能却有了长足的进步。它已经被应用于许多领域，计算机之所以如此流行的原因主要有以下几个方面： [来源：http://www.think58.com]
1.计算机可以代替人工进行许多繁杂的劳动；
2.计算机可以节省许多资源；
3.计算机可以大大的提高人们的工作效率；
4.计算机可以使敏感文档更加安全，等等；
5.计算机所拥有的网络功能是其它操作方式所不能比拟的。
在旅行社中使用计算机管理旅行社各种数据的实际意义：
在目前国内的旅游市场中，大部分的旅行社都借助于计算机来进行管理，但管理软件的版本较为陈旧且达不到图文并茂，大部分的管理软件都编写于基于ＤＯＳ系统下的foxbase及foxpro所开发的，不太符合当今旅游市场的需求。旅游市场也迫切的需要有一个规范化、标准化的管理软件来进行管理。归纳起来，旅行社综合管理系统的好处大约有以下几点：
1、可以存储景点、导游、游客的各类信息；
2、只需一到二名档案录入员即可操作系统，节省大量人力；
3、可以对各张表格进行多选项查询；
4、采用目前比较常用的Access数据进行数据管理；
5、采用图片框的方式，使系统的界面尽量做到美观、大方； copyright think58

[来源：http://www.think58.com]

第3章：设计中需要解决的几个关键问题
3.1研究中需要解决的几个关键问题
1. 数据库和Visual Basic的连接；
2. 数据查询模块的制作；
3. 报表功能模块的制作；
4. 在实际应用中数据查询的准确性，查询速度；
5. 旅行社综合管理系统所涉及到的数据表是否合理；
3.2具体实现中采用的关键技术
1．在本系统中采用access2000数据库与Visual Basic连接，通过ADODC控件所编写的过程代码来加载数据源。
2．制作查询模块中尽可能多的想到可供查询的条件，使查询系统不断完善。
3．采用Visual Basic中的报表编辑器来完成报表的制作。
4．使sql查询语言进行系统中的数据查询。
5．在具体使用中逐步的发现问题，解决问题。
第4章：系统设计
4.1系统模块的划分
 在本系统中，我将建立起旅行社管理系统的旅游线路管理模块、导游管理模块、组团管理模块、游客管理模块、报表打印模块、系统设置模块，其中旅游线路管理模块又分为旅游线路管理和旅游线路查询两个子模块，导游管理模块又分为导游管理和导游查询两个子模块，组团管理模块又分为组团管理和组团查询两个子模块，报表打印模块提供了四张功能报表的选择打印，系统设置模块分为添加用户、修改密码、备份数据三个子模块。（具体见图４．１）其中，在几个查询模块中，我要使用到SQL查询语言对表格进行条件查询操作，在打印报表中，我使用了vb自带的数据报表功能制作了四份报表供使用者选择打印，在系统设置模块中，我采用了利用权限等级进行管理的方法，如你的登录权限是user，你就不可以操作添加用户模块了。 copyright think58

2. 选择Microsoft Jet4.0 OLE DB Provider,单击下一步按钮，出现数据库设置对话框，选择前面创建的数据库即可，如图5.2.2.1.3所示。该数据库即作为整个数据工程的数据源的数据库。数据源是否连接成功，可以通过测试连接按钮进行检验。
3. 单击“确定”按钮之后即成功引入数据源。可以发现成功连接数口的连接字符属性中，出现它的字符串 Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=database.mdb这样整个数据工程将使用该数据连接和数据库。
4. 我还添加了一个模块，其目的是为了在系统调用的时候自动调入数据源以及调入一些公有的变量。其模块设计代码如下：
通用 声明
Public conn As New ADODB.Connection
Public rs As New ADODB.Recordset
Public dataname As String
Public connectionstring As String
Public glymc As String
Public quanxian As String
Public flag As Integer
通用 main
Sub Main()
dataname = App.Path & "\database.mdb" '两句为加载数据源
connectionstring = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & dataname
first_f.Show think58.com [资料来源：http://THINK58.com]
End Sub
接下来，我将创建系统启动封面，在工程管理器中打开数据工程已经创建的第一个窗体first_f。
保存工程和该窗体到磁盘路径之中，接下来设计first_f，该窗体作为系统启动的封面，其布局如图5.2.2.1.4所示。据源之后，在属性窗
 
其制作过程如下：
1.设置窗体first_f的基本属性如下表所示。
系统启动窗体first_f的主要属性
属性项名 属性设置内容
Border Style None
StartUpPosition 2-屏幕中心
WindowsState 2-maximized
Picture 选定的图片文件
2.在窗体中放入一个标签控件，设其Caption属性为“系统登录”并为该标签控件赋予一个过程代码，当用户单击该标签时即进入系统权限认证窗体。其过程代码如下：
Private Sub Label1_Click()
login_f.Show 
End Sub
3.再放入一个标签控件，设其Caption属性为“旅行社综合管理系统”，用于说明该系统的名称。
4.最后放入一个标签控件，设其Caption属性为“退出系统”，用于退出系统，其过程代码如下：
Private Sub Label2_Click()
end  '用于退出系统
End Sub
5.2.2.2 创建系统登录界面
 系统登录界面是一个管理系统进行权限认证中不可缺少的一环，它主要用来验证系统使用的合法身份。保证系统的安全运行。其制作过程如下： 内容来自think58 [资料来源：http://think58.com]
1.在工程中增加一个新的窗体Login_f；窗体布局如图5.2.2.2.1所示。
2.在Login_f窗体中放入两个文本框控件用来接收用户名和密码信息。在具体制作中将密码框的passwordchar的属性改为*，作用是为了保证输入密码时不被他人看见。
3.在两个文本框的边上放入两个标签控件，设两个标签的Caption属性分别为“用户名和密码”。用于说明两个文本框的作用。
4．在窗体中放入两个按钮控件，分别设置其Caption属性为“进入”、“退出”。用于系统登录和退出启动界面之用。登录按钮的过程代码如下：
进入按钮的过程代码如下：
Private Sub Command1_Click()
text1.Text = Replace(text1.Text, "'", "")
text1.Text = Replace(text1.Text, Chr(34), "")
Text2.Text = Replace(Text2.Text, "'", "")
Text2.Text = Replace(Text2.Text, Chr(34), "")
sql = "select * from 密码表 where 用户名='" & text1.Text & "' and  密码=   '" & Text2.Text & "'"  ‘查询密码和用户是否与表中的相符
Set rs = conn.Execute(sql)
本文来自think58 [来源：http://www.think58.com]