《企业人事档案管理系统设计说明书.doc》由会员分享,可在线阅读,更多相关《企业人事档案管理系统设计说明书.doc(10页珍藏版)》请在金锄头文库上搜索。
1、具体操作步骤(一)表建立如下各表基本数据表如下(二)表单的建立启动表单进入界面登录界面主界面维护界面查询界面1查询界面2浏览界面1浏览界面2(三)命令代码1、 启动的登录按钮:do form 登录.scxrelease thisform2、 启动的退出按钮:quit3、进入的登录按钮:logcount=logcount+1locate for alltrim(用户.用户名)=alltrim(bo1.value)if found() and alltrim(用户.密码)=alltrim(thisform.text1.value)do form 主界面.scxrelease thisformels
2、eif logcount3 then=messagebox(操作员或密码错误请重新输入!,48,严重警告)thisform.text1.setfocuselse=messagebox(对不起,您是非法用户,系统将会退出!,48,严重警告)quitendifendif4、进入的退出按钮:release thisform5、第一个:go topthisform.refreshthis.enabled=.Fmand3.enabled=mand4.enabled=mand5.enabled=.t.6、上一个:skip -mand4.enabled=mand5.enabled=.t.if bof() t
3、hengo topthis.enabled=mand2.enabled=.f.endifthisform.refresh7、下一个:skip +mand4.enabled=mand5.enabled=.t.if bof() thengo topthis.enabled=mand2.enabled=.f.endifthisform.refresh8、末一个:go bottomthis.enabled=.Fmand4.enabled=mand2.enabled=mand3.enabled=.t.thisform.refresh9、查询按钮:bo1.setfocuslocate all for bo
4、1.value=员工工作档案表.员工号thisform.text1.value=员工工作档案表.现工作单位thisform.text2.value=员工工作档案表.现担任职务thisform.text3.value=员工工作档案表.所属部门thisform.text4.value=员工工作档案表.工资级别thisform.text5.value=员工工作档案表.基本工资bo1.refresh10、关闭按钮:release thisform(四)程序设计:SET TALK OFFSET SAFE OFFSET DATE ANSISET EXCLU OFFCLEA ALLCLOS ALLset sysmenu offdo form 启动.scxread events(五)菜单设计:(六)项目设计:将程序设置为主程序,进行连编。