vf公司管理系统论文 第4页
4 公司管理系统的功能实现
4.1 登陆界面编码设计
在系统加载时，先启动”登录”模块的登录窗体，只有当用户输入了正确的用户名和密码，并根据用户权限选择进入到系统主界面。
“开始”窗体运行界面，如图4-1所示：
图4-1 公司管理系统功能开始界面图
“登陆”窗体运行界面，如图4-2所示：
图4-2 公司管理系统登陆界面图
用户登录界面的代码实现如下所示：
uname=thisform.用户名.Value
pwd=thisform.密码.Value
CLOSE TABLES all
use "C:\Documents and Settings\Administrator\桌面\王娟工商管理系统\data\login.dbf"
SET EXACT ON
DIMENSION s(10)
FOR i=1 to 10 step 1
s(i)=""
ENDFOR
SELECT * FROM login WHERE(login.username=uname AND login.password=pwd) INTO
ARRAY s
qx=login.popedom
IF s(1)=""then
MESSAGEBOX("非法用户登录！",0,"登陆错误")
ELSE
CLOSE TABLES all
do form "C:\Documents and Settings\Administrator\桌面\王娟工商管理系统\forms\slecttable.scx"with qx
thisform.Release
endif
以上为用户登录界面“确定“按钮代码的具体实现。
4.2 员工信息管理界面编码设计
员工信息管理包括员工基本信息的管理，主要实现员工的添加，删除，修改，保存，以及按条件查找等功能。
“employee”窗体运行界面，如图4-3所示：
图4-3 公司管理系统employee界面图
此窗体的主要设计代码如下：
SET EXCLUSIVE ON
PUBLIC tempquery
thisform.combo1.additem("人事部")
thisform.combo1.additem("财务部")
thisform.combo1.additem("市场营销部")
thisform.combo1.refresh
以上为窗体的 Init事件代码。
LOCAL temp
SELECT *from "C:\Documents and Settings\Administrator\桌面\王娟工商管理系统\data\employee.dbf" into cursor temp
thisform.grid1 .recordsourcetype=1
thisform.grid1 .recordsource=temp
thisform.grid1 .refresh
窗体中“全部“按钮的代码。
窗体中“按部门“按钮的代码：
LOCAL temp
tempstr=thisform.combo1.Value
SELECT * from "C:\Documents and Settings\Administrator\桌面\王娟工商管理系统\data\employee.dbf" WHERE employee.department=tempstr into cursor temp
thisform.grid1 .recordsourcetype=1
thisform.grid1.RecordSource =temp
thisform.grid1.refresh
窗体中“显示经理“按钮的代码：
LOCAL temp
tempstr="经理"
SELECT * from "C:\Documents and Settings\Administrator\桌面\王娟工商管理系统\data\employee.dbf" where employee.position=tempstr into cursor temp
thisform.grid1.RecordSourcetype= 1
thisform.grid1.RecordSource=temp
thisform.grid1.refresh
4.3 财务信息管理界面编码设计
财务信息管理主要管理公司每年每月的收入，支出，利润等一些会计数据，该模块主要实现财务数据的添加，修改，删除，保存等一些必要简捷的操作过程。
窗体运行的界面如图4-4所示：
上一页 [1] [2] [3] [4] [5] 下一页
vf公司管理系统论文 第4页下载如图片无法显示或论文不完整，请联系qq752018766
