企业人事管理信息系统的设计与开发_毕业论文

企业人事管理信息系统的设计与开发

?员工工作评价模块窗口设计

图22 工作评价管理主窗口

①员工工作评价信息添加、修改窗口

图23 员工评价添加窗口

第 25 页 共 32 页

企业人事管理信息系统的设计与开发

②员工工工作评价信息查询窗口

图24 员工评价查询窗口 ③员工工工作评价信息统计窗口

图25 员工评价统计窗口

?员工工资管理模块窗口设计

图26 员工工资管理主窗口

第 26 页 共 32 页

企业人事管理信息系统的设计与开发

①员工工资信息添加、修改窗口

图27 员工工资添加修改窗口

②员工计发工资查询窗口

图28 员工工资查询窗口

③员工计发工资统计窗口

图29 员工工资统计窗口

第 27 页 共 32 页

企业人事管理信息系统的设计与开发

五、系统实现 1、程序设计

注：由于部分程序函数较长，对类式的判断或CASE语句用……省略。

?数据库操作函数

对数据库的连接和操作，通过函数调用的方式完成，主要涉及的函数有两个： ①连接数据库

设置rdocnt为主数据库句柄，连接数据库，语句如下：

rdoEngine.rdoRegisterDataSource \

ConnectStr = \+ \

Set rdoCnt = rdoEnvironments(0).OpenConnection(dsname:=\Prompt:=rdDriverNoPrompt, Connect:=ConnectStr)

②执行SQL语句函数

通过判断SQL语句类型（insert 、update、 select等）进行执行或返回查询记录集，语句如下：

Set cnn = New ADODB.Connection cnn.Open ConnectString

If InStr(\ cnn.Execute SQL

MsgString = sTokens(0) & \ Else

Set rst = New ADODB.Recordset

rst.Open Trim$(SQL), cnn, adOpenKeyset, adLockOptimistic Set ExecuteSQL = rst End If

?动态菜单项的实现

本系统所有菜单项均采用动态载入方式，即通过对登录操作员权限的判断，系统主窗口显示其权限内菜单项。从而实现的对操作员的权限控制功能。

设计方法：将所有菜单信息存人数据库的表中，然后通过角色权限的限制，进行有条件的调用，从而实现菜单的载入和显示，达到权限控制功能。

①从角色表中读取操作员的角色信息

用户登录时，将操作员ID信息保存到全局变量m_OperatorID。系统显示菜单项时，先从角色表中读取登录操作员的角色信息。

语句如下：

sSql =\\

Set rst = rdoCnt.OpenResultset(sSql, rdOpenKeyset) ②从菜单信息表中读取角色对应的菜单信息

第 28 页 共 32 页