OA办公自动化系统的设计毕业论文.docx

资源描述

OA办公自动化系统的设计毕业论文.docx

《OA办公自动化系统的设计毕业论文.docx》由会员分享，可在线阅读，更多相关《OA办公自动化系统的设计毕业论文.docx（63页珍藏版）》请在冰豆网上搜索。

OA办公自动化系统的设计毕业论文.docx

OA办公自动化系统的设计毕业论文

第1章系统分析

1.1需求分析……………………………………………………………1

1.2可行性分析……………………………………………………………1

第2章总体设计

2.1项目规划………………………………………………………………2

2.2系统功能架构图………………………………………………………2

第3章数据库的设计

3.1数据表的概要说明……………………………………………………3

3.2主要数据表的结构……………………………………………………3

第4章主要功能模块的设计

4.1公共模块设计…………………………………………………………6

4.2登录界面设计………………………………………………………6

4.3主界面设计…………………………………………………………10

4.4通知管理………………………………………………………………14

4.5新闻管理………………………………………………………………21

4.6文件管理………………………………………………………………24

4.7交流管理………………………………………………………………31

4.8系统维护管理………………………………………………………35

4.9其它模块………………………………………………………………43

第5章问题分析与解决

5.1由于“ADO”属性中记录源命令类型设置不同出现的问题…………51

5.2如何利用CommonDialog控件………………………………………52

5.3ComboBox控件设置为只读属性后，如何添加列表…………………53

5.4如何将多种格式的文件保存到数据库中……………………………54

结论

致谢

参考文献

第1章系统分析

1.1需求分析

通过调查，要求系统具有以下功能。

*由于操作人员的计算机知识普遍较差，因此要求有良好的人机界面。

*由于该系统的使用对象多，因此要有较好的权限管理。

*方便数据的查询，修改。

*信息发布与文件传送的速度快。

*通过座机能够直接“透视”公司的各项工作及活动安排。

*用MSChart图表显示活动投票结果。

*在相应的权限下，管理员可以删除数据

1.2可行性分析

开发任何一个基于计算机的系统时，都会受到时间和资源上的限制。

因此，在接受任何一个项目开发任务之前，必须根据客户可能提供的时间和资源条件进行可行性分析，以减少项目开发风险，避免人力、物力和财力的浪费。

本系统的数据库采用目前比较浒的SQLServer2000，该数据库系统在安全性、准确性、运行速度方面有绝对的优势，并且处理数据量大、效率高；前台采用Microsoft公司的VisualBasic6.0作为主要的开发工具，它可与SQLServer2000数据库无缝。

第2章总体设计

2.1项目规划

OA办公自动化系统是一个典型的网络办公开发应用程序，它包含通知管理模块、新闻管理模块、文件管理模块、交流管理模块、系统维护管理模块等。

（1）通知管理模块

该模块主要负责信息的发布、接收等。

（2）新闻管理模块

该模块主要负责新闻的发布、接收等。

（3）文件管理模块

该模块主要负责文件的发布、接收等。

（4）交流管理模块

该模块主要实现意见反馈、活动投票。

（5）系统维护管理模块

该模块主要负责用户添加、删除，密码、权限的修改，意见箱的管理，投票活动管理。

2.2系统功能构架图

系统构功能架图

第3章数据库的设计

3.1数据库的概要说明

系统数据库的名称为db_OA，包含有8表，下面给出各数据表的作用。

dbOA_user

系统用户表用来存储系统操作员的基本信息

tbOA_news

新闻表主要用于存储新闻的发布信息。

tbOA_notice

通知表主要用来存储办公通知信息。

tbOA_file

文件数据表主要用来存储文件传送的基本信息。

tbOA_idea

意见表主要用于存储员工反馈的意见。

tbOA_vote

投票表主要用来存储活动投票的基本信息。

tbOA_voteRecord

活动投票记录表主要用来存储投票记录人，以避免重复投票。

tbOA_dept

部门表主要用来存储公司部门信息的表。

3.2主要数据表的结构

表1dbOA_user

字段名

数据类型

长度

主键否

描述

username

vachar

用户名

userjpwd

vachar

密码

userbit

bit

权限标记

表2tbOA_news

字段名

数据类型

长度

主键否

描述

news_id

int

新闻ID

news_date

datetime

新闻发布时间

news_person

vachar

发布人

news_acceptDept

vachar

新闻接收部门

news_acceptPerson

vachar

接收人

news_bit

bit

标记

news_text

vachar

备注

表3tbOAnotice

字段名

数据类型

长度

主键否

描述

notice_id

int

通知ID

notice_date

datetime

通知时间

notice_person

vachar

发布通知人

notice_acceptDept

vachar

通知部门

notice_acceptPerson

vachar

通知人

notice_bit

bit

标记

notice_text

vachar

500

备注

表4tbOA_file

字段名

数据类型

长度

主键否

描述

file_id

int

file_subject

varchar

文件主题

file_text

varchar

文件描述

file_person

varchar

传送人

file_dept

varchar

接收部门

file_name

varchar

接收人

file_date

datetime

传送日期

file_file

image

文件

file_type

varchar

文件类型

表5tbOA_idea

字段名

数据类型

长度

主键否

描述

idear_id

int

意见ID

idear_subject

varchar

意见主题

idear_text

varchar

意见容

表6tbOA_vote

字段名

数据类型

长度

主键否

描述

vote_id

int

活动ID

vote_subject

varchar

活动主题

vote_memo

varchar

活动备注

vote_qty

float

投票数量

表7tbOA_voteRecord

字段名

数据类型

长度

主键否

描述

voteRecord_id

int

voteRecord_name

varchar

投票人

表8tbOA_dept

字段名

数据类型

长度

主键否

描述

dept_id

int

部门编号

dept_name

varchar

部门名称

dept_describe

Text

描述信息

第4章主要功能模块的设计

4.1公共模块设计

为了节省系统资源，实现代码重用，可以在系统中新建一个Module1模块。

就本系统而言，该模块主要用于实现数据库的共享连接。

在以后的编程中，如果使用对象访问数据库或“ADOData”控件访问数据库则可以直接将数据库连字符串的值赋给相应的“ConnectionString”属性，从而避免了重复建立数据库的麻烦，以防失去ADO+SQL的优越性能。

代码如下：

PublicpstrAsString

PublicSubmain（）

'共享连接字符串

pstr="Provider=SQLOLEDB.1;PersistSecurityInfo=False;UserID=sa;

pwd=sa;InitialCatalog=db_OA;DataSource=A-PC"

'调用frm_login窗口

frm_login.Show

EndSub

4.2登录界面设计

本系统属于OA办公自动化系统，用户权限分为系统管理员和普通用户两种。

“系统登录”窗体用于难操作员及其密码，主要通过打开数据库连接、打开数据结合if语句，判断用户输入的操作员及密码是否符合数据库中的操作员和密码，如果符合则允许登录，并给予相应的权限，否则提示用户不存在。

1.窗体设计

新建一个窗体，将窗体的BorderStyle属性设置为“0-None”,设置Picture属性，为窗体添加图片。

添加两个“Label”控件，设置其BackStyle属性设置为“0-Transparent”。

添加两个“TextBox”控件，设置其BorderStyle属性为“0-None”。

添加两个“CommondButton”控件，分别将其Caption属性设置为“登录”、“退出”。

“系统登录”窗体的设计结果如下图所示：

图4.2

2.代码设计

双击“登录”按钮（labLogin）添加如下事件代码：

PrivateSublabLogin_Click（）

Setcon=NewADODB.Connection

Setrs=NewADODB.Recordset

con.ConnectionString=pstr

con.Open

mysql="select*fromdbOA_userwhereuser_name='"+Text1.Text+"'"

rs.Openmysql,con

'判断是否存在用户

Ifrs.EOFThen

MsgBox"没有这个用户，请重新输入用户名！

con.Close

Text1.Text=""

Text1.SetFocus

'如果存在，判断用户输入的密码是否正确

Else

IfTrim（rs（"user_pwd"））=Trim（Text2.Text）Then'rs.fields

（1）=Text2.Text

frm_login.Hide

'如果密码正确，判断用户权限，如果用户没有管理权限则设置主界面的TreeView控件

'的树状菜单为操作员的样式

Ifrs.Fields

（2）=FalseThen

frm_mainbefore.Show

frm_mainbefore.StatusBar1.Panels

（1）.Text="操作职员：

"&Text1.Text

'显示系统时间

frm_mainbefore.StatusBar1.Panels

（2）.Text=Format（Now,"m/d/yy"）

'设置treeview控件的树状菜单

Setn1=frm_mainbefore.TreeView1.Nodes.Add（,tvwChild,"通知管理","通知管理",1）

Setnode1=frm_mainbefore.TreeView1.Nodes.Add（n1,tvwChild,"发布通知","发布通知",1）

Setnode1=frm_mainbefore.TreeView1.Nodes.Add（n1,tvwChild,"接收通知","接收通知",1）

Setnode1=frm_mainbefore.TreeView1.Nodes.Add（n1,tvwChild,"已发通知","已发通知",1）

Setn2=frm_mainbefore.TreeView1.Nodes.Add（,tvwChild,"新闻管理","新闻管理",1）

Setnode2=frm_mainbefore.TreeView1.Nodes.Add（n2,tvwChild,"新闻发布","新闻发布",1）

Setnode2=frm_mainbefore.TreeView1.Nodes.Add（n2,tvwChild,"接收新闻","接收新闻",1）

Setnode2=frm_mainbefore.TreeView1.Nodes.Add（n2,tvwChild,"已发新闻","已发新闻",1）

Setn3=frm_mainbefore.TreeView1.Nodes.Add（,tvwChild,"文件传送","文件传送",1）

Setnode3=frm_mainbefore.TreeView1.Nodes.Add（n3,tvwChild,"传送文件","传送文件",1）

Setnode3=frm_mainbefore.TreeView1.Nodes.Add（n3,tvwChild,"接收文件","接收文件",1）

Setnode3=frm_mainbefore.TreeView1.Nodes.Add（n3,tvwChild,"已发文件","已发文件",1）

Setn4=frm_mainbefore.TreeView1.Nodes.Add（,tvwChild,"交流管理","交流管理",1）

Setnode4=frm_mainbefore.TreeView1.Nodes.Add（n4,tvwChild,"意见箱","意见箱",1）

Setnode4=frm_mainbefore.TreeView1.Nodes.Add（n4,tvwChild,"投票活动","投票活动",1）

Else

frm_mainbefore.Show

'拥有操作权限，设置TreeView控件的树状菜单为管理员的样式

frm_mainbefore.StatusBar1.Panels

（1）.Text="管理职员：