(最新整理)VB_学生成绩查询系统

1、(完整)vb_学生成绩查询系统 0 (完整)vb_学生成绩查询系统 编辑整理： 尊敬的读者朋友们： 这里是精品文档编辑中心，本文档内容是由我和我的同事精心编辑整理后发布的，发布之前我们 对文中内容进行仔细校对，但是难免会有疏漏的地方，但是任然希望（(完整)vb_学生成绩查询系 统）的内容能够给您的工作和学习带来便利。同时也真诚的希望收到您的建议和反馈，这将是我 们进步的源泉，前进的动力。 本文可编辑可修改，如果觉得对您有帮助请收藏以便随时查阅，最后祝您生活愉快 业绩进步，以 下为(完整)vb_学生成绩查询系统的全部内容。 (完整)vb_学生成绩查询系统 0 山东凯文科技职业学院山东凯文科技职业

2、学院 20112011 届毕业论文届毕业论文 基于 vb 的图书管理系统 学 院： 信息学院 学生姓名： 李雪丽 指导教师: 戴洪刚 专 业： 08 软件技术 班 级： 1 班 完成时间： 2011 年 6 月 29 日 摘要 随着人类社会的发展，人类对知识的需求也不断地增长。在这种形势下, (完整)vb_学生成绩查询系统 1 书籍就渐渐地成为人们获取并增长知识的主要途径，而图书馆就自然而然地在人们的 生活中占据了一定的位置，如何科学地管理图书馆不但关系到读者求知的方便程度， 也关系到图书馆的发展,因此，开发一套完善的图书馆管理系统就成不可少了，本文 介绍了在 visual basic6.0

3、环境下采用 “自上而下地总体规划，自下而上地应用开 发的策略开发本系统的详细过程，提出实现图书馆信息管理、资源共享的基本目标， 从而推动迈向数字化图书馆的步伐，并阐述系统结构设计和功能设计，从图书的入库 登记到查询浏览，从借书证发放到图书的借阅，形成了一个整体自动化管理模式，从 软件工程的角度进行了科学而严谨的阐述。 关键词：图书管理;借阅；浏览；visual basic6。0 abstract with the development of society , mankind need more knowledge also constantly increase， under this f

4、situation, book gradually become the main path to obtain the knowledge of life， and library naturally occupied in people certainly position, how science ground the management library not only relate to the convenient degree that the reader beg to know， but also relate to the library that strategy of

5、 development， therefore， develop the management system of a perfect library cant little, this text introduced under the visual basic6。0 the environment adoption from top to bottom total programming， from the detailed process that bottom but up applied development develop this system, from the step t

6、hat but the push head into the arithmetic figure of the library， and shows the system construction design and function design, from the books of store in warehouse to register the search to view, books that issue from library card to angle of borrow ， become a the whole automation the management the

7、 mode， and proceeds careful explain from the software engineering science keywordskeywords：library ；borrow;search to view；visual basic6。0 目录 摘要 .1 (完整)vb_学生成绩查询系统 2 1 概 述 .3 1.1 数据库及其应用.3 1。2 数据库系统.3 1。3 数据库系统简介.4 2 数据库系统设计 .5 2。1 数据库设计概述.5 2.2 数据库设计周期.5 2.3 数据库开发工具简介（microsoft access2003）.6 2。4 图书管

8、理系统数据库设计.6 2.4。1 数据库需求分析 .6 2。4。2 数据库概要设计 .7 2。4.3 数据库的具体实现 .8 3 系统总体设计 .11 3。1 图书管理系统简介 .11 3.2 系统功能描述 .1 3。3 系统模块划分 .1 3.4 系统流程分析 .2 3。5 开发工具简介（visual basic6.0） .3 3.6 系统详细设计.4 3.6。1 启动界面设计.4 3。6.2 登陆界面设计.4 3.6。3 主界面设计.5 (完整)vb_学生成绩查询系统 3 3。6。4 其他功能模块设计.5 总 结 .9 参 考 文 献 .9 谢 辞 .9 附录（系统原程序） .10 1 概

9、 述 1。1 数据库及其应用 自 20 世纪 70 年代以来,数据库技术得到迅速发展.目前世界上已经有数百万个数据库系 统在运行，其应用已经深入到社会生活的各个领域,从企业管理，银行管理,资源管理,经济预 测一直到信息检索，档案管理,普查统计等。我国 20 世纪 90 年代初在全国范围内装备了 12 个 以数据库为基础的大型计算机系统，这些系统分布在邮电，计委，银行,电力,铁路,气象，民 航,情报,公安,军事,航天和财税等行业。 现在,数据库技术还在不断发展，并且不断的与其它计算机技术相互渗透。数据库技术与 网络通信技术相结合,产生了分布式数据库系统.数据库技术与面象对象技术相结合,产生了面

10、向对象数据库系统等各种数据库系统。 在人类迈向 21 世纪知识经济的时候，信息变为经济发展的战略资源,信息技术已成为社 会生产力重要的组成部分。人们充分认识到，数据库是信息化社会中信息资源管理与开发利用 的基础.对于一个国家,数据库的建设规模，使用水平已成为衡量该国信息化程度的重要标志. 因此,数据库的学习是非常重要的。 1。2 数据库系统 数据库系统本质上是一个用计算机存储记录的系统。数据库本身可被看作为一种电子文 件柜:也就是说，它是收集计算机数据文件的仓库或容器。系统用户可以对这些文件执行插入 (完整)vb_学生成绩查询系统 4 数据、检索数据、更改数据、删除数据等一系列操作。 总之，数

11、据库系统是一个计算机存储记录的系统，即,它是一个计算机系统，该系统的目 标存储信息并支持用户检索和更新所需要的信息.图 12 是一个数据库系统的简图。 图 12 数据库系统简图 1。3 数据库系统简介 本人设计的是一个关于图书馆图书管理的数据库系统,通过这个系统管理员可以简捷、 方便的对图书记录查阅、增加、删除等功能，而用户也可以通过这个系统对进行图书查询、借 阅、归还等功能。 该数据库应用程序按照用户权限和实现功能的不同分为两部分：外部学生对数据库的查 询访问和内部管理人员对数据记录的管理维护.每一部分中包含各自实现的各项功能，对每一 项功能的实现，将按照窗体设计以及运行情况的顺序逐一进行设

12、计. 本系统采用 microsoft access 技术建立数据库，使用 vb 技术建立数据源的链接,并且 生成图书管理的数据库应用程序从而实现数据库的管理功能. (完整)vb_学生成绩查询系统 5 2 数据库系统设计 2。1 数据库设计概述 计算机信息系统以数据库为核心,在数据库管理系统的支持下，进行信息的收集、整理、 存储、检索、更新、加工、统计和传播等操作。 对于数据库应用开发人员来说，为使现实世界的信息流计算机话，并对计算机话的信息 进行各种操作，就是如何利用数据库管理系统、系统软件和相关硬件系统,将用户的要求转化 成有效的数据结构，并使数据库结构易于实现用户新的要求的过程。 确切的说

13、，数据库设计是指对于一个给定的应用环境,提供一个确定最优数据模型与处 理模式的逻辑设计，以及一个确定数据库存储结构与存取方法的物理设计，建立起既能反映现 实世界信息和信息联系,满足用户数据要求和加工要求，有能被某个数据库管理系统所接受， 同时能实现系统目标，并有效存取数据的数据库。 2。2 数据库设计周期 根据软件工程的思想，数据库设计的周期可以划分为六个阶段： （1） 规划阶段 确定开发的总目标，给出计划开发的软件系统的功能、性能、可靠性以及接等方面的设 想. （2） 需求分析阶段 认真细致地了解用户对数据的加工要求，确定系统的功能与边界.本阶段的最终结果， 提供一个可作为设计基础的系统说明

14、书,包括对软硬件环境的要求和一整套完善的数据流程图。 (完整)vb_学生成绩查询系统 6 （3) 设计阶段 把需求分析阶段所确定的功能细化，主要工作是概念设计阶段、逻辑设计阶段、物理设 计阶段，然后，对每个阶段内部设计详细的流程。 （4） 程序编制阶段 以一种或几种特定的程序设计语言表达上一阶段确定的各模块控制流程。程序编制时应 遵循结构化程序设计方法。 （5） 调试阶段 对已编好的程序进行单元调试(分调),整体调试（联调）和系统测试（验收）. （6） 运行和维护阶段 这是整个设计周期最长的阶段，其工作重点是收集和记录系统实际运行的数据。在运行中， 必须保持数据库的完整性，必须有效的处理数据故

15、障和进行数据库恢复。同时解决开发过程的 遗留问题，改正错误进行功能完善。 2.3 数据库开发工具简介(microsoft access2003） access 是 office 办公套件中一个极为重要的组成部分.刚开始时微软公司是将 access 单 独作为一个产品进行销售的，后来微软发现如果将 access 捆绑在 office 中一起发售，将带来 更加可观的利润，于是第一次将 access 捆绑到 office97 中,成为 office 套件中的一个重要成 员。现在它已经成为 office 办公套件中不可缺少的部件了。自从 1992 年开始销售以来， access 已经卖出了超过 600

16、0 万份,现在它已经成为世界上最流行的桌面数据库管理系统。后 来微软公司通过大量地改进，将 access 的新版本功能变得更加强大。不管是处理公司的客户 订单数据;管理自己的个人通讯录;还是大量科研数据的记录和处理,人们都可以利用它来解决 大量数据的管理工作. 2.4 图书管理系统数据库设计 2.4。1 数据库需求分析 随着社会发展，人类的生产、生活越来越离不开信息.谁拥有了更多更有效的信息,谁就将 在竞争中处于有利地位.信息产业正在成为一个国家的支柱。数据作为信息的载体,其管理工具 数据库对于信息技术的重要性，正日益得到人们的重视。只有拥有了先进的数据库技术，才能 有效地管理好浩如烟海的数据

17、,并从中提取出对自己有用的信息来加以利用。从 60 年代末期开 始，数据库系统已经经过了 30 多年的历程，经历了两代的演变.第一代数据库系统是层次与网 络的数据库系统.第二代数据库系统是关系数据库系统。30 年来，人们主要致力于第二代数据 库系统的理论研究和系统开发,取得了辉煌成就。完善关系理论的确立标志着关系数据库系统 理论趋于完善。商品化的 db2，ingres,oracls。sybase，sql server 等关系数据库的出现标 (完整)vb_学生成绩查询系统 7 志着关系数据库系统已经接近顶峰.第一代和第二代数据库系统的设计目标源于商业事务处理。 多年来，这两代数据库系统主要用于银

18、行，飞机定票等事务处理.80 代以来，随着计算机应用 领域的迅速扩大，新的数据库应用等。针对新一代数据库应用。从 80 年代至今,人们一直在探 索新一代的数据库系统的理论，技术和方法。 在设计家庭图书管理系统之前,我们应当知道什么是数据库以及 vb6。0 的开发环境。所谓 数据库是指以一定的组织方式存储在一起的,能为多个用户所共享的，与应用程序彼此独立的 相关联的数据集合.而数据库系统是指实现有组织的动态的存储大量关联数据，支持多用户访 问的计算机软硬件资源与数据库管理员组成的系统。我们的系统是按用户的需求进行数据库定 义、存取、运行、建立和维护功能，系统的数据库定义模型图： 数据库定义模型图

19、 2.4.2 数据库概要设计 软件系统本质上是信息处理系统,因此，在软件系统的整个开发过程中都必须考虑两方面 的问题-“数据”及对数据的“处理”.为了把用户的数据要求清晰明确地表达出来，系统分 析员通常建立一个概念性的数据模型.概念性数据模型是一种面向问题的数据模型，是按照用 户的观点来对数据和信息建模，它描述了从用户角度看到的数据，它反映了用户的现实环境， 且与在软件系统中的实现方法无关。这里我们运用最常用的表示概念性数据模型的方法,是实 体-联系方法即 e-r 模型。通常，软件系统中有许多数据是需要长期保存。为减少数据冗余， 简化修改数据的过程,实现对数据进化规范化。 (完整)vb_学生成

20、绩查询系统 8 数据库表的关系 数据库 er 图 由 er 图转换成关系模式如下： 图书关系图： 图书名图书类别作者书籍号出版社录入时间 高等数学 ssss * 0001 高等教育20061 数据库 sss 。 。 。.。 0003 工业出版 20066 读者关系图： 读者姓 名 读者编 号 性别读者类 别 工作单 位 家庭住 址 联系电 话 录入时 间 汤水平 001 男 dff 宜春学 1111112678 2006 (完整)vb_学生成绩查询系统 9 院 3 223003 女 fdfdfdfd .。 。 466665777 用户关系图： 用户名密码 admin 000000 2。4.3

21、数据库的具体实现 作为 microsoft 公司的本地数据库,access 在应用中使用的非常广泛，为此我选用 access 数据库来进行数据库的设计。根据前面定义的实体及实体之间的关系，形成数据库的表格以及 各个表之间的关系。 （1）用户信息表 说明：该表是为用户进入本系统而设置的用户权限,只有同时知道用户名和 所对应的密码才能进入本系统。 （2）读者信息表 说明：该表是对读者的信息进行管理. （3）读者类别表 说明：该表规定了读者的类别. (完整)vb_学生成绩查询系统 10 （4）图书信息表 说明：该表详细介绍了图书的相关信息。 （5）图书类别表 说明：该表对图书进行了分类. （6）借阅

22、信息表 说明：该表详细纪录了图书的借阅情况。 上述所做的各表都是围绕图书借阅系统而做的，所以做好这个方面信息表是本系统成功的 关键环节之一. (完整)vb_学生成绩查询系统 11 3 系统总体设计 3。1 图书管理系统简介 当今时代是飞速发展的信息时代。在各行各业中离不开信息处理,这正是计算机被广泛应 用于信息管理系统的环境。计算机的最大好处在于利用它能够进行信息管理。使用计算机进行 信息控制，不仅提高了工作效率，而且大大的提高了其安全性。 尤其对于复杂的信息管理，计算机能够充分发挥它的优越性。计算机进行信息管理与信息管理 系统的开发密切相关，系统的开发是系统管理的前提。本系统就是为了管理好图

23、书馆信息而设 计的。 图书馆作为一种信息资源的集散地，图书和用户借阅资料繁多,包含很多的信息数据的管理， 现今，有很多的图书馆都是初步开始使用，甚至尚未使用计算机进行信息管理。根据调查得知， 他们以前对信息管理的主要方式是基于文本、表格等纸介质的手工处理，对于图书借阅情况 （如借书天数、超过限定借书时间的天数）的统计和核实等往往采用对借书卡的人工检查进行， 对借阅者的借阅权限、以及借阅天数等用人工计算、手抄进行。数据信息处理工作量大，容易 出错；由于数据繁多，容易丢失，且不易查找。总的来说，缺乏系统，规范的信息管理手段。 尽管有的图书馆有计算机，但是尚未用于信息管理，没有发挥它的效力,资源闲置

24、比较突出， 这就是管理信息系统的开发的基本环境.数据处理手工操作，工作量大，出错率高,出错后不易 更改。图书馆采取手工方式对图书借阅情况进行人工管理，由于信息比较多，图书借阅信息的 (完整)vb_学生成绩查询系统 - 1 - 管理工作混乱而又复杂;一般借阅情况是记录在借书证上,图书的数目和内容记录在文件中，图 书馆的工作人员和管理员也只是当时对它比较清楚，时间一长，如再要进行查询，就得在众多 的资料中翻阅、查找了,造成查询费时、费力。如要对很长时间以前的图书进行更改就更加困 难了。 基于这此问题，我认为有必要建立一个图书管理系统，使图书管理工作规范化，系统化， 程序化,避免图书管理的随意性，提

25、高信息处理的速度和准确性,能够及时、准确、有效的查询 和修改图书情况。 (完整)vb_学生成绩查询系统 2 3.2 系统功能描述 1图书管理功能 为了方便图书的借阅管理，需要对图书的类别和信息加于管理。图书管理模块可实现以下 功能： 添加图书类别 修改图书类别 删除图书类别 添加图书信本系统的主要功能如下： 息 修改图书信息 删除图书信息 查询图书信息 2读者管理功能 为了方便对读者的管理，需要对读者的类别和信息加予管理。读者管理模块可实现以下功 能： 添加读者类别 修改读者类别 删除读者类别 添加读者信息 修改读者信息 删除读者信息 查询读者信息 3图书借阅管理功能 图书借阅模块功能实现如下

26、： 添加借书信息 查询借书信息 添加还书信息 4系统管理功能 系统管理模块功能实现如下： 添加管理员 修改管理员密码 注销 5.系统维护管理功能 系统维护主要是对系统的数据加予管理，其实现的功能如下: 数据备份 数据恢复 数据压缩 数据清理 (完整)vb_学生成绩查询系统 3 3.3 系统模块划分 根据上一小节介绍的功能，可以设计出系统的总体功能模块.如下图示。 图书馆管理系统功能模块示意图 在本系统中,系统管理模块功能比较简单.在系统初始化时,有一默认的“系统管理员用户 admin，由程序设计人员手动地添加到数据库中。admin 用户可以创建用户、修改用户信息以及 删除用户；普通用户则只能修

27、改自己的用户名和密码。系统用户管理模块的关系如下图： 系统管理功能模块关系图 3.4 系统流程分析 本节将对实例进行流程分析,所谓系统流程就是用户在使用系统是的工作过程。对于多类 型用户的管理系统来说，每一类用户的工作流程都是不相同的。多用户系统的工作流程都从用 户登陆模块开始的，对多用户的身份进行认证。身份认证可以分为以下两个过程： （1）确认用户是否是有效的系统用户。 （2）确定用户的类型。 第 1 决定用户能否进入系统。第 2 个过程根据用户的类型决定用户的操作权限，从而决定用户 的工作界面。本系统的流程分析如图如下： (完整)vb_学生成绩查询系统 4 系统流程分析图 进入系统后，不同

28、类型的用户所能进行的操作也不同.这些操作可以笼统的分为系统管理和 图书借阅管理模块. 3.5 开发工具简介(visual basic6.0) vb 是微软公司出品的一个快速可视化程序开发工具软件，借助微软在操作系统和办公软件 的垄断地位，vb 在短短的几年内风靡全球。vb 是极有和功能强大的软件，主要表现在：所见 即所得的界面设计,基于对象的设计方法,极短的软件开发周期，较易维护的生成代码.vb 程序 语言具有许多优秀的特性,用其设计应用程序时有两个基本特点：可视化设计和事件驱动编程。 可视化设计。 同其他的一些可视化程序开发工具一样，vb 具有可视化设计的特点,微软的 word 在刚刚进 入

29、市场时，同 wps 竞争的一个重要的功能砝码就是所见即所得”的字处理功能，vb 在设计应 用程序界面时也可以说是”所见即所得.在设计时，头脑中所想象的应用程序界面,完全可以 通过键盘鼠标以及徒手画出来，而不是编制大量的代码然后再编译生成，如果需要修改,也是 利用键盘鼠标和手画，而底层的一些程序代码由 vb 自动生成或修改.vb 为用户提供大量的界面 元素(在 vb 中称为控件对象）,这些控件对象对于熟悉 windows 应用程序的用户而言是一点也 不陌生，如”窗体、菜单” 、 ”命令按钮” 、 ”工具按钮” 、检查框等等，用户只需要利用鼠 标、键盘把这些控件对象拖动到适当的位置，设置它们的大小

30、、形状、属性等，就可以设计出 所需的应用程序界面. 事件驱动编程。 windows操作系统出现以来，图形化的用户界面和多任务多进程的应用程序要求程序设计不 能是单一性的，在使用vb设计应用程序时，必须首先确定应用程序如何同用户进行交互.例如 发生鼠标单击、键盘输入等事件时，由用户编写的代码控制这些事件的响应,这就是所谓的事 件驱动编程。 (完整)vb_学生成绩查询系统 5 vb6.0 有三种版本，各自满足不同的开发需要： （1） “visual basic 学习版”使编程人员轻松开发 windows 95/98 和 windows nt 的应用程 序。该版本包括所有的内部控件连同 grid,t

31、ab 和 data-bound 控件.学习版提供的文档有“程 序员指南” 、联机帮助及 visual basic“联机手册” 。 （2） “专业版为专业编程人员提供了一整套进行开发的功能完备的工具.该版本包括学习版 的全部功能连同 activex 控件,还包括 internet 控件和 crystal report writer。专业版提供 的文挡有“程序员指南” 、联机帮助和“部件工具指南” (3） “企业版使得专业编程人员能够开发功能强大的组内分布式应用程序。该版本包括专业 版的全部功能连同自动化管理器、部件管理器、数据库管理工具、microsoft visual sourcesafe 面

32、向工程版的控制系统等.企业版提供的文挡包括专业版的所有文挡，还有“客户/ 服务器应用程序开发指南”和“sourcesafe 用户指南” 。 本系统正是采用 visualvisual basicbasic 企业版所开发的管理系统。 3。6 系统详细设计 根据系统分析、系统设计的结果，采用 vb 作为开发工具,实现图书管理系统各模块的功能。 3.63.6。1 1 启动界面设计 系统启动首先出现如下对话框： 该界面显示了有关的系统信息。 3 3。6.26.2 登陆界面设计 单击启动界面确定将出现如下对话框: (完整)vb_学生成绩查询系统 6 该界面为用户登陆界面,用户输入自己的用户名和密码就能成功

33、登陆本系统,如果密码连续 3 次输错，用户身份没有被确认,系统讲自动关闭。该设计有助于维护系统的安全，防止非法登 陆。 3.6.33.6.3 主界面设计 用户登陆成功将进入如下系统主界面： 在主界面中将显示本系统的所有功能菜单，单击任一菜单将进入相应的功能窗口。 3.6.43.6.4 其他功能模块设计 图书管理模块的实现 要实现图书管理模块应首先点击图书管理主菜单如下: (完整)vb_学生成绩查询系统 7 然后单击添加图书信息，其窗体如下： 该窗口的功能是为用户添加图书信息而设计的，用户可以通过本窗口把图书的详细资料添 加到图书信息库中. 读者信息管理模块的实现 点击读者管理主菜单如下： 然后

34、单击添加读者信息，其窗口如下： 本窗口实现读者信息的添加，通过本窗口把读者的详细信息添加到读者信息库中,方便对 读者的管理。 图书借阅管理模块的实现 (完整)vb_学生成绩查询系统 8 要实现图书借阅管理模块应首先点击图书借阅管理主菜单如下: 然后单击还书管理，其窗体如下： 本窗口的功能是为实现还书管理而设计的，用户通过该界面可以有效的管理图书的归还情 况。 系统管理模块的实现 实现系统管理功能，点击系统管理主菜单如下： 单击添加管理员，其窗口如下: 新用户可以通过本窗口实现注册和添加. (完整)vb_学生成绩查询系统 9 系统维护模块的实现 系统维护模块主菜单如下: 单击数据备份按钮，其实现

35、窗口如下: (完整)vb_学生成绩查询系统 10 总 结 经过三个月的设计和开发，图书馆管理系统基本开发完毕。其功能基本符合用户的需求， 能够完成用户的图书信息管理，图书借阅管理,读者信息管理,系统维护等方面的功能，以及各 种相关功能的扩展。但是由于毕业设计时间较短加上知识的有限,该系统还有许多不足的地方, 源程序调试方面的问题还有好多,出错处理不够等方面问题.这些都有待于今后进一步的改善。 在设计过程中,通过学习了解了数据库系统的开发原理和应用，基本掌握了开发工具 visual basic6.0 和 microsoft access2003 的使用，为今后的学习和开发打下了坚实的基础。 参

36、考 文 献 1孙越编著.visual basic 数据库开发教程m.人民邮电出版社， 2002。 2启明工作室。visual basic +access 数据库应用系统开发m.人民邮电出版社, 2004。 3黄志球，李清等。数据库应用技术基础m.机械工业出版社，2003。 4刘韬.visual basic6.0 数据库系统开发导航m .人民邮电出版社，2003。 5恒扬科导。visual basic6。0 程序设计学与用教程m 。机械工业出社,2003. 6 刘瑞新， 张二峰等.visual basic 管理信息系统开发m 。机械工业出版社，2005。 谢 辞 在本次毕业设计中，我从指导老师那

37、学到了好多东西。老师认真负责的工作态度，严谨的治学 精神和深厚的理论水平都使我受益非浅。在系统设计开发过程中王前莉老师给予了很大的帮助,帮 助解决了很多难题，使得系统能及时开发完成,还有在我设计过程中许多同学给予了大力的支 持,在这里一致表示感谢。 (完整)vb_学生成绩查询系统 11 附录（系统原程序） #系统开始界面程序： option explicit reg key security options。. const read_control = h20000 const key_query_value = h1 const key_set_value = data source=” a

38、pp。path ”database.mdb” if trim（sql） = ” then msgbox ”请选择查询方式！， vbokonly + vbexclamation exit sub end if sql = select from 读者信息 where data source=” app。path data source=” data source= data source=” & app.path database.mdb if (len（trim(txtpathtext。text） ） = 0) then result = msgbox(请指定所要备份数据的路径!， vboko

39、nly， ”数据备份 ） exit sub else if （right（trim（txtpathtext.text） ， 1) ”） then txtpathtext.text = trim（txtpathtext。text) + ” else txtpathtext.text = trim(txtpathtext。text） end if if (dir(txtpathtext.text, vbdirectory） = ” ”) then result = msgbox(指定路径不存在！” ， vbokonly， ”数据备份”) exit sub end if end if on erro

40、r goto errorhand 连接数据库 dim strfilename as string dim strtablename as string dim sqlname as string dim rscolumnname as new adodb。recordset dim rs as new adodb.recordset dim rsdata as new adodb.recordset strfilename = dir（trim(txtpathtext。text) + *。dat”) if strfilename = ” ” then msgbox 该处不包含所要恢复数据的备份

41、文件！, 64， ”数据恢复 mousepointer = 1 exit sub end if dim nreccount as long dim bok as boolean 开始一个事务 cnnjldb。begintrans do while strfilename ” ” if strfilename ”dtproperties.dat” then bok = false strtablename = left(strfilename, len（strfilename） - 4) 先删除该表的数据 sqlname = ”truncate table ” + trim（strtablena

42、me） cnnjldb。execute sqlname 然后开始备份 sqlname = select * from sysobjects where type = u and name = ” + strtablename + ” rs.open sqlname, cnnjldb， adopenstatic, adlockreadonly (完整)vb_学生成绩查询系统 31 if not rs。eof then bok = true end if rs.close if bok = true then mousepointer = 11 根据表名确定各个域名及域类型 sqlname = ”

43、select xtype,length，name from syscolumns where id in （select id from sysobjects where name = + strtablename + ） rscolumnname.open sqlname， cnnjldb， adopenstatic， adlockreadonly nreccount = 0 if not rscolumnname。eof then rscolumnname。movelast nreccount = rscolumnname.recordcount rscolumnname.movefirst end if rscolumnname。close 将指定文件数据恢复到数据库中 sqlname = select from ” + trim（strtablename） rsdata.open sqlna