小型企业信息管理系统

《小型企业信息管理系统》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、《信息系统开发与实践》课程结课实践作业项目名称：小型企业信息管理系统完成人：二零一二年十一月九日一、需求分析企业信息管理系统是根据企业日常办公的需要来设计开发的案例，目标是提高企业管理的工作效率，具有对用户信息、客户信息、产品信息、合同信息、销售信息和统计信息进行管理和维护的功能。系统主要包括系统管理员对功能的需求、销售部工作人员对功能的需求、客户部工作人员对功能的需求以及合同部工作人员对功能的需求。这4种需求的功能如下。1.系统管理员对功能的需求●用户信息管理：管理系统中所有登录用户的信息，分配用户的部门级别；●客户信息管理：可浏览、添加、维护客户的信息；●

2、产品信息管理：可浏览、添加、维护企业产品的信息；●合同信息管理：可浏览、添加、维护合同的信息；●销售信息管理；可浏览、添加、维护产品销售的信息；●销售信息的统计：可统计产品的销售情况。2.销售部工作人员对功能的需求●浏览、添加、维护企业的产品信息；●浏览、添加、维护产品的销售信息；●浏览、添加、维护合同信息；●统计产品的销售信息。3.客户部工作人员对功能的需求●浏览、维护客户信息；添加新客户信息；●对公司销售情况进行统计。4.合同部工作人员对功能的需求●浏览合同信息、添加新合同、维护合同信息；●浏览客户信息、添加新客户、维护客户信息；●统计产品的销售情况。二、

3、系统功能模块(1)用户登录：用户登录系统，并划分用户的部门权限。(2)用户信息管理：查看用户的信息、增加、修改、删除用户信息。(3)客户信息管理：查看客户的信息、增加、修改、删除客户信息。(4)产品信息管理：查看产品的信息、增加、修改、删除产品信息。(5)合同信息管理：查看合同的信息、增加、修改、删除合同信息。(6)产品销售信息管理：查看产品销售的信息、增加、修改、删除产品销售信息。(7)产品销售统计：统计产品的销售信息。整个系统的功能模块划分结构图，如图下图所示。三、概念模型设计1.用户E-R实体图用户的实体具有用户ID、密码、姓名、部门、电话、E-mail

4、6个属性，ER图如下。2.客户E-R实体图客户的实体具有编号、姓名、负责人、电话、E-mail、级别、地址7个属性，E-R图如下。3.产品E-R实体图产品的实体具有编号、名称、规格、价格、描述5个属性，E-R图如下。.4.合同E-R实体图合同的实体具有合同编号、客户编号、签署日期、执行日期、完成日期、执行状况、负责人、合同金额8个属性，E-R图如下5.销售E-R实体图销售的实体具有合同编号、产品编号、订单数、发货数量、单价5个属性，如下四、逻辑模型设计由E-R图转化的关系模型为：用户户（用户ID，密码，姓名，部门，电话，E-mail）属性类型主键否用户ID文本

5、主键密码文本姓名文本部门文本电话文本E-mail文本客户（编号，姓名，负责人，电话，E-mail，级别，地址）属性类型主键否编号文本主键姓名文本负责人文本电话文本E-mail文本级别文本地址文本产品（编号，名称，规格，价格，描述）属性类型主键否编号文本主键名称文本规格文本价格文本描述文本合同(合同编号，客户编号，签署日期，执行日期，完成日期，执行状况，负责人，合同金额)属性类型主键否合同编号文本主键客户编号文本签署日期文本执行日期文本完成日期文本执行状况文本负责人文本合同金额文本销售（合同编号，产品编号，订单数，发货数量，单价）属性类型主键否合同编号文本主键产

6、品编号文本主键订单数文本发货数量文本单价文本五、物理设计与实施1.用户登录窗口2，登录成功与失败提示3.登录成功后进入系统主窗口4.用户修改模块5.用户查询模块6.产品查询模块7.代码设计（1）登录界面核心代码procedureTForm1.Button1Click(Sender:TObject);beginif(edit1.Text='')or(edit2.Text='')thenshowmessage('姓名或密码为空');ifADOTable1.Locate('姓名;密码',VarArrayOf([edit1.Text,edit2.Text]),[])t

7、henbeginform1.Visible:=false;messagedlg('登陆成功',mtinformation,[mbOK],0);form2.Show;endelsemessagedlg('登陆失败',mtinformation,[mbOK],0);end;procedureTForm1.Button2Click(Sender:TObject);beginform1.Close;end;(2)系统主窗口部分代码procedureTForm2.Timer1Timer(Sender:TObject);beginStatusBar1.Panels[0].

8、Text:='当前用户:'+form1