- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
信息工程学院办公娱乐一体化系统课程设计精品
《.NET程序设计》期末考试(课程设计总结)设计名称 信息工程学院办公娱乐一体化系统 组 长 参 加 人 指导教师 班 级 年 月 日系统需求分析目前,随着网络技术的飞速发展,各行各业都在追求信息化,以防在信息时代落伍,而普通高校也如此,办公自动化是高校教师获得交流和沟通的一个重要渠道。因此一个健全的办公管理系统就必不可少,办公管理系统的使用大大的提高了办公室的工作效率,很好的节省了大量的人力、物力和财力资源。管理信息系统的开发是一个开发周期长、技术要求高、影响因素多的复杂系统工程,因此制定一个完善、可行、合理的开发计划,不仅是系统开发成功的保证,而且可以提高效率、节省时间、降低成本。但是就目前市场上存在的办公系统来看,都是仅仅停留在单一的办公层面。作为一个当代人,我们很清楚的知道,一味的不停的工作而不加以适当的娱乐休闲不仅会损害员工的身体而且工作效率也极其的低下,最终只能得不偿失。出于此目的,再结合我们信息工程学院办公室的实际情况,一款名为信息工程学院办公一体化的系统应运而生。即是对自己本学期学习VB.NET的一种考察,也是对自己编程能力的一种锻炼和提升。我们学院的办公管理工作上虽然是运用计算机进行,但是并没有形成完整的系统体系,收发文件除了在学校规定的A8系统上外,一般都是用QQ传输的方式进行。工作起来效率很低,并且不能及时的收发各类所需要的信息,而且我们学院的办公室相对工作量极大,教务上的老师经常劳累一天而不能得到很好的放松。基于以上的对问题的分析,利用计算机给我们提供信息,及时地调整我院办公室办公系统结构,并且对教师们的之间的办公交流过程形成一整套动态的管理就十分必要了。系统模块设计本系统主要分为以下几个模块:办公常用模块,包含了各种办公时会用到的常用功能,有今日安排,邮件发送,备忘录,日历,二级学院通讯录等。这些都是办公必须用到的功能都集成在了信息工程学院办公一体化系统中,彰显办公的重要与便利。学生管理模块,包含对学生进行管理时必须实现的功能,如查询学生的详细信息,学生的奖惩异动管理,以及最实用的学生考勤管理。这些的包含定会使本系统的功能强强联合,与其他的单一办公一体化系统具有难以超越的优越性。放松娱乐模块,在烦劳的工作后,使疲倦的工作者有一个放松的平台。可以听听自己喜欢的音乐,看看短而有趣的视频,再不然,欣赏一下优美的自然风景,让自然风光随着电子相册跳动起来。当然,说道放松怎么能少了玩个小游戏呢。那么游戏就必须得包含进这个系统了,一款经典的植物大战僵尸让你从疲惫中全然释放出来。统计报表模块,任何数据都看起来枯燥无味,如果做成图表的形式化,不仅美丽大方,更为重要的是可以是数据表达出的信息淋漓尽致。系统维护模块,里面包含了系统帮助文档,可以帮助用户方便的操作本系统。还有就是必须的修改密码和退出系统模块了,这些都是一个完整系统所必须的。系统数据设计备忘录表的E-R 图,如图所示:二级学院通讯录表的E-R 图,如图所示:奖惩管理表的E-R 图,如图所示:考勤记录表的E-R 图,如图所示:用户表的E-R 图,如图所示:学生详细信息表的E-R 图,如图所示:数据库中实际表结构:系统功能介绍(包括部分程序代码)系统实际效果:图1 系统主界面图2 主界面右键快捷菜单图3 办公常用之今日安排图3 办公常用之邮件发送主界面部分程序代码:1.用户登入Imports System.Data.SqlClientImports System.IOPublic Class 用户登入 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Static count As Integer Dim fv As New 用户登入 apppath = Application.StartupPath If TestConnection() Then Dim strsql As String = select count(*) from 用户 where 用户名= Trim(TextBox1.Text) and 密码= Trim(TextBox2.Text) and身份 = ComboBox1.Text objconn1.Open() Dim objcmd As New SqlCommand(strsql, objconn1) Dim n1 As Integer = objcmd.ExecuteScalar objconn1.Close() objcmd.Dispose() If n1 0 Then xm = Trim(TextBox1.Tex
文档评论(0)