目录
目录... 2
摘要... 3
前 言... 3
第一章 系统分析、设计... 4
1.1系统需求分析... 4
1.2 用户需求... 4
1.3系统功能需求简介... 5
公司内部办公管理系统对公司加强内部信息管理有着极其重要的作用。由于各个公司每年都在发展，公司的日益庞大，传统的手工信息管理不仅工作量大，而且容易出现问题。... 5
1.4功能需求描述... 5
1.5功能模块图... 5
1.6数据库设计... 6
1.7E-R图... 9
第二章 系统实现... 11
2.1数据库连接... 11
2.2登陆界面设计... 12
2.3用户登录界面及编码设计... 14
2.4进入员工信息管理系统... 15
</table>. 17
2.4.1修改员工个人信息... 17
2.4.2添加新用户信息... 21
2.4.3删除用户信息:. 24
2.5用户进入公司财务信息管理系统... 25
2.5.1 添加财务记录... 26
2.5.2修改财务记录... 28
2.5.3删除财务记录... 29
2.5.4生成财务报表... 29
2.6用户进入公司内部信息交流系统... 33
2.6.1通知公告牌... 34
2.6.2内部意见箱... 36
第三章 结 论... 38
3.1．体会到了系统分析的重要性... 38
3.2．理论≠实践... 38
3.3．掌握了系统开发的流程... 38
3.4．巩固了知识... 38
致谢... 39
参考文献... 39
第二章 系统实现
下面给出系统开发出来的详细界面以阐述公司内部管理系统的具体功能。
2.1数据库连接
代码如下：
<%
dim conn '数据库连接
dim connstr '连接字符串
dim db '数据库文件路径
db = "Database/office.mdb" '演示时用ACCESS数据库
connstr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
Set conn = Server.CreateObject("ADODB.Connection")
if err Then
err.clear
end if
conn.Open connstr
'关闭数据库连接，在每页中调用此函数，将连接放入连接池
sub CloseConn()
conn.Close()
Set conn = Nothing
end sub
'替换单引号
function RealString(strSrc)
RealString = Replace(Trim(strSrc), "'", "''")
end function
%>
2.2登陆界面设计
首先是进入登陆界面，本窗体显示用户名称，密码校验等信息，本系统的用户分为三类：系统管理员，财务管理员，普通员工。使用者可以输入相应的用户名和密码，单击“确定”就会将输入提交给系统以验证用户、密码及身份。如果用户名及密码正确，则会进入系统的主体。
本模块的流程图如下：
