欢迎来到天天文库
浏览记录
ID:18209692
大小:140.57 KB
页数:15页
时间:2018-09-15
《《沈阳市现代科技学校教职工信息管理系统》源程序清单》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、《沈阳市现代科技学校教职工信息管理系统》源程序清单*主程序**********************************************settalkoffsetescaoffsetexclonsetcentonsethourto24setsysmenutoSETSAFEOFFSETSYSMENUOFFSETEXCLONSETSTATUSBAROFFSETCLOCKSTATUSSETDELEONpublicqxqx=0_screen.visible=.f._screen.maxbutton=.f._screen.minbutton=.f._screen.windowst
2、ate=1_screen.closable=.f._screen.caption='沈阳市现代科技学校教职工信息管理系统'doformfmreadevents*fm.scxclick事件**********************************************thisform.releasedoform密码*密码.scx确定按钮click事件**********************************************seleczyxxi=i+1ifi<=3ifalltrim(密码)<>thisform.mm.valuemessagebox('用户名称
3、或密码无效,请重试!',16,'警告窗口')retuelseif权限='特权用户'qx=1elseqx=0endithisform.release_screen.visible=.t._screen.windowstate=2_SCREEN.PICTURE='D:GZGLPICclouds.jpg'doformcshdozhu.mprendielsemessagebox("输入密码超过三次","确认")quitendi*操作员维护菜单**********************************************ifqx=1doformczyendi*字典库维护菜单
4、**********************************************ifqx=1doformweihuendi*增加人员菜单**********************************************ifqx=1doformzjryendi第15页共15页《沈阳市现代科技学校教职工信息管理系统》源程序清单*减少人员菜单**********************************************ifqx=1doformgzdelendi*工资变动菜单*****************************************
5、*****ifqx=1doformgzbdendi*工资修改菜单**********************************************ifqx=1doformgzxgendi*打印名册**********************************************doformmc*工资变动单**********************************************doformdy2*工资汇总台帐**********************************************doformhztz*weihu.scx(字典库
6、维护)增加按钮**********************************************sele&bdgobottappeblankthisform.refresh*weihu.scx(字典库维护)删除按钮thisform.refreshsele&bddelethisform.refresh*weihu.scx(字典库维护)恢复按钮**********************************************sele&bd=TABLEREVERT(.T.)*weihu.scx(字典库维护)保存按钮****************************
7、******************sele&bd=TABLEUPDATE(.T.)*weihu.scx(字典库维护)修改按钮**********************************************thisform.&bd2..readonly=.f.thisform.refresh*zjry.scx(增加人员)增加按钮事件**********************************************selegzbxSET
此文档下载收益归作者所有