学生信息管理论文

1、焦 作 大 学毕业设计(论文)说明书作 者： 学 号： 学院(系)： 计算机工程系 专 业： 应用与维护 题 目： 学生信息管理系统 主 题： 指导教师： 职称： 高级实验师 2006年5月目 录前言1第一章 系统概述 211 开发背景212学生信息管理系统概述213 开发环境及开发工具介绍3131 visual basic 6.0简介3132 sql server 2000 简介6133 ado对象概述8134 visual basic 6.0访问数据库的方式10第二章 系统总体规划1121 数据库设计1122 系统e-r图1223 系统流程图1424 系统功能分析15第三章 系统具体实现1

2、631 准备工作 1632 模块设计 1633 用户界面的实现 19331 登陆界面 19332 mdi主窗体20333系统管理23334 班级管理24335 学生档案管理26336课程管理29337成绩管理30338报表功能模块31第四章 结束语33致谢 34主要参考文献 35附录(事件代码) 3650焦作大学毕业设计说明书 ii 摘 要学生信息管理系统是典型的信息管理系统(mis),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备,易使用等特点。本系统主要完成对学生信息的管理，包括

3、添加、修改、删除，查询，打印信息以用户管理等六个方面。系统可以完成对各类信息的浏览、查询、添加、删除、修改等功能。系统的核心是添加、修改和删除三者之间的联系，每一个表的修改都将联动的影响其它的表，当完成添加或删除操作时系统会自动地完成学生成绩的修改。查询功能也是系统的核心之一，在系统中主要根据学生姓名和学号进行查询，其目的都是为了方便用户使用。系统有完整的用户添加、删除和密码修改功能，并具备报表打印功能。系统采用microsoft office中的access 2000来设计数据库，并使用当前优秀的开发工具vb 6.0 ，它有着最为灵活的数据库结构，对数据库应用有着良好的支持。关键字：控件；窗

4、体；数据库；visual basic语言。abstractstudent information management system is development two aspects that typical information management system( mis), its development includes primarily the backstage database establishes with support and the head applies the procedure.establishes to rise to the former requ

5、est the data consistency is strong with the complete, the data safety like.but request the latter very much the applied procedure function complete, easy usage etc. characteristics.this system completes primarily to the management of students information, including to increase, modify, delete, searc

6、hing, printing the information to wait six aspects with the customer management.the system can complete to the view of various information, search, increase, delete, modification etc. function.system of core is modification that other form in influence that contact to increase, mod registration numb

7、er according to students name primarily in system, its purpose is all for the sake of the convenient customer to use.system contain complete customer increase, delete to modify the function with the password, combine to have the statement print the function.system adoption microsoft access in the of

8、fice 2000 design database, and use the current excellent development tool vb 6.0, it have got the most vivid database construction, having got the good support to the database application.keywords: activex; form; database; the language of visual basic.焦作大学毕业设计说明书 第50页 共50 页前 言学生信息管理系统是一个教育单位不可缺少的部分,

9、它的内容对于学校的决策者和管理者来说都至关重要,所以学生信息管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。 随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。 作为计算机应用的一部分,使用计算机对学生信息进行管理,具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高学

10、生管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。 因此，开发这样一套管理软件成为很有必要的事情,在下面的各章中将以开发一套学生信息管理系统为例,谈谈其开发过程和所涉及到的问题及解决方法。第一章 系统概述11 开发背景111 当前趋势 现代教育技术特别是网络与多媒体技术的发展，对学习活动产生了具有深远意义的冲击，网络中的学习者必须是一个主动行为着的主体，人们可以选择或者设计适合其学习特点的信息采集、加工与重组方式，一种个性化的学习类型。该学生信息管理系统采用多层架构的系统，是真正适应教育信息化发展三大趋势的校园网络应用系统，全面支持internet功能、远程访问功能，全部采用最

11、先进的b/s(浏览器/服务器) 模式来开发，支持有关学校信息交流、日常教学、教务管理等的各种应用，提供了一个基于校园内联网中支持各种类型的学校应用产品的服务平台和开发平台，基本目标是在学校内部和外部建立起顺畅的信息通道，让信息技术成为推动教育生产力的有力工具，提高学校的管理水平和效率，同时充分利用全球的教育资源为学校的教育服务，克服了目前大部分学校的校园网建设只起到宣传作用的通病。112 用计算机管理学生基本信息的意义 现在我国的中小学校中学籍的管理水平还停留在纸介质的基础上，这样的机制已经不能适应时代的发展，因为它浪费了许多人力和物力，在信息时代这种传统的管理方法必然被计算机为基础的信息管理

12、所取代。 作为一个计算机应用的大专生，希望可以在这方面有所贡献。改革的总设计师邓小平同志说过“科学技术是第一生产力”，我希望能用我四年的所学编制出一个实用的程序来帮助中小学进行更有效的学生管理。 归纳起来，好处大约有以下几点： 1. 可以存储历届的学生基本信息，安全、高效； 2. 只需一到二名录入员即可操作系统，节省大量人力； 3. 可以迅速查到所需信息。12 学生信息管理系统概述121 开展该系统的原因由于现今的学生基本信息管理非常繁琐，行政人员付出大量的工作时间，得到的效率很低。因此为提高工作效率，减轻校方人员的工作负担，决定开发学生基本信息管理系统软件。 122 该工程的基本目标开发此学

13、生信息管理系统软件，以供教学人员及操作者进行对学生的管理，方便操作者随时添加、查询、修改等。为了我们提高软件开发的能力，学习汉语编程的技巧，提高工作设计思想，通过本次的工程开发，开发小组成员与辅助老师，公司的技师交流，能从中学习知识吸取经验，再技术和软件思想上同时得到锻炼和提高，从而使总体水升到一个新的高度。13 开发环境以及开发工具介绍该软件是在windows 2000 advanced server + visual basic 6.0 + sql server 2000的环境下完成的。下面就对这些开发工具进行介绍：131 visual basic 6.0微软公司的visual basic

14、 6.0是windows应用程序开发工具，是目前最为广泛的、易学易用的面向对象的开发工具。visual basic提供了大量的控件，这些控件可用于设计界面和实现各种功能，减少了编程人员的工作量，也简化了界面设计过程，从而有效的提高了应用程序的运行效率和可靠性。利用visual basic 程序设计语言，可以很方便地设计出在windows环境下运行的应用程序。故而，实现本系统vb是一个相对较好的选择。1311 visual basic的编程特点 visual basic语言的出现为windows下的编程提出了一个新概念，利用visual basic的动态数据交换、对象的链接和嵌入、动态链接库、a

15、ctivex技术可以很方便地设计出功能强大的应用程序。利用visual basic语言编程有以下几个特点：1 可视化程序设计在visual basic中开发的应用程序，不但有丰富的图形界面，同时由用户为开发图形界面添加的代码真是少而又少，因为在设计图形界面的过程中只需设置 activex控件的属性即可。2 强大的数据库和网络功能 随着visual basic 语言的向前发展，它在数据库和网络方面的功能优势就愈加明显，利用visual basic 中的odbc开放式的数据库访问技术可以很方便地开发出自己的数据库应用程序；利用 visual basic自带的可视化数据管理器和报表生成器，完全可以在

16、visual basic就完成数据库的开发工作。 3其它特性在visual basic以前的版本中，由于仍然摆脱不了解释执行的代码运行机制，所以在相当的程度上制约了 visual basic 的发展。从visual basic5.0版本开始，在visual basic 中制作的应用程序都改变为编译执行，使得visual basic的代码效率有了很大的提高，同时执行的速度 也加快了解30%(同visual basic4.0相比)。当然在 visual basic中还有其它特性，例如：l 面向对象的编程语言；l 结构化程序设计；l 事件驱动的程序设计： 在传统的或“过程化”的应用程序中，应用程序自

17、身控制了执行哪一部分代码和按何种顺序执行代码。从第一行代码执行程序并按应用程序中预定的路径执行，必要时才会调用过程。 在事件驱动的应用程序中，代码不是按预定的路径执行，而是在响不同的事件时执行不同的代码片段。事件可以由用户操作触发、也可以由来自操作系统或其它应用程序的消息触发、甚至由应用程序本身的消息触发。这些事件的顺序，决定了代码执行的顺序，因此应用程序每次运行时所经过的路径都是不同的。l 支持动态链接库；l 应用程序之间的资源共享。 1312 vb 支持的数据库系统vb支持对多格式的数据库的访问和维护，无论是access还是foxpro中创建的数据库，都可以用vb打开，对其进行查询、修改和

18、删除等操作。事实上，vb几乎支持对市面上所有数据库的访问。vb可以访问的数据库可以简单的分为三类，即：microsoft access格式数据库，外部数据库和odbc数据库。vb对多种数据库格式的支持，大大的增强了开发数据库应用程序的能力。1313 jet数据库引擎 microsoft引擎为visual basic与数据库的接口提供了基本的方法。jet引擎被visual basic，microsoft access和其他microsoft产品共享。jet数据库引擎提供了多种功能，jet的数据定义功能支持对表、索引、查询的创建、修改和删除。jet以主键标和表间引用完整性的形式支持数据完整性。 对

19、于数据操纵，jet支持使用sql。sql提供用单独语句对基于用户定义标准的记录组进行检索、添加、删除或更新的方法。 jet也提供对安全功能的支持。这种功能让开发者指定用户标识符和口令，他们必须在用户访问数据库之前给出。jet也支持使用许可，或是对单个表和查询的访问级别（例如，只读或读写可访问性）。这是的数据库管理员要对每一位用户或用户组分配对数据库不同特定访问。 除了数据操作和数据定义任务外，也可用jet引擎来执行其他的任务。jet还具备在数据库开发工作中所需的其他功能，这些功能包括：数据库修复，数据库压缩（以使消除不同的空间）和重新索引。1314 数据库开发中的三大工具 在数据库应用程序的开

20、发领域中，提供包含数据管理（datamanager），数据控件（data control）以及数据编程对象（数据访问对象（dao）、远程数据对象（rdo）和activex数据对象（ado）等功能强大的工具，协助设计人员轻松的连接数据库文件，并访问其中的数据，在功能方面与其他一些专业数据库软件（如foxpro，micosoft access等）不相上下。 数据管理器（data manager）是visual basical已有的老成员之一，拓本盛举有的jet数据库引擎（database engine）可以帮助vb程序元件立即维护数据库内容，并可通过输入查询或查找数据库信息，而不必再通过其他数据库

21、软件另外去设计数据库。 数据控件是vb所提供的基本控件成员之一。它使得设计者省下一堆程序代码编写的工作，能够轻松的设计及维护数据库内容。数据控件可以通过一些属性的设置去链接某个数据库文件，但是它本身并无法显示数据库各个记录的内容，必须在搭配其他具有数据感知（data aware）功能的控件对应并显示一个字段内容，以方便地进行记录的浏览及编辑工作。 vb提供的数据访问对象（data access object；dao）让程序设计者拥有更大的发挥空间。借助程序代码编写，直接控制jet数据库引擎，配合数据库控件，能够开发出更具弹性且高效率的数据应用程序。 rdo是处理远程数据库的一些专门需要的对象集

22、合。使用rdo可以不用本地的查询机就能访问odbc数据源，这无疑将大大提高应用程序的性能。 ado是vb6.0中新增的对象，它是一个更简单的对象模型，它更好的集成了其它数据访问技术，并且对本地和远程数据库均有共同的界面，可以取代dao和rdo。ado更易于使用。我们在本系统中利用数据管理器创建了数据库及数据库表，并采用了ado数据访问技术。132 sql server 2000简介sql server 2000是微软公司最新版的大型数据库服务器，其性能指标在各方面都有赶超oracle数据库的趋势。用它可以方便地管理数据库和开发应用程序，它使用了最先进的数据库构架，与windows nt/200

23、0平台紧密集成，具有完全的web功能。通过对高端硬件平台、网络和存储技术的支持，为web站和企业的应用最大限度地提供了可扩展性和高可靠性，能在internet商业领域快速建立并应用。此外，还增强了安全性，保护防火墙内外的数据。支持基于角色的安全并拥有安全审计工具。在经历了sql server 6.5和7.0两个版本的尝试后，微软公司终于开始了大规模的业务。记得在以前各种关于sql server的文章，都会将其定位成中小型应用方面，这种感觉被大家自然的延续到了2000版之中。其实这是一种误解。在过去的很长一段时间中，微软公司聘请了世界上最优秀的数据库专家以及专门搭建了信息量可谓空前的地理信息系统

24、，励精图治，就是为了摘掉扣在自己头上的这顶帽子。有了强大的性能和功能支持，再配合其一向为人称道的易用性，sql server可以说成为了开发者手中的一柄利器！另外，目前国内的一些关于微软平台的数据库编程教程，喜欢使用access作为数据库平台的案例，并展开相关的内容。这其实对于开发真正的数据库应用并没有直接的帮助作用，只能使大家停留在应用的初级阶段。sql server 2000提供的非常傻瓜的缺省安装和使用模式，其上手难度并不比access大。另外，sql server 2000可以兼顾小、中、大规模的应用，有着远远比access强大的伸缩性。 sql server数据库特点概

25、括起来，sql server 2000数据库管理系统具有以下主要特点。1.丰富的图形管理工具，使系统管理、操作更为直观方便。sql server企业管理器是一个基于图形用户界面（gui）的集成管理工具，利用它可以配置管理sql server服务器、管理数据库和数据库对象、备份和恢复数据、调度任务和管理警报、实现数据复制和转换操作等。此外，sql server 2000还提供了sql事件探查器、sql查询分析器、sql server服务管理器和多种操作向导等图形界面管理工具，大大简化了用户操作，从而增强了系统的易用性。2动态自动管理和优化功能。即使sql server数据库管理员不做任何设置，s

26、ql server也能够在运行过程中根据环境配置和用户访问情况动态自动配置，以达到最优性能，从而减轻管理员工作。3.充分的internet技术支持。internet网络发展到今天已经成为一条重要的信息发布渠道，sql server增强了对internet技术支持，它除保留了前期版本中的数据库web出版工具“web助手”外，还增强了对xml和http技术的支持，这使得电子商务系统能够通过xml等访问sql server数据库系统，也扩展了sql server在数据挖掘和分析服务领域的应用。4.丰富的编程接口工具，使用户开发sql server数据库应用程序更加灵活。sql server提供了tr

27、ansact-sql、db-library for c、嵌入式sql（esql）等开发工具，transact-sql与工业标准sql语言兼容，并在其基础上加以扩充，使它更适合事务处理方面的需要。此外，sql server 2000还支持odbc、ole db、ado规范，可以使用odbc、ole db、ado接口访问sql server数据库。5.具有很好的伸缩性和可靠性。sql server 2000既能运行在windows桌面操作系统下，又可运行在服务器操作系统（包括windows nt和windows 2000）下；既能运行在单cpu计算机上，又能运行在对称多处理系统下。所以，它具有很好

28、的伸缩性，能够满足从桌面应用到大型企业分布式应用到不同层次用户的要求。6.简单的管理方式。sql server 2000与microsoft windows 2000有机集成，所以可以使用windows 2000的活动目录（active directory）功能对sql server进行集中管理，大大简化大型企业中的系统管理工作。此外，与windows 2000的集成还使sql server能够充分利用操作系统所提供的服务和功能（如安全管理、事件日志、性能监视器、内存管理和异步i/o等），从而增强了sql server数据库系统的功能，并且只需要占用很少的系统资源。133 ado对象概述ado

29、对象是针对当前微软的软件所支持的数据进行操作的最为有效、简单并且功能强大的方法。它可以把大部分数据源可编程的属性直接扩展到active server上，主要含有connection、recordset与command三种对象。其中：connection对象主要负责打开或连接数据库文件；recordset对象主要是存取数据库的内容；command对象主要是对数据库下达行动查询指令以及sql server的stored proceduce。ado对象能够存取到数据库的内容，首先要求数据库的驱动程序( odbc驱动程序与ole db驱动程序)必须安装上，否则，ado对象是无法存取数据库中内容，其原理

30、示意图如图1.1所示：客户端客户端客户端ado对象各种数据库所对应的驱动程序各种数据库(如access、sql server以及oracle等)图1.1 ado对象存取数据原理示意图请注意：上图中的“各种数据库所对应的驱动程序”即odbc驱动程序与ole db驱动程序。 利用ado开发网络数据库应用程序 ado（active date objects,即activex数据对象）是一个asp内置的activex服务器组件（activex server component）。可把它与asp结合起来，建立提供数据库信息的网页内容，对数据库进行查询、插入、更新、删除等操作，并可以把在用户

31、端实现“网上实时更新显示”的最新web数据库技术。要执行ado，服务器端必须安装windows nt server 和internet information server(iis)，而客户端只要有ie或netscape较新版本的浏览器即可。利用ado开发网络数据库应用程序有以下几个优点： 支持客户机/服务器结构（client/server）与web系统开发技术。 内部有多个互相独立的对象模型。 支持分批修改数据库内容。 支持多种不同的数据控制指标形式。 先进的recordset数据高速缓存管理功能。 允许在程序中使用多个recordset对象或者多个分批修改区块传送。 ado属于free_t

32、hreaded对象，利用它可以开发出更有效的web应用程序。 ado组件的主要对象及其功能ado组件又称为数据库访问组件，它提供了以下七种对象：connection对象：提供对数据库的连接服务。command对象：定义对数据库源操作的命令。recordset对象：由数据库服务器所返回的记录集。recordset对象的locktype属性的设置值常量值说明adlockreadonly1默认值，只读。无法更改数据adlockpressimistic2保守式记录锁定（逐条）。提供者执行必要的操作确保成功编辑记录，通常采用立即锁定数据源的记录的方式。adlockoptimistic3开放

33、式记录锁定（逐条）。提供者使用开放式锁定，只在调用updata方法时锁定记录。adlockbatchoptimistic4开放式批更新。用于与立即更新模式相反的批更新模式。fields对象：由数据库服务器所返回的单一数据字段parametes对象：表示command对象的参数。property对象：单独的一个property对象，提供属性功能。error对象：提供处理错误的功能。使用ado对象可以建立和管理数据库的连接，按数据库服务器的要求获得数据，执行更新、删除、添加数据等操作，获取odbc的错误信息等。 用来操纵数据的sql命令sql命令是发送给数据库并要求数据库操作的指令，

34、它是专门为数据库设计的语言，比一般的计算机程序语言简单的多。sql命令主要分成两部分：ddl(data definition language)和dml(data manipulation language),其中ddl是建立数据表及数据列的指令群，而dml则是操作数据库记录的指令群，如数据库记录的添加、更新、删除、和查询等。sql命令，包括select、delete、update、insert into、select into等。 筛选及排序记录的select指令 基本句型一：select 字段串列 from 数据表 基本句型二：select from where 筛选条件 基本句型三：se

35、lect from order by字段串列 select top：限定选取数据的条数 删除数据记录的delete指令 基本语法：delete from 数据表 where 条件式 更新数据记录的update指令 基本语法：update 数据表set 表达式 增加数据记录的insert into 指令 基本句型一：insert into 数据表 (字段串列) values (字段串列) 基本句型二：insert into 数据表 (字段1,字段2,字段n) select 建立新数据表的select into 指令该指令与“insert into select ”指令的区别是，这个指令将建立另一

36、个新的数据表，而insert into是增加数据记录到“现存的”数据表中。134 visual basic 6.0访问数据库的过程定义数据库组建dim con as new adodb.connection 打开数据库对于sql数据库，其连接语句为con.open driver=sql server;server=localhost;uid=sa;pwd=;database=student。而对于access数据库，连接语句为con.open provider=microsoft.jet.oledb.4.0;data source= & app.path + student.mdb设定sql语

37、句，使用“execute”命令，即可开始执行访问数据库的动作dim rs as new adodb.recordset 其中rs为结果集对象（recordset）关闭结果集对象，断开与数据库的连接rs.close con.close第二章 系统整体规划21数据库的设计在系统设计过程中，首先要建立的就是数据库。本数据库采用sql server 2000来构造，共使用了7个表，它们分别是用户信息表（user）、学籍信息表（xj）、开设课程信息表（allkecheng）、班级信息表（class）、班级课程信息表（classkecheng）、考试类型信息表（kaoshileixing）、学生成绩表（c

38、j）。1 用户信息表（user）：字段名数据类型说明是否为空描述username文本用户名not nullprimary keypassword文本用户密码not nulladmin文本管理员not nullreadonly文本只读用户not null2 学籍信息表（xj）：字段名数据类型说明是否为空描述sid文本学号not nullprimary keysname文本姓名not nullsgender文本性别not nullsclass文本班级not nullsbirthday日期/时间出生日期not nullsaddress文本家庭住址not nullscode文本邮政编码not null

39、stel文本联系电话not nullsruxueshijian文本入学时间not nullsremark备注备注not null3 开设课程信息表（allkecheng）：字段名数据类型说明是否为空描述name文本课程名称not nullprimary keyname文本教材not null4 班级信息表（class）：字段名数据类型说明是否为空描述year文本年级not nullprimary keyclass文本班级not nullid文本教室not nullnianzhi文本年制not nullzhuanye文本专业not nullteacher文本班主任not nullremark文本

40、备注not null5 班级课程信息表（classkecheng）：字段名数据类型说明是否为空描述year文本年级not nullprimary keyzhuanye文本专业not nullnianzhi文本年制not nulldata文本学期not nullname文本课程名称not null6考试类型信息表（kaoshileixing）：字段名数据类型说明是否为空描述id文本类型not nullprimary key7学生成绩表（chengji）：字段名数据类型说明是否为空描述id文本学号not nullprimary keydata文本学期not nullleixing文本类型not n

41、ullname文本课程名称not nullprimary keyscore文本分数not nullremark文本备注not null2. 2 系统e-r图得到上面的数据项和数据结构以后，就可以设计出能够满足用户需求的各种实体，以及它们之间的关系，为后面的逻辑结构设计打下基础。这些实体包含各种具体信息，通过相互之间的作用形成数据的流动。本实例根据上面的设计规划出的实体有：学生实体、班级实体,班级课程实体,学籍实体,成绩实体。用e-r图描述学生信息管理系统,如下图专业班级年制年级学 生住址学号生日姓名性别班级课程课程名称学期设置学籍表姓名情况性别班级出生日期时间住址描述邮编录号成绩表录学号录号分

42、数属于学习属于学习班主任教室年级年制专业联系电话号入学时间录号类型时间姓名情况学期课程名称学号图2.1 学生信息管理系统e-r图22系统流程图开始登陆窗体判断用户是否存在n mdi主窗体(系统主窗口)判断用户权限admin用户普通用户(浏览)管理系统用户(添加、删除、修改)学生信息管理(班级信息、学生档案、课程和成绩管理)学生信息查找(按学号和姓名)重新登陆返回主窗体y 图2.2 系统流程图23 系统功能分析系统开发的目标是实现学生信息管理的系统化、规范化和自动化，这是在用户要求的基础上提出来的，功能要求如下： （一）系统管理：定义使用本系统的用户名称、密码 及访问权限。（二）班级管理：能对学

43、生班级添加、浏览、查询。（三）学生档案管理：能对学生档案添加、浏览、查询。（四）课程管理：对课程进行添加、修改、删除操作。（五）成绩管理：对学生考试类型的设置及成绩的添加、浏览、查询。（六）打印报表：实现对所有学生基本信息的总体浏览和打印。第三章 系统具体实现经过需求分析、功能模块设计之后要进入详细设计阶段，本阶段将按系统的主要模块进行论述，重在阐述具体的某项功能的实现方法或运用到的相关技术。31 准备工作1.添加引用：单击工程菜单中的引用选项，添加microsoft activex data objects 2.6 library和microsoft excel 9.0 object lib

44、rary两个引用。2.添加部件：单击工程菜单中的部件选项，添加microsoft ado data control 6.0(oledb)、microsoft common dialog control 6.0(sp3) 、microsoft flexgrid control 6.0、microsoft windows common controls 6.0(sp4)和microsoft windows common controls-2 6.0五项。32 模块设计添加一个模块module1，在module1中添加如下代码public modi as booleanpublic classmod

45、i as booleanpublic xuefeimodi as booleanpublic txtsql as stringpublic find as booleanpublic classfind as booleanpublic xuefeifind as booleanpublic username as stringpublic qxstr as stringpublic function executesql(byval sql as string) as adodb.recordsetdim mycon as adodb.connectiondim rst as adodb.r

46、ecordsetset mycon = new adodb.connectionmycon.connectionstring = connstringmycon.opendim stokens() as stringon error goto exectuesql_errorstokens = split(sql)if instr(inser,delete,update, ucase(stokens(0) then mycon.execute sqlelse set rst = new adodb.recordset rst.open trim(sql), mycon, adopenkeyset, adlockoptimistic set executesql = rstend ifexectuesql_exit: set rst = nothing set mycon = nothing exit functionexectuesql_error: resume exectuesql_exi