《计算机科技毕业论文幼儿园收费系统论文.doc》由会员分享，可在线阅读，更多相关《计算机科技毕业论文幼儿园收费系统论文.doc（28页珍藏版）》请在三一文库上搜索。
1、呼伦贝尔学院计算机科学与技术学院本科生毕业论文(设计)题 目：幼儿园收费系统的设计与实现学生姓名： 王丽杰 学 号： 2007121112 专业班级：07级计算机科技本（一）班 指导教师： 马秀荣 完成时间： 2011年5月25日 I目录摘要IAbstractII第1章 引言11.1 背景及必要性11.2 研究目的11.3 开发工具21.3.1ASP.NET简介21.3.2ASP.NET开发的优点21.3.3 Access简介3第2章 系统可行性研究与需求分析42.1 可行性研究42.3.1 技术可行性42.3.2 经济可行性42.3.3 运行可行性42.2 需求分析4第3章 系统总体设计与分
2、析53.1 系统功能模块设计53.2 用户登录模块流程图63.3 数据库设计63.4 数据表的主要关系图8第4章 系统实现94.1 系统登录功能94.2 园长管理功能114.3 财务人员管理功能134.4 班主任管理功能16结论23参考文献24致 谢25摘要本系统运用ASP.NET和Access开发工具进行系统开发，主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。从软件开发角度对系统进行了需求分析与设计，编写代码，调试测试，主要实现了以下功能：班级管理、幼儿档案管理、出勤登记管理、应收费管理、欠费查询等。从而提高了幼儿园收费的效率和准确性，为幼儿园的收费工作减少了不少人力、物力。
3、关键词ASP.NET；Access；数据库设计；功能AbstractThis system is utilized combining of ASP.NET and Access development tools to develop, its development mainly includes two aspects of development that establishment and maintenance of backstage database and head application. From realizing software development of sys
4、tem to what kindergarten charge system with requirement analysis and design, writing code, adjusting and testing, the kindergarten charge system completes main function that class management, childrens document management, on duty register management, should charge a management and owe fee search, e
5、tc. Thus efficiency and accuracy of kindergarten charge is enhanced to reduce a lot of manpower, material resources for the charge work of kindergarten.Keywords , access, design of database, function第 24 页 （共25页）第1章 引言随着电子计算机和通信技术的发展，人类已经逐渐地进入信息化社会。同时人们对信息和数据的利用与处理也已进入自动化，网络化和社会化的阶段，在各行各业中离不开计算机，更离不
6、开信息处理，这正是计算机被广泛应用于信息管理系统的原因。其次，现在计算机已经成为人们生活中必不可少的工具。计算机的最大好处在于利用它能够进行信息管理，方便快捷的办公。使用计算机进行信息控制，不仅提高了工作效率，而且大大的提高了系统的安全性。因此，开发相关的信息管理系统已经成为各行各业的必要和必需了。1.1 背景及必要性随着幼儿数量和班级的增多，加重了收费人员收费的难度，使管理变得比较烦琐，产生的文档比较多，并且由于手工的操作，使这些文档无法有效的核对和管理，在汇总以及分析方面更加困难。现在大多数幼儿园都装配有计算机，但是尚未用于信息管理，没有发挥它的作用，资源闲置比较突出，配备的计算机属于闲散
7、资源，这就是管理信息系统开发的基本环境。基于这些问题，我们认为有必要建立一套幼儿园收费系统，使幼儿园的收费工作规范化、系统化、程序化，避免幼儿园收费的烦琐性，提高信息处理的速度和准确性。一套优秀的幼儿园收费管理系统应该是一套适用于中小型幼儿园使用的优秀系统，操作简单、灵活性好、系统安全性高、运行稳定，是管理者的理想选择。我的毕业设计题目就是设计一套幼儿园收费系统，在前期的考察和分析之后，我努力在实践中巩固以及整理自己在大学期间所学的知识，尽量把这个系统设计的更好。采用了ASP.NET和Access综合来设计了一套幼儿园收费系统。1.2 研究目的随着社会和越来越多的家长对幼儿学前教育的重视，使得
8、幼儿园在数量不断增加的同时，对幼儿园的收费情况也非常重视，需要对园中幼儿的收费简单化以摆脱手工收费带来的弊端。而收费管理软件的应用必将能够弥补手工收费的不足。尤其采用一套适合幼儿园自身需要，管理科学化、规范化的收费软件，势必给我们管理园中事物带来很大利益，节省人力、物力，而且调用方便，准确性高，可以充分发挥系统的分析功能本系统的开发是旨在开发一套符合幼儿园收费管理软件，为前台幼儿园收费管理者提供简单、可靠、快捷的收费和管理操作。在幼儿园收费管理系统中实现操作员管理、班级管理、幼儿档案管理、幼儿出勤登记、收费管理等功能，并为其建立了数据库及数据库管理系统。1.3开发工具使用 Visual Web
9、 Developer 2005 速成版，可以用各种配置创建和使用 ASP.NET 应用程序，成为NET平台下最为优秀的高度集成的可视化开发环境，使用ASP.NET作为编程环境，Access作为数据库环境。Visual Web Developer 2005 速成版是 Microsoft Visual Studio 2005 系列产品的一部分，也是用 ASP.NET 2.0 构建数据驱动的 Web 应用程序的最佳开发工具。 Visual Web Developer 根据 Web 开发人员的特定需要通过新的 Web 配置文件进行了调整，该配置文件公开了为 Web 开发而优化的菜单及窗口布局。 该环境
10、提供一个同类最佳的 HTML 源代码编辑器、一个改进的可视化页设计器、一个新的项目系统、对数据操作的更好的支持以及对 XHTML 标准的完全支持，使您能够比从前更快速、更轻松地开发数据驱动的 Web 应用程序。1.3.1ASP.NET简介ASP是一项微软公司的技术，是一种使嵌入网页中的脚本可由因特网服务器执行的服务器端脚本技术。指 Active Server Pages（动态服务器页面），运行于 IIS 之中的程序。ASP.NET 页框架是一种编程框架，它在 Web 服务器上运行可以动态地生成和管理 Web 窗体页。在 Visual Studio 中，Web 窗体提供了窗体设计器、编辑器、控件
11、和调试功能，这些功能结合在一起，将使您能够为浏览器和 Web 客户端设备快速地生成基于服务器的可编程用户界面。ASP.NET页框架创建了传统客户端/服务器 Web 交互的抽象模型，使您能够使用支持快速应用程序开发和面向对象编程的传统方法和工具来进行应用程序编程。在 Web 窗体页中，可以使用属性、方法和事件来处理 HTML 元素。ASP.NET 页框架为响应在服务器上运行的代码中的客户端事件提供统一的模型，从而使您不必考虑基于 Web 的应用程序中固有的客户端和服务器隔离的实现细节。该框架还会在页处理生命周期中自动维护页及该页上控件的状态。1.3.2 ASP.NET开发的优点ASP.NET是目
12、前主流网络开发技术之一，它本身具有许多优点和新特性，具体介绍如下。(1) 高效的运行性能 由于ASP.NET应用程序采用页面脱离代码技术，即前台页面代码保存到ASPX文件中，后台代码保存到CS文件中，这样当编译程序将代码编译为DLL文件后，ASP.NET在服务器上运行时，可以直接运行编译好的DLL文件，并且ASP.NET采用缓存机制，可以提高运行ASP.NET的性能。(2) 简易性、灵活性 很多ASP.NET功能都可以扩展，这样可以轻松地将自定义功能集成到应用程序中。例如，ASP.NET提供程序模型为不同数据源提供插入支持。(3) 可管理性ASP.NET中包含的新增功能使得管理宿主环境变得更加
13、简单，从而为宿主主体创建了更多增值的机会。(4) 生产效率使用新增的ASP.NET服务器控件和包含新增功能的现有控件，可以轻松、快捷地创建ASP.NET网页和应用程序。新增内容（如成员资格、个性化和主题）可以提供系统级的功能，此类功能通常可能会要求开发人员进行大量的编写代码工作。新增数据控件、无代码绑定和智能数据显示控件已经解决了核心开发方案问题。1.3.3 Access简介Access是微软公司推出的基于Windows的桌面关系数据库管理系统，是Office系列应用软件之一。它提供了表、查询、窗体、报表、页、宏、模块7种用来建立数据库系统的对象；提供了多种向导、生成器、模板，把数据存储、数据
14、查询、界面设计、报表生成等操作规范化；为建立功能完善的数据库管理系统提供了方便，也使得普通用户不必编写代码，就可以完成大部分数据管理的任务。 Access是一种关系型数据库管理系统，其主要特点如下： (1)存储方式单一Access管理的对象有表、查询、窗体、报表、页、宏和模块，以上对象都存放在后缀为.mdb的数据库文件种，便于用户的操作和管理。 (2)面向对象Access是一个面向对象的开发工具，通过对象的方法、属性完成数据库的操作和管理，极大地简化了用户的开发工作。同时，这种基于面向对象的开发方式，使得开发应用程序更为简便。 (3)界面友好易操作Access是一个可视化工具，用户想要生成对象
15、并应用，只要使用鼠标进行拖放即可，非常直观方便。系统还提供了表生成器、查询生成器、报表设计器以及数据库向导、表向导、查询向导、窗体向导、报表向导等工具，使得操作简便，容易使用和掌握。 (4)集成环境、处理多种数据信息Access基于Windows操作系统下的集成开发环境，该环境集成了各种向导和生成器工具，极大地提高了开发人员的工作效率，使得建立数据库、创建表、设计用户界面、设计数据查询、报表打印等可以方便有序地进行。 (5)Access支持ODBC利用Access强大的动态数据交换和对象的联接和嵌入特性，可以在一个数据表中嵌入位图、声音、Excel表格、Word文档，还可以建立动态的数据库报表
16、和窗体等。 1.4 系统操作平台选择微软平台作为主导，一方面考虑目前微软的飞速发展，越来越多的企业在规划内部网络时，将微软平台作为首选方案；另一方面从技术角度来讲，微软平台上的应用无论是在开发上，还是在软件的部署上都非常容易，而且性能优越。操作系统：Windows2000、Windows XP，Win7系统可能有不兼容的情况出现，因为Win7是64位系统，32位的软件无法安装运行产生结果。第2章 系统可行性研究与需求分析2.1 可行性研究 该系统使用ASP.NET作为编程框架，具有效率高、可用性强、代码量少等优点。且数据库环境，具有强大的存储功能和查询功能。 2.3.1 技术可行性该系统使用A
17、SP.NET作为编程框架，具有效率高、可用性强、代码量少等优点。为数据库环境，具有强大的存储功能和查询功能。对于开发比较简单的中小型系统，ASP和Access的结合是在实际应用中较为成功的一种解决方案。为用户提供了非常友好、操作简单的用户界面、简洁明了的数据库接口。所以技术实行起来相对会容易。2.3.2 经济可行性本系统开发简单但要耗去一定的时间，所用的开发工具和软件都是免费的。而且由于系统能够在未来较长的一段时期内稳定地发挥作用，这对于系统的长时间管理，对系统使用人的人力和财力都有很大的帮助。由此可见，开发此系统在经济上是完全可行的。2.3.3 运行可行性如今的计算机已经走进千家万户，硬件成
18、本的下降，导致计算机购买成本的降低。我的这套系统是利用自己的计算机加ASP.NET作为软件的开发平台，使开发出来的系统有友好的用户界面、有良好的安全性设置，这样更使各类用户很快地掌握系统的使用方法,操作友好因此在操作上是可行的。2.2 需求分析通过对幼儿园收费工作的调查与研究后，我了解了幼儿园中收费工作中主要内容及问题，并确定了幼儿园收费系统的设计框架。因为系统是单机版的系统，所以系统在功能上有三个用户即园长、财务人员、班主任，完成“幼儿园收费系统”，主要包含以下功能：(1)幼儿园园长管理界面该模块主要实现了幼儿档案的增加、删除、修改、查询；班级的增加、删除、修改、查询；操作员的增加、删除、查
19、询及操作员密码修改；批量调整班级办理离园。(2)幼儿园财务人员管理界面该模块主要功能实现了个人信息查询；密码修改；应收费查询；收费统计；查询收费情况。(3)幼儿园班主任管理界面该模块主要功能实现了个人信息查询；密码修改；幼儿出勤情况登记；幼儿出勤情况查询；幼儿档案查询；欠费查询。第3章 系统总体设计与分析本章主要讲述幼儿园管理系统中各个数据库表的设计与各个模块的主要功能设计。3.1 系统功能模块设计幼儿园收费系统园长管理界面主要实现了操作员的增加、删除、密码修改、查询；幼儿档案的查询、添加、修改与删除；班级查询、添加、修改与删除；调整班级；办理离园。幼儿园收费系统财务人员管理界面主要实现了个人
20、信息查询；密码修改；应收费表管理；欠费查询；收费情况查询；收费统计；月缴费汇总查询；班级缴费汇总查询。幼儿园收费系统班主任管理界面主要实现个人信息查询；密码修改；幼儿出勤情况登记；幼儿档案查询；幼儿出勤情况查询；欠费查询。幼儿园收费系统功能模块如图3-1所示。图3-1幼儿园收费系统结构功能图3.2 用户登录模块流程图 用户输入账号和密码后，经过系统的验证正确后才可以进入相应功能界面。当用户名或者密码出现错误时，系统会提示用户名或者密码出现错误，要求重新输入用户名或者密码进行登录，如图3-2所示。图3-2用户登录模块流程图3.3 数据库设计本系统的主要数据表如下：幼儿档案表记录了幼儿的基本信息，
21、如编号、姓名、出生日期、入园日期等，如表3-1所示。字段名称数据类型及长度说明编号Varchar(10)主键，幼儿唯一编号姓名Varchar(10)幼儿姓名民族Varchar(10)幼儿民族性别Varchar(4)幼儿性别出生日期Date 幼儿出生日期入园日期Date幼儿入园日期班级名称Varchar(10)幼儿所在班级名称联系地址Varchar(50)幼儿家庭所在地父亲姓名Varchar(10)父亲姓名父亲单位Varchar(50)父亲所在单位父亲电话Varchar(11)父亲联系电话母亲姓名Varchar(10)母亲姓名母亲单位Varchar(30)母亲所在单位母亲电话Varchar(11
22、)母亲联系电话备注Varchar(50)备注表3-1幼儿档案表操作员表记录了登录系统人员的账号、用户类型、用户名及密码，如表3-2所示。字段名称数据类型及长度说明账号Varchar(12)主键，操作员唯一编号用户类型Varchar(20)操作员的类型用户名Varchar(10)操作员的姓名密码Varchar(10)操作员登录系统的密码表3-2操作员表班级表记录幼儿所在班级编号、班级名称、主班主任、副班主任，如表3-3所示。表3-3班级表字段名称数据类型及长度说明班级编号Varchar(9)主键，班级的唯一编号班级名称Varchar(10)班级的名称主班主任Varchar(10)主要负责幼儿出勤
23、统计等副班主任Varchar(10)负责日常生用品管理收费明细表主要记录了月收费日期、缴费日期、编号、姓名、班级名称、应缴金额、实缴金额、欠费金额，如表3-4所示。表3-4收费明细表字段名称数据类型及长度说明月收费日期Date月收费的日期缴费日期Date 缴费时的日期编号Varchar(10)幼儿编号姓名Varchar(10)幼儿姓名班级名称Varchar(10)幼儿所在的班级名称应缴金额Int(5)该月应该缴的费用实缴金额Int(5)该月该幼儿实际缴的费用欠费金额Int(5)应缴费用与实缴费用之差出勤统计表记录了出勤日期、编号、姓名、班级名称、入托天数，如表3-5所示。表3-5出勤登记表字段
24、名称数据类型及长度说明出勤日期Date月出勤日期编号Varchar(10)幼儿编号姓名Varchar(10)幼儿姓名班级名称Varchar(10)幼儿所在班级名称入托天数Int(4)本月出勤天数应收费表主要实现了对幼儿缴费应缴费用的统计，记录了月收费日期、编号、姓名、班级名称、应缴金额，如表3-6所示。表3-6应收费表字段名称数据类型及长度说明月收费日期Date月收费的日期编号Varchar(10)幼儿编号姓名Varchar(10)幼儿姓名班级名称Varchar(10)幼儿所在班级名称应缴金额Int(5)按出勤天数和伙食计算出的金额欠费表主要记录了月收费日期、编号、姓名、班级名称、欠费金额，如
25、表3-7所示。表3-7欠费表字段名称数据类型说明月收费日期Date月收费的日期编号Varchar(10)幼儿编号姓名Varchar(10)幼儿姓名班级名称Varchar(10)幼儿所在班级欠费金额Int(5)所欠费用3.4 数据表的主要关系图本系统主要关系图，如图3-3所示。图3-3数据表主要关系图第4章 系统实现4.1 系统登录功能登录界面需要选择登录系统的用户类型，然后输入相应的账号和密码并登录用户类型所对应的系统界面，本系统一共有三种用户：园长、财务人员、班主任。账号密码都输入正确并且所选择的登入方式也正确的情况下点击登录进入相应的管理系统界面，登录界面设计如图4-1所示。图4-1系统登
26、录功能界面登录界面的登录按钮代码如下：Protected Sub But登录_Click(ByVal sender As Object, ByVale AsSystem.EventArgs) Handles But登录.ClickIf (Rad登录对象.SelectedItem.Text = 园长) ThenDimconnAsNewData.OleDb.OleDbConnection(provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(.数据库/幼儿园收费系统.mdb)Dim cmd As New Data.OleDb.
27、OleDbCommandDim dr As Data.OleDb.OleDbDataReaderconn.Open()cmd.CommandText = select * from 操作员表 where 账号= & Txb1.Text & and 密码= & Txb2.Text & and 用户类型= 园长cmd.Connection = conndr = cmd.ExecuteReaderTxb1.Text = Txb2.Text = If dr.Read ThenSession(用户名) = dr.Item(用户名) Response.Redirect(.园长/园长功能页.aspx) El
28、seMsgBox(园长账号或密码错误, MsgBoxStyle.SystemModal, 提示)Txb1.Text = Txb2.Text = End IfElseIf (Rad登录对象.SelectedItem.Text = 财务人员) ThenDim conn As New Dim conn As NewData.OleDb.OleDbConnection(provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(.数据库/幼儿园收费系统.mdb)Dim cmd As New Data.OleDb.OleDbCommand
29、cmd.CommandText = select * from 操作员表 where 账号= & Txb1.Text & and 密码= & Txb2.Text & and 用户类型= 财务人员cmd.Connection = connconn.Open()Dim dr1 As Data.OleDb.OleDbDataReaderdr1 = cmd.ExecuteReaderIf dr1.Read ThenSession(用户名) = dr1.Item(用户名)Session(账号) = dr1.Item(账号)Response.Redirect(.财务人员/财务人员功能页.aspx)Else
30、MsgBox(财务人员账号或密码错误, MsgBoxStyle.SystemModal, 提示)Txb1.Text = Txb2.Text = End If ElseDim conn As New OleDbConnection(provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(.数据库/幼儿园收费系统.mdb)Dim cmd As New OleDbCommandDim dr1 As OleDbDataReaderconn.Open()cmd.CommandText = select * from 操作员表 wher
31、e 账号= & Txb1.Text & and 密码= & Txb2.Text & and 用户类型= 班主任cmd.Connection = conndr1 = cmd.ExecuteReader If dr1.Read Then Session(用户名) = dr1.Item(用户名) Response.Redirect(.班主任/班主任功能页.aspx)ElseMsgBox(班主任账号或密码错误, MsgBoxStyle.SystemModal, 提示)Txb1.Text = Txb2.Text = End IfEnd IfEnd Sub4.2 园长管理功能园长管理界面主要实现了对幼儿档
32、案的增加、删除、修改、查询；班级的增加、删除、修改、查询；操作员的增加、删除、修改、查询；批量调整班级及办理离园。下面介绍几个园长管理界面主要功能。(1)添加班级功能每个班级都有固定的属性来描述，其中包括班级编号，班级名称，主班主任等属性。园长具有班级管理实现班级信息的查询、增加、修改和删除操作的权限。如图4-2 所示。图4-2 添加班级添加班级添加按钮代码如下：Protected Sub But新增_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles But新增.ClickDim conn As New Dat
33、a.OleDb.OleDbConnection(provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(.数据库/幼儿园收费系统.mdb)Dim cmd As New OleDbCommandconn.Open()cmd.Connection = conncmd.CommandText = insert into 班级 values( & TextBox1.Text & , & TextBox2.Text & , & TextBox3.Text & , & TextBox4.Text & , & TextBox5.Text
34、& , & TextBox6.Text & )cmd.ExecuteNonQuery()conn.Close()Try DG班级添加.EditItemIndex = -1 Call bindData() Label3.Text = 新增班级成功！ Catch ex As Exception Label3.Text = 新增错误，请重新添加！ End Tryconn.Close()End Sub(2)班级修改与删除功能班级修改由园长根据幼儿园的需求修改班级名称、主班主任、副班主任及备注；班级删除实现了将该班级从班级列表中删除。如图4-3所示。图4-3班级修改与删除功能添加班级修改与删除按钮代码如
35、下：Protected Sub DG班级设置_UpdateCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DG班级设置.UpdateCommandDim conn As New Data.OleDb.OleDbConnection(provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(.数据库/幼儿园收费系统.MDB)Dim cmd As New OleDbComma
36、ndDim t3, t4, t5, t6 As New TextBoxt3 = e.Item.Cells(1).Controls(0)t4 = e.Item.Cells(4).Controls(0)t5 = e.Item.Cells(2).Controls(0)t6 = e.Item.Cells(3).Controls(0)cmd.CommandText = update 班级 set 班级名称= & t3.Text & ,主班主任= & t5.Text & ,副班主任= & t6.Text & ,备注= & t4.Text & where 班级编号= & DG班级设置.DataKeys(e.
37、Item.ItemIndex) & conn.Open()cmd.Connection = conncmd.ExecuteNonQuery()DG班级设置.EditItemIndex = -1conn.Close()Call bindData()End SubProtected Sub DG班级设置_DeleteCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DG班级设置.DeleteCommandDim conn As New Data
38、.OleDb.OleDbConnection(provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(.数据库/幼儿园收费系统.mdb)Dim cmd As New OleDbCommandconn.Open()cmd.CommandText = delete from 班级 where 班级编号= & DG班级设置.DataKeys(e.Item.ItemIndex) & cmd.Connection = conncmd.ExecuteNonQuery()conn.Close()Call bindData()End Sub
39、4.3 财务人员管理功能财务人员管理主要实现了对幼儿收费情况的管理。财务人员管理界面主要功能如下：(1)应收费管理功能首先选择由班主任出勤登记情况生成的应收费表中要交费的幼儿，查看应缴金额，然后根据费用计算公式“单击”生成欠费金额按钮生成欠费表，最后“单击”保存按钮生成应收费明细表。功能实现如图4-4所示。图4-4应收费管理功能图(2)收费情况查询功能可以根据班级、姓名、编号、月收费日期分别查找幼儿的收费情况，如图4-5所示。也可直接查找某班级某幼儿某月的收费情况如图4-6所示。图4-5收费情况查询图4-6 收费情况查询收费情况查询功能查找按钮代码如下：Protected Sub Button
40、1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.ClickDrop班级.Text = 全部Txt姓名.Text = Txt编号.Text = Drop月收费日期.Text = 全部Call binddata()End SubSub binddata(ByVal bj As String, ByVal xm As String, ByVal bh As String, ByVal ysfrq As String)Dim conn As New OleDbConnection(provider
41、=microsoft.jet.oledb.4.0;data source= & Server.MapPath(.数据库/幼儿园收费系统.mdb)Dim strsql As String = Dim a As StringDim cmd As New OleDbCommandDim daap As New OleDbDataAdapterDim ds As New DataSetIf bj 全部 Then If strsql = Then strsql = where 班级名称 = & bj & Else strsql &= and 班级名称 = & bj & End IfEnd If If x
42、m Then If strsql = Then strsql = where 姓名 = & xm & Else strsql &= and 姓名 = & xm & End If End IfIf bh Then If strsql = Then strsql = where 编号 = & bh & Else strsql &= and 编号 = & bh & End IfEnd IfIf ysfrq 全部 Then If strsql = Then strsql = where 月收费日期= & ysfrq & Else strsql &= and 月收费日期 = & ysfrq & End
43、IfEnd Ifa = select * from 收费明细 & strsql & cmd.CommandText = acmd.Connection = conndaap.SelectCommand = cmddaap.Fill(ds)DG费用.DataSource = ds.Tables(0)DG费用.DataBind()End Sub(3)收费统计功能按月收费日期进行收费汇总是指根据选择要统计的月份将所选月份的所有班级幼儿所缴费用进行加和处理并统计出人数并生成按月缴费汇总表，如图4-7所示。按班级进行收费汇总是指根据选择的班级把班级的所有月份的所有幼儿所缴费用进行加和处理并统计出人数并生
44、成按班级缴费汇总表，如图4-8所示。图4-7收费统计图4-8收费统计4.4班主任管理功能主要实现个人信息查询；密码修改；幼儿出勤登记；幼儿档案查询；幼儿出勤情况查询；欠费查询。班主任主要功能实现如下：(1)幼儿出勤登记功能实现如图4-9所示。图4-9幼儿出勤登记幼儿出勤情况登记功能实现主要代码如下：Sub scysf()Dim conn As New OleDbConnection(provider=microsoft.jet.oledb.4.0;data source= & Server.MapPath(.数据库/幼儿园收费系统.mdb)Dim cmd As New OleDbCommandDim dr As OleDbDataReaderDim zk As IntegerDim a As String = zk = 0conn.Open()cmd.CommandText = SELECT 托费,餐费 FROM 学费标准cmd.Connection = conndr = cmd.ExecuteReaderIf dr.Read T