《2020年(行政总务)行政管理系统毕业设计范例》由会员分享,可在线阅读,更多相关《2020年(行政总务)行政管理系统毕业设计范例(39页珍藏版)》请在金锄头文库上搜索。
1、吉林省明日科技有限公司监制行政管理系统学 院专 业班 级学 号姓 名指导教师教师职称年月日 33 摘要【摘要】当今社会飞速发展,行政管理在社会关系中显得非常的重要,然而,在很多的行政系统中,忽略了利用计算机软件来进行日常办公管理的这一关键环节,因此,造成管理上的混乱、工作效率低下等事件的发生,随着IT产业的发展,利用计算机软件代替手工办公的方式已经当今社会发展的必然趋势,因此,行政管理系统软件应运而生。【关键词】 企事业机关 行政管理 行政管理系统目录摘要1目录1引言11 系统分析21.1 需求分析21.2 可行性分析22 总体设计22.1 项目规划22.2 系统功能结构图33 详细设计33.
2、1 数据模块设计33.2 主窗体设计43.3 会议记录93.4 一周工作安排123.5 报销费用管理153.6 编码查询19附录A 参考文献23附录B 数据表结构24附录C 文件架构图32引言行政管理系统涵盖会议、办公、机关事务处理、车辆、费用等行政管理内容以及人机结合的监督考评;建立事前预防(提示),事中监控,事后考评的机制,对行政管理权实施过程进行监控,全面推进行政管理工作的规范化、标准化、法制化和信息化。行政管理包括对企业内部会议的管理、办公管理、车辆信息及用车信息管理、企业消费费用、信息发布及通知、辅助功能等方面的全方位的管理。其中会议管理包括对会议室管理、会议通知和会议查询几部分;办
3、公管理主要是对工作计划、工作日志和周工作安排进行系统的管理;车辆管理是对企业内部人员包括企业领导用车信息进行详细的记录;费用管理是对企业日常的消费费用进行管理,包括电话费用、报销费用和车辆费用支出管理。通过信息发布和辅助功能为企业员工在日常工作中提供便利,如发布会议通知、航班查询和编码查询等等。1 系统分析1.1 需求分析通过市场调查,要求本系统具有以下的功能:q 统一友好的操作界面,能保证系统的易用性。q 规范、完善的基础信息设置。q 灵活的报表打印功能。q 能够完成对企业会议、企业办公、企业车辆和费用信息的有效管理。q 全国各地的编码及航班查询。q 提供常用网址和手机归属地信息查询q 通过
4、系统日志,详细记录修改记录的操作,提供追查的有力依据。q 完善的权限管理,增强系统的安全性。q 强大的数据备份及恢复功能,保证系统数据的安全性。q 可在不退出系统的同时更换操作员。1.2 可行性分析传统的行政管理工作可以说是千头万绪,纷繁复杂,工作人员面临着大量琐碎繁重的工作,行政管理系统从企业的实际需求出发,简单易用,系统界面友好美观,自定义功能强,权限管理可根据用户的角色来设置,实施简单快速,操作简单明了。基本适用于中小型企业的行政办公管理。2 总体设计2.1 项目规划行政管理系统规划系统功能模块如下:q 会议管理模块会议管理模块主要包括维护会议室信息、发送会议通知信息、记录会议内容、查询
5、会议室信息和会议记录信息5个方面的内容。q 办公管理模块该模块主要由工作日志、记事本、工作计划和一周工作安排4部分组成。q 车辆管理模块车辆管理模块主要包括车辆登记、用车管理、驾驶人员登记、车辆信息查询、用车信息查询和车辆投保管理6部分。q 费用管理包括电话费用管理、报销费用管理和车辆费用支出管理3部分。q 辅助信息包括常用网址、航班查询、编码大全、国际电话代码和手机归属地查询5部分。q 系统管理包括查看日志、删除日志、用户管理、数据备份、数据恢复和系统数据清理6部分。2.2 系统功能结构图行政管理系统的功能结构图如图1所示。图1 行政管理系统功能结构图3 详细设计3.1 数据模块设计模块的作
6、用是减少程序的代码量,提高应用程序代码的重用性和程序编码的可读性。在本系统中,将连接数据库的程序代码都集中放置在一个数据模块Mdl_Data中,在应用程序需要连接数据库时调用该模块,从而完成相应的数据操作、实现操纵数据的功能。在数据模块Mdl_Data中定义了连接字符串变量PublicStr、记录集对象、数据连接函数Cnn和1个全局函数main。在函数main中,提供了连接数据库的字符串,并将其赋值给全局变量PublicStr,提供数据连接。数据模块Mdl_Data中的事件代码如下:数据连接模块Public PublicStr As StringPublic AdoRs As New ADOD
7、B.Recordset 后添加一个记录集对象Public AdoRs1 As New ADODB.Recordset 后添加一个记录集对象Public AdoRs2 As New ADODB.Recordset 后添加一个记录集对象Public Function Cnn() As ADODB.Connection 定义连接字符串函数 Set Cnn = New ADODB.Connection Cnn.Open Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db_ServiceEnd Fun
8、ctionPublic Sub main() PublicStr = Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db_Service frm_xtdl.Show 显示系统登录窗体End Sub3.2 主窗体设计主窗体界面是显示系统主要操作功能的面板,对于主窗体设计的基本要求是:窗体上的控件布局合理、界面美观大方,并且易于操作系统其他功能模块。在主窗体的菜单栏或者窗体中的树状列表中,可以控制其他功能模块的运行,并且根据登录操作员赋予相应的操作权限;在状态栏中,可以显示当前登录操作员、当前系
9、统的日期时间、公司网址等信息。系统主窗体的运行结果如图2所示。图2 系统主窗体运行结果1窗体设计(1)在工程中新建1个窗体,将窗体的名称设置为“frm_Main”,BorderStyle属性设置为“0-None”,MaxButton的属性设置为“False”,并且通过窗体的Picture属性为窗体添加图片。(2)在菜单编辑器中为主窗体设置菜单,设置完成的菜单如图2所示。(3)在窗体上添加TreeView控件,由于该控件属于ActiveX控件,在使用之前必须从“部件”对话框中添加到工具箱。添加方法如下:在“工程”/“部件”对话框中勾选“Microsoft Windows Common Contr
10、ols6.0”列表项,单击【确定】按钮之后即可将TreeView控件添加到工具箱当中。(4)在窗体的TreeView控件上单击鼠标右键,在弹出的快捷菜单中选择“属性”项,然后在弹出的“属性页”对话框中设置TreeView控件的显示样式,如图3所示。图3 设置控件的显示样式(5)在窗体中添加1个StatusBar控件,由于StatusBar控件属于ActiveX控件,在使用之前必须从“部件”对话框中添加到工具箱。添加方法如下:在“工程”/“部件”对话框中勾选“Microsoft Windows Common Controls6.0”列表项,单击【确定】按钮之后即可将StatusBar控件添加到工
11、具箱当中。(6)利用StatusBar控件可以为主窗体设置状态栏。在StatusBar控件上单击鼠标右键选择“属性”项,在弹出的对话框中选择“窗格”选项卡,如图4所示,在图中单击【插入窗格】按钮,可以在StatusBar控件中添加窗格,同时可以设置添加后窗格的文本内容、工具栏提示文本内容和宽度等信息。如果想删除窗格,则通过“索引”旁边的箭头,选择要删除的窗格,然后单击【删除窗格】按钮即可删除。图4 设置状态栏中的窗格系统主窗体界面设计结果如图5所示。图5 系统主窗体的设计界面2代码设计通过单击系统主窗体当中的菜单项,可以控制系统中各个子窗体的运行。单击某个功能菜单项调用系统子窗体的代码如下:P
12、rivate Sub BMDQ_Click() frm_bmcx.Show 1 编码大全End SubPrivate Sub BXFYGL_Click() frm_bxfy.Show 1 报销费用管理End SubPrivate Sub CKRZ_Click() frm_rz.Show 1 查看日志End SubPrivate Sub CLDJ_Click() frm_cldj.Show 1 车辆登记End SubPrivate Sub CLFYZC_Click() frm_clfyzc.Show 1 车辆费用支出管理End SubPrivate Sub CLTBXXGL_Click() fr
13、m_cltb.Show 1 车辆投保管理End SubPrivate Sub CLXXCX_Click() StrCx = 3 如果执行的是车辆信息查询,则标识变量的数值取值为3 Frm_Cx.Show 1End SubPrivate Sub CXDL_Click() Unload Me frm_xtdl.Show 重新登录End SubPrivate Sub CYWZ_Click() frm_wzcx.Show 1 常用网址End SubPrivate Sub DHFYGL_Click() frm_dhfy.Show 1 电话费用管理End SubPrivate Sub DJCX_Click() StrCx = 1 如果执行的是会议记录信息查询,则标识变量的数值取值为1 Frm_Cx.Show 1 会议记录信息查询End SubPrivate Sub GJDHDM_Click() frm_dhhmcx.Show 1 国际电话代码End SubPrivate Sub GYSGL_Click() frm_hysgl.Show 1 会议室管理End SubPrivate Sub GZJH_Click() frm_Gzjh.Show 1 工作计划End SubPrivate Sub GZRZ_Click() frm_Gzrz.Show 1 工作日志En