运输管理系统-VB毕业设计

1、目录摘要 前言第一章 为什么要开发一个运输管理系统11用计算机管理客运公司管理的 意义12 运输管理系统的 设计分析第二章 怎样开发一个运输管理系统管理系统？21 编程环境的 选择22 关系型数据库的 实现23 二者的 结合(DBA)第三章 Windows下的 Visual Basic 编程环境简介31 VB连接数据库的 各种方法+第四章 使用Access2000 实现关系型数据库41 数据库的 概念42 新建一个数据库43 修改已建的 数据库44 实现数据库之间的 联系第五章 系统总体规划51 系统功能第六章 系统具体实现61 用户界面的 实现611 登陆界面612 主界面 62 数据库的

2、实现621 用户库622 各个功能数据库 第8章 结束语主要参考文献-摘要- 运输管理系统管理系统是典型的 信息管理系统,其开发的 功能主要包括:通过计算机管理客运公司管理信息,日常办公,实现无纸化办公,通过工时计算,统计出各项数据,分析出客运现状和车辆现状,提高办事效率. 经过分析,我们决定使用 米ICROSOFT公司的 ACCESS作为后台数据库,设计出功能库, 使用 米ICROSOFT公司的 VISUAL BASIC开发工具,利用其提供的 各种面向对象的 开发工具,尤其是ADO控件这一能方便而简洁操纵数据库的 智能化对象,连接数据库,开发出产品.关键字:ADO、窗体、数据库.-前言-发展

3、客运无论对客运公司发展还是对人民生活需求都具有十分重要的 意义;发展客运是增强客运公司实力、改善客运服务质量的 需要,是完善运输体系、提高整体效益的 需要,是实现两个根本性转变、走集约化发展道路的 必然趋势,是发挥道路运输优势的 拳头产品;建立客运系统可以提升道路运输竞争力,提高车辆运用效率,降低运输成本,减少交通事故;发展客运可以改善投资环境,促进地域经济国际化的 进程;促进沿线经济开发、房地产升值;促进形成网络型公路产业,高新技术产业及商贸开发区;促进产业结构化,加快物流速度;促进地区经济的 繁荣.我国加入世界贸易组织后,必然要加快改革和经济结构调整的 速度,加大市场开放的 力度,而全国性

4、的 客运系统正是开放市场、促进交流的 良好载体.第一章 用计算机管理运输管理系统的 意义 运输管理系统管理的 定义为,组织中运输管理系统的 管理,意指一个组织对运输管理系统的 获取、维护、激励与运用与发展的 全部管理过程与活动.一般而言,良好的 运输管理系统管理,有助于为客运公司达到以下的 目标:一、协助组织达成发展目标与远景.二、有效地运用人员的 能力与技术专才.三、促使组织成员的 工作士气高昂且激发潜能.四、滿足组织成员的 自我实现感与增加成员的 工作成就感.五、发起且落实组织变革.六、提高组织成员的 工作生活品质.七、协助客运公司负责人做出正确决策. 运输管理系统的 设计分析 根据实际情

5、况,我们使用ADO控件少量代价快速地构造一个可执行的 软件系统模型.使用户和开发人员可以较快地确定需求,然后采用循环进化的 开发方式,对系统模型作连续的 精化,将系统需具备的 性质逐渐增加上去,直到所有的 性质全部满足.此时模块也发展成为最终产品了 .第二章怎样开发一个运输管理系统管理系统？ 编程环境的 选择 微软公司的 Visual Basic 6.0是Windows应用程序开发工具,使目前最为广泛的 、易学易用的 面向对象的 开发工具.Visual Basic提供了 大量的 控件,这些控件可用于设计界面和实现各种功能,减少了 编程人员的 工作量,也简化了 界面设计过程,从而有效的 提高了

6、应用程序的 运行效率和可靠性.故而,实现本系统VB是一个相对较好的 选择. 关系型数据库的 实现 Access2000 就是关系数据库开发工具,数据库能汇集各种信息以供查询、存储和检索.Access 的 优点在于它能使用数据表示图或自定义窗体收集信息.数据表示图提供了 一种类似于 Excel 的 电子表格,可以使数据库一目了 然.另外,Access 允许创建自定义报表用于打印或输出数据库中的 信息.Access也提供了 数据存储库,可以使用桌面数据库文件把数据库文件置于网络文件服务器,与其他网络用户共享数据库.Access 是一种关系数据库工具,关系数据库是已开发的 最通用的 数据库之一.如上

7、所述,Access 作为关系数据库开发具备了 许多优点,可以在一个数据包中同时拥有桌面数据库的 便利和关系数据库的 强大功能. 二者的 结合(ADO) 微软的 JET数据库引擎提供了 与数据库打交道的 途径,我们是通过它以及Visual Basic 来访问数据库并对其进行各种操作.Visual Basic、Access以及其他微软的 软件产品都是通过共用JET数据库引擎,从而给用户提供了 丰富的 数据类型. ADO 控件在数据库中的 信息与将信息显示给用户看的 Visual Basic程序之间架起了 一座桥梁.我们可以设置ADO控件的 各个属性,告诉它要调用那个数据库的 哪个部分.缺省情况下,

8、ADO控件根据数据库中的 一个或多个数据表建立一个dynaset-type(动态集合)类型的 记录集合.一个记录集合是动态的 也就意味着,当原来的 数据表中的 容改变了 以后,该记录集合中的 记录也会随之改变.ADO控件还提供了 用来浏览不同记录的 各种跳转按钮.将ADO控件放置在窗体中之后,我们还必须在该控件与要处理的 数据库之间建立联系. ADO(ActiveX Data Objects)是基于组件的 数据库编程接口,它是一个和编程语言无关的 CO米组件系统.本文主要介绍用ADO编程所需要注意的 技巧和在VC下进行ADO编程的 模式,并对CExtensions进行了 简单的 讨论,希望对A

9、DO开发人员有一定的 帮助作用.因为ADO是一个和编程语言无关的 CO米组件系统,所以这里讨论的 要点适用于所有的 编程语言和编程环境,比如:VB、VBScript、VC、Java等等. ADO定义了 一个可编程的 对象集合.ADO对象模型如图所示:对于ADO其中对象来说,我觉得比较重要的 是:Co米米and,Connection,Recordset对象.虽然严格的 说这是不准确的 ,但根据我的 实际经验确实如此.下面就分别来谈一下.(1) Connection对象Connection对象用于建立与数据库的 连接.通过连接可从应用程序访问数据源.它保存诸如指针类型,连接字符串,查询超时,连接超

10、时和缺省数据库这样的 连接信息.(2) Co米米and对象在建立Connection后,可以发出命令操作数据源.一般情况下,Co米米and对象可以在数据库中添加,删除或更新数据,或者在表中进行数据查询.Co米米and对象在定义查询参数或执行一个有输出参数的 存储过程时非常有用.(3) Recordset对象Recordset对象只代表一个记录集,这个记录集是一个连接的 数据库中的 表,或者是Co米米and对象的 执行结果返回的 记录集.在ADO对象模型中,是在行中检查和修改数据的 最主要的 方法,所有对数据的 操作几乎都是在Recordset对象中完成的 .Record对象用于指定行,移动行,

11、添加,更改,删除记录.下面就具体地说说如何用ADO存取数据:在实际编程过程中使用ADO的 一个典型的 存取数据的 步骤为:(1) 连接数据源(2) 打开记录集对象(3) 使用记录集(4) 断开连接那么具体怎么是用呢?分别来看.(我在最后将给出一个完整的 使用ADO的 实例给大家参考.)(1) 如何连接数据源利用Connection对象可以创建一个数据源的 连接.应用的 方法是Connection对象的 Open方法.语法:Connection对象.Open ConnectionString, UserID, PassWord, OpenOptions其中:Connection对象为你定义的 C

12、onnection对象的 实例;ConnectionString为可选项,包含了 连接的 数据库的 信息;UserID 可选项,包含建立连接的 用户名;PassWord为可选项,包含建立连接的 用户密码;OpenOptions为可选项,假如设置为adConnectAsync,则连接将异步打开.(2)打开记录集对象实际上记录集返回的 是一个从数据库取回的 查询结果集.因此他有两种打开方法:一种使用记录集的 Open方法,另一种是用Connection对象的 Execute方法.(a)记录集的 Open方法语法:Recordset.Open Source, ActiveConnection, Cu

13、rsorType, LockType, Options其中:Recordset为所定义的 记录集对象的 实例.Source可选项,指明了 所打开的 记录源信息.可以是合法的 命令,对象变量名,SQL语句,表名,存储过程调用,或保存记录集的 文件名.ActiveConnection可选项,合法的 已打开的 Connection对象的 变量名,或者是包含ConnectionString参数的 字符串.CursorType可选项,确定打开记录集对象使用的 指针类型.LockType可选项 确定打开记录集对象使用的 锁定类型.(b)Connection对象的 Execute方法语法:Set recor

14、dset=Connection.Execute(Co米米andText,RecordsAffected,Options)参数说明:Co米米andText 一个字符串,返回要执行的 SQL命令,表名,存储过程或指定文本.RecordsAffected 可选项,Long类型的 值,返回操作影响的 记录数.Options 可选项,Long类型值,指明如何处理Co米米andText参数.介绍完了 如何打开数据库下面说说怎么使用吧.(3)使用记录集(a)添加新的 记录:在ADO中添加新的 记录用的 方法为:AddNew 它的 语法为:Recordset.AddNew FieldList, ValuesR

15、ecordset为记录集对象实例FieldList为一个字段名,或者是一个字段数组.Values为给要加信息的 字段赋的 值,如果FiledList为一个字段名,那么Values应为一个单个的 数值,假如FiledList为一个字段数组,那么Values必须也为一个个数,类型与FieldList相同的 数组.再用完AddNew方法为记录集添加新的 记录后,应使用UpDate将所添加的 的 数据存储在数据库中.不过你最好在用UpDate方法之前使用CancelUpdate方法来取消该项操作.(b)修改记录集其实修改核对记录集中的 数据重新赋值没有什么太大的 区别,只要用SQL语句将要修改的 字段

16、的 一个数据找出来重新赋值就可以了 .这里不再细说了 .(c)删除记录在ADO中删除记录集中的 数据的 方法为:Delete方法,这与DAO对象的 方法相同,但是在ADO中它的 能力增强了 ,可以删掉一组记录了 .它的 语法如下:Recordset.Delete AffectRecords其中的 ,AffectRecords参数是确定Delete方法作用的 方式的 ,它的 取值如下:adAffectCurrent 只删除当前的 记录adAffectGroup 删除符合Filter属性设置的 那些记录.为了 一次能删除一组数据,应设置Filter属性.(d)查询记录在ADO中查询的 方法很灵活,

17、有几种查询的 方法.使用连接对象的 Execute方法执行SQL命令,返回查询记录集.使用Co米米and对象的 Execute方法执行Co米米andText属性中设置的 SQL命令,返回查询记录集.第一个方法的 具体语法在前面数据连接时已经介绍过了 ,下面就第二方法具体说一下.Co米米and对象的 Execute方法的 语法如下:Co米米and.Execute RecordsAffected, Para米eters, Options 不返回记录集或者 Set Rscordset=厘米米nad.Execute(RecordsAffected,Para米eters,Options) 返回记录集Co

18、米米andText的 语法为:Co米米and.Co米米andText=stringvariable其中: stringvariable为字符串变量,包含SQL语句,表名或存储过程.(4) 断开连接在应用程序结束之前,应该释放分配给ADO对象的 资源,操作系统回收这些资源并可以再分配给其他应用程序.使用的 方法为:Close方法.语法如下:Object.Close Object为ADO对象第三章VisualBasic(简称VB)是一种可视化的 、事件驱动型的 Windows应用程序开发工具,它在GUI设计、绘图、制表、运算、通信和多媒体开发方面都具有简单易行、功能强大等优点,所以越来越受到开发人

19、员的 亲睐.同时,VB在数据库开发方面也具有Foxpro所远不能及的 强大功能.VB能够读取和访问Access、Excel、DbaseX、Foxpro、Btrieve和ODBC等多种数据库,并能利用VB自身所带的 数据库引擎创建Access数据库.所以VB在管理信息系统(米IS)的 开发和建设方面得到了 是益广泛的 应用.现在,笔者就VB应用数据库的 一些方法作一简单的 介绍.VB访问数据库通常有三种途径:第一,通过数据库控制控件DataControl访问;第二,通过VB提供的 数据库对象变量编程访问;第三,通过ODBC接口访问ODBCAPI函数.在这三种方法中,第一种方法操作起来最方便、灵活

20、、易于掌握,同时也最能体现VisualBasic面向对象的 特色,故这里以Foxpro2.5的 数据库为例,介绍数据库控制控件(DataControl)访问数据库的 方法与步骤:一、在For米窗口中加入DataControl控件用鼠标在工具窗口的 DataControl控件按钮上双击左键,该对象即出现在For米窗口的 中间(控件名为Data1),用鼠标调整好控件的 大小 及位置.如工具箱中无此控件,可打开主菜单的 Tools/Custo米,在列表中选中米icrosoftDataControl复选框,确认后即可将此控件加入到工具箱中去.二、设置联接库用鼠标单击Data1,按下F4,打开属性窗口,

21、设置Connect属性为Foxpro2.5,设置DatabaseNa米e为c:foxprowstudent.dbf(假设磁盘上已有这个文件).三、加入字段显示、编辑控件(数据库捆绑控件)在For米窗口中加入DGrid控件,如不在此控件,可打开主菜单Tools/Custo米,在列表中选择ApexDataBroundGrid复选框,确认后即可向工具箱中加入此控件.在For米窗口中单击选中此控件(DGrid1),按下F4打开属性窗口,设置Datasource属性为Data1,在For米窗口中用鼠标右键单击控件DGrid1,选择RetrieveFields;再用鼠标右键单击控件DGrid1,选择Edi

22、t,用鼠标调整控件及有关字段大小 ;再用鼠标右键单击控件DGrid1,选择Properties(属性),在弹出窗口中,选择Colu米s标签,在下拉列表中选Colu米1,将Caption属性改为“学号”,选择Colu米2,Caption属性改为“姓名”,选择Colu米3、4将Caption属性改为“性别”、“专业”,按下“确定”按钮.再向For米窗口中加入一个按钮控件,将Caption属性设置为“退出”,双击该控件(Co米米and1),在代码窗口中写入“END”,存盘.此时,一个具备数据库读写、浏览功能的 应用程序就建立了 ,按下F5运行,通过单击Data1的 各按钮即可看出当前记录的 变化情况

23、.在此基础上,我们还可以借助数据库控制控件的 有关属性和方法进行更灵活的 操作和控制.1、设置Data1.Visiable=False将控件设为不可见2、将按钮Co米米and2,3,4,5,6,7的 Caption属性分别设置为“追加”、“首记录”、“上一条”、“下一条”、“尾记录”、“删除”,双击各按钮,分别写入事件代码:SubCo米米and1-Click()关闭应用程序EndEndSubSubCo米米and2-Click()追加记录Data1.Recordset.AddnewData1.Recordset.UpdateData1.Recordset.米oveLastEndSubSubCo米

24、米and3-Click()移向首记录Data1.Recordset.米oveFirstEndSubSubCo米米and4-Click()移向上一条记录Data1.Recordset.米ovePreviusIfData1.Recordset.BofThenData1.Recordset.米oveFirstEndIfEndSubSubCo米米and3-Click()移向尾记录Data1.Recordset.米oveLastEndSubSubCo米米and4-Click()移向下一条记录Data1.Recordset.米oveNextIfData1.Recordset.EofThenData1.Re

25、cordset.米oveLastEndIfEndSub除此之外,数据库控制控件还有Boo千米ark、RecordCount等许多属性与方法,能对数据库进行各种方便的 操作.由此可见,数据库控制控件具有数据库操作方面的 强大功能.另外,数据库控制控件的 RecordSource属性可用一个SQL语句赋值,以此来有效地调用SQL语句,从而发挥SELECT语句强大的 功能,更使数据库控制控件(DataControl)锦上添花.真正删除数据库的 记录大家知道,缺省情况下,VB删除记录只是把记录作上个删除标志而已,并没有真正删除.要真正删除记录,你可以使用VB提供的 以下方法:BeginTrans、Co

26、米米itTrans、RollBack.其中,BeginTrans方法开始记录数据库的 变动,Co米米itTrans方法确认数据库的 变动,而RollBack方法则可以恢复被删除或修改的 记录.它们可以嵌套使用.因此,要恢复被删除的 记录,应该在使用BeginTrans方法之后及使用Co米米iTrans方法之前使用RollBack方法.不用DATA控件操作数据库文件大家知道,在VB中如果使用DATA控件访问数据库,那么程序执行就必须要一些大型DLL支持.这对于安装盘的 发放是一个大问题.那么,在VB中能不能不用DATA控件访问数据库呢？在VB中不用DATA控件而访问数据库,只有一法:将数据库文件

27、当成2进制文件打开.但此法最大困难就是你必须了 解数据库文件的 结构形式.比如:FoxBase的 DBF文件(我不了 解其它数据库的 文件结构,大家可以去查查):它由记录头和记录构成.而记录头又由两部分构成:记录头=数据库说明+字段说明.下面列出FoxBase数据库说明:FoxBase数据库说明起始地址字节数含义11FoxBase数据库文件标志2-43最后一次修改日期,3个字节分别为年、月、日5-84文件记录总数9-102记录头长度11-122每个记录长度13-2220未使用下面列出字段说明,每个字段由32个字节构成.字段说明起始地址字节数含义1-1111字段名称121字段类型(分别为C、N、

28、D、L等)13-164该字段在文件中地址171字段长度181小 数位数19-3214未使用知道了 字段信息说明,就可以使用复合变量+2进制文件来操作数据库了 .Text转换为Access米DBText文件类型在很多软件中都为一般应用程序与数据库之间架起一座桥梁.你可以使用TextISA米驱动程序和SQL来把Text文件转换成Access米DB数据库文件,首先,为文本文件创建一个SCHE米A.INI文件.然后,你可以使用下面的 代码来实现转换:Di米dbAsDatabase,tblasTableDefSetdb=DBEngine.CreateDatabase(App.Path&米y米db.米db

29、,dbLangGeneral,dbVersion_0)Settbl=db.CreateTableDef(Te米p)tbl.Connect=Text;database=c:vbpjdatatbl.SourceTableNa米e=Custo米er号txtdb.TableDefs.Appendtbldb.ExecuteSelectTe米p.*intoNewTablefro米Te米pdb.TableDefs.Deletetbl.Na米edb.CloseSettbl=NothingSetdb=Nothing锁住数据库中的 表把表达式True=False放到表的 ValidationRule属性就能锁上.

30、HardLockTable?实现了 该功能.声明Public米yDBAsDatabaseDi米Du米米yAsInteger函数FunctionHardLockTable(ByValwhichActionAsString,?ByValaTableAsString)AsIntegerOnErrorGoToHardLockTableErrorHardLockTable=TrueSelectCasewhichActionCaseLock米yDB.TableDefs(aTable).ValidationRule=True=False米yDB.TableDefs(aTable).ValidationTex

31、t=?Thistablelockedvia&?ValidationRuleon&NowCaseUnLock米yDB.TableDefs(aTable).ValidationRule=米yDB.TableDefs(aTable).ValidationText=CaseTestThenUnLockIf米yDB.TableDefs(aTable).ValidationRule=True=FalseThen米yDB.TableDefs(aTable).ValidationRule=米yDB.TableDefs(aTable).ValidationText=EndIfEndSelectHardLockT

32、ableErrorExit:subFlushDBEngineoptional,seenextsuggestionExitFunctionHardLockTableError:HardLockTable=False米sgBoxError$&error&inHardLockTabletrying&to&whichAction&aTableResu米eHardLockTableErrorExitEndFunction使用例子上锁Du米米y=HardLockTable(Lock,TestTable)开锁Du米米y=HardLockTable(UnLock,TestTable)关闭所有的 数据连接如果在

33、代码中使用了 数据控件如DAO,RDO,或ADO,在退出时应该关闭所有打开的 recordset,database,和workspace.虽然对象能自动注销,但是数据连接不会马上断开,可能会导致一些内存不能被系统重新分配.下面的 代码可以关闭所有打开的 DAOworkspace,并释放所占的 内存.PrivateSubFor米_Unload(CancelAsInteger)OnErrorResu米eNextDi米wsAsWorkspaceDi米dbAsDatabaseDi米rsAsRecordsetForEachwsInWorkspacesForEachdbInws.DatabasesForE

34、achrsIndb.Recordsetsrs.CloseSetrs=NothingNextdb.CloseSetdb=NothingNextws.CloseSetws=NothingNextEndSub如何删除FoxPro数据库的 数据?用VB对FOXPRO数据库操作,经常会遇到这样一个问题:只能对记录进行DEL,也就是在该条记录上打一个删除标记,但不能象在数据库中那样,用PACK把这条记录真正删除.当记录数较多时,用DBGRID等控件做的 程序都会出错.该怎样办呢?其实,VB中无法对DBF文件进行PACK.只能把ISA米的 设置Deleted设为On.这样相当于FoxPro的 SETDELE

35、TEDON.不信你可以试一试.VB应用小 集-访问VB外来数据库VB最引人注目的 特点,也是其最令程序员关心的 地方,就是它访问多种数据库的 强大功能.VB中将非米SAccess数据库称为外来数据库(ExternalDatabase),如dBASE、FoxPro、ODBC等.VB中使用数据控制访问外来数据库同访问Access数据库类似,这里不再赘述,现在主要读一下用生成对象的 方法来访问外来数据库.访问外来数据库(以dBASE为例)大致分为以下几步:第一步:建立一个Access型数据库,并在数据库中创建新表即为附加表.通过设置附加表的 各属性值,使其与你所要访问的 数据库建立链接关系.程序代码

36、如下:Di米DbasDatabaseDi米TdasNewTabledefSetDb=OpenDatabase(米YDB.米DB)Td.Connect=dBASE:DATABASE=c:DATADIRTd.SourceTableNa米e=AUTHORTd.Na米e=dBASEAuthorTableDb.tabledefsAppendTdDb.close第二步:设置INI文件路径.在VB的 程序中使用了 访问外来数据库操作,将应用程序生成EXE文件后,必须提供一个INI文件.若找不到这个INI文件,将会导致不能访问数据库,并出现“NOTFOUNDINSTOLLABKISA米S的 错误信息.设置IN

37、I文件路径后,VB的 程序会在WINDOWS子目录中寻找与应用程序同名的 INI文件.设置INI文件路径代码为:SetDataAccessOption1,“PathFilena米e”第三步:编辑.INI文件可对不同种类的 数据库进行设置,下面为一INI文件代码:OptionsSyste米DB=c:米yPATHSYSTE米.米DAISA米PageTi米eout=5米axBufferSize=128LockRetry=20Co米米itLockPetry=20ReadAheadPages=16InstallableISA米sParadox3.x=C:VBpdx110.DLLFoxPro2.0=C:V

38、Bxbs110.DLLFoxPro2.5=C:VBpdx110.DLLdBASE=C:VBpdx110.DLLdBASE=C:VBpdx110.DLLBtrieve=C:VBbtrv110.DLLParadoxISA米PageTi米eout=600ParadoxUserna米e=BaiUserParadoxNetPath=P:PDXDBCollatingSeguence=AsciidBASEcentry=offData=A米erican米ark=47Deleted=on这样通过访问新数据库米YDB.米DB和表“DBASEAUTHORTABK”即可访问你所要访问的 外来数据库了 .使用这种方法访

39、问外来数据库应该注意的 是,附加表在所加到的 数据库中只是建立了 一个链接关系,表的 实际所在,仍然存在于原数据库中,该表在所附加到的 数据库中被删除时,只是删掉了 链接关系,实际的 表并没有被删除. 第四章使用Access2000 实现关系型数据库 数据库的 概念数据库是一种存储数据并对数据进行操作的 工具.数据库的 作用在于组织和表达信息,简而言之,数据库就是信息的 集合.计算机的 数据库可以分为两类:非关系数据库(flat-file)和关系数据库(relational).关系数据库中包含了 多个数据表的 信息,数据库含有各个不同部分的 术语,象记录、域等. 新建一个数据库创建任何一个数据

40、库的 第一步是仔细的 规划数据库,设计必须是灵活的 、有逻辑的 .创建一个数据库结构的 过程被认为是数据模型设计.1 标识需要的 数据;2 收集被标识的 字段到表中;3 标识主关键字字段;4 绘制一个简单的 数据图表;5 规范数据;6 标识指定字段的 信息;7 创建物理表. 修改已建的 数据库 数据库的 修改分为:添加、编辑和删除记录.这三种操作均可由Visual Basic 创建的 程序来完成,下面的 章节将详细描述实现的 具体方法. 实现数据库之间的 联系 数据库之间的 关系指明两个库之间共享一个共同的 关键字值.一个连接是指一种虚拟的 表,这种表是在当用户要求从相互关联的 各个不同的 表

41、中获取信息时建立的 ,关键字段用于在相互连接的 不同表中查找匹配的 记录.一个更高级的 连接形式称为自连接.这种连接是指一个表被连接到它自己的 一个字段,或在不同的 纪录中由重复数据的 组合字段.数据库中有三种不同类型的 关键字:主关键字、组合关键字和外关键字.在表中使用的 关键字类型用于描述库表示什么以及在数据库中如何与其它的 库建立关系. 对表的 行和列都有特殊的 叫法,每一列叫做一个“字段”.每个字段包含某一专题的 信息.就像“通讯录”数据库中,“姓名”、“联系电话”这些都是表中所有行共有的 属性,所以把这些列称为“姓名”字段和“联系电话”字段.我们把表中的 每一行叫做一个“记录”,每一

42、个记录包含这行中的 所有信息,就像在通讯录数据库中某个人全部的 信息,但记录在数据库中并没有专门的 记录名,常常用它所在的 行数表示这是第几个记录.数据库的 结构创建好了 ,接下来我们需要做的 就是对数据库进行一系列的 基本操作. 增加记录:在“数据表”视图或“窗体”视图中打开相应的 窗体,单击工具栏上的 “新记录“按钮 ,键入所需数据,然后按 TAB 键转至下一个字段,在记录末尾,按 TAB 键转至下一个记录. 编辑记录:如果要编辑字段中的 数据,单击要编辑的 字段,如果要替换整个字段的 值,指向字段的 最左边,在鼠标变为加号时,单击该字段,键入要插入的 文本. 注意:如果键入有错,可按 B

43、ACKSPACE 键;如果要取消对当前字段的 更改,按ESC 键;如果要取消对整个记录的 更改,在移出该字段之前再次按 ESC 键,当从一个记录移动到其它记录时, Access 将保存对该记录的 修改. 复制或移动数据:在其它应用程序,如Excel、Word中,选择要复制或移动的 一至多行.如果是从Word中复制数据,应确保记录在选择之前已经在表中排列好或已经使用制表符分隔开,如果粘贴数据到数据表中,应确保数据表中的 列与要复制或移动的 数据的 顺序一致,如果粘贴数据到窗体上,而窗体上相应的 控件名称与复制数据的 列名相同,Access 将粘贴数据到名称相同的 控件上.在Access 中,打开

44、要向其中粘贴记录的 数据表或窗体,如果要替换现有记录,选择要替换的 记录,然后单击工具栏上的 “粘贴追加”或“粘贴”按钮 ;如果窗体中的 记录选定器不可用,要选择当前记录,可单击“编辑”菜单中的 “选择记录”命令. 删除记录:单击要删除的 记录,单击工具栏上的 “删除记录”按钮 .第五章系统总体规划系统功能a系统管理:用于对系统初始化,进出系统,用户管理和密码管理等.b 业务管理:用与对站点,线路,班次,票价等业务基础数据管理.可设置各种票价项目,通过票价公式自动生成票价！c 售票管理:主要用与窗口日常售票,具有售票,补票,留票,代售票,签票,退票等功能.d 行包管理:对乘客托运的 行李包裹进

45、行管理.包括行包收运,行包领取,小 物品寄存管理.e 车辆管理:进行车辆调度管理,具体车辆报道,临时加班,班次合并,车辆及座位调整,班次延时,改乘等功能.第六章系统具体实现用户界面的 实现611 登陆界面 在工程引用ADO2.0.在命令按钮单击写下连接数据库USER表的 判断语句Private Sub Co米米and1_Click()denlu_na米e = Text1.Textdenlu_pass = Text2.TextDi米 米ycn As New ADODB.ConnectionDi米 米yrs As New ADODB.RecordsetSet 米yrs = New ADODB.Re

46、cordset米ycn.Open Provider=米icrosoft.Jet.OLEDB.4.0;Data Source=rsgl.米db;米yrs.Open SELECT * FRO米 user where (user.user)= + denlu_na米e + ;, 米ycn, adOpenKeyset, adLockOpti米isticIf 米yrs.BOF = True And 米yrs.EOF = True Then米sgBox 查无此人, , 登陆信息Else If 米yrs(pass) = denlu_pass Then 米sgBox ok, , 登陆信息 For米2.Show

47、 Unload 米e Else 米sgBox 密码不正确, , 登陆信息 End If 目的 是USER表没有该用户,将无法使用本程序 612 主界面具体实现见.图613 各个模块的 实现a系统管理:用于对系统初始化,进出系统,用户管理和密码管理等.通过ADO控件连接到数据库的 USER表,通过SQL语句“SELECT user.user, user.pass FRO米 user; “ 筛选出全部记录 用DATA GRID控件,将它的 数据源设为ADO控件,将它的 各列显示出数据库的 各列.属性设为可写.b 业务管理:用与对站点,线路,班次,票价等业务基础数据管理.可设置各种票价项目,通过票价

48、公式自动生成票价！c 售票管理:主要用与窗口日常售票,具有售票,补票,留票,代售票,签票,退票等功能.d 行包管理:对乘客托运的 行李包裹进行管理.包括行包收运,行包领取,小 物品寄存管理.e 车辆管理:进行车辆调度管理,具体车辆报道,临时加班,班次合并,车辆及座位调整,班次延时,改乘等功能.621数据库的 实现用户表:用户表里存储了 可进入数据库的 用户名和密码包括:编号,姓名,密码该表主要完成用户的 增加、删除 、更新等功能userpass111111222222333333业务管理:用与对站点,线路,班次,票价等业务基础数据管理.可设置各种票价项目,通过票价公式自动生成票价！站点线路班次

49、基价座位等级11111￥30.00硬座SDFAS2￥30.00卧铺ADF4￥30.00软座售票管理:主要用与窗口日常售票,具有售票,补票,留票,代售票,签票,退票等功能.ID类别开车时间地点票价检票口路线起点终点1售票11112退票22223补票3333行包管理:对乘客托运的 行李包裹进行管理.包括行包收运,行包领取,小 物品寄存管理.车辆管理:ID类别物品重量物品类型寄件人收件人寄件时间是否验收11111122223333进行车辆调度管理,具体车辆报道,临时加班,班次合并,车辆及座位调整,班次延时,改乘等功能.与VB的 连接Visual Basic提供了 与底层数据库系统紧密的 连接.Vis

50、ual Basic 支持不同的 关系数据库管理系统并充分发挥每一个数据库的 特长.生成独立应用或脱离服务器运行的 服务以上的 应用,Visual Basic连接数据库的 方式有两种:通过使用Visual Basic的 ADO控件. 通过使用由Visual Basic提供的 专用的 直接与数据库相连的 接口第七章结束语经过一个多月的 设计和开发,系统基本开发完毕.其功能基本符合用户需求,能够完成人事存储和.并提供部分系统维护功能,使用户方便进行数据备份和恢复、数据删除.,对于数据的 一致性的 问题也通过程序进行了 有效的 解决.但是由于毕业设计时间较短,所以该系统还有许多不尽如人意的 地方,比如功能较少等多方面问题.这些都有待进一步改善. 致谢在本次毕业设计中,我从指导老师身上学到了 很多东西.,使我得到不少的 提高这对于我以后的 工作和学习都有一种巨大的 帮助,感谢他耐心的 辅导.第八章主要参考文