资源描述:
《vf教职工信息管理系统-源程序(1)》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、*主程序**********************************************settalkoffsetescaoffsetexclonsetcentonsethourto24setsysmenutoSETSAFEOFFSETSYSMENUOFFSETEXCLONSETSTATUSBAROFFSETCLOCKSTATUSSETDELEONpublicqxqx=0_screen.visible=.f._screen.maxbutton=.f._screen.minbutton=.f._scre
2、en.windowstate=1_screen.closable=.f._screen.caption='沈阳市现代科技学校教职工信息管理系统'doformfmreadevents*fm.scxclick事件**********************************************thisform.releasedoform密码*密码.scx确定按钮click事件**********************************************seleczyxxi=i+1ifi<=3i
3、falltrim(密码)<>thisform.mm.valuemessagebox('用户名称或密码无效,请重试!',16,'警告窗口')retuelseif权限='特权用户'qx=1elseqx=0endithisform.release_screen.visible=.t._screen.windowstate=2_SCREEN.PICTURE='D:GZGLPICclouds.jpg'doformcshdozhu.mprendielsemessagebox("输入密码超过三次","确认")quiten
4、di*操作员维护菜单**********************************************ifqx=1doformczyendi*字典库维护菜单**********************************************ifqx=1doformweihuendi*增加人员菜单**********************************************ifqx=1doformzjryenditheirownconditionstodevelopthecorrec
5、troad,themaximumtoavoidinvestmentrisk,gainprofit.(three)vigorouslypromotethebrand.Toestablishbrandawareness,awarenessoftheuseofbrand,brandvalue,brandacquisitionperformance,enhancethecompetitivestrength.Concentratedmanpower,carefulplanning,packagingandpublicit
6、yofanumberofunique,marketinfluenceandcoverageofthebrand,theimplementationofkeybreakthroughs,toenhancethecompetitivestrength,walkingbusinessroadthecompetitionofalienationandcharacteristics,thepursuitofstabilityanddevelopmentofthemarket.(four)topromotetheintegr
7、ationofresources.Tofurtherbroadentheirhorizons,effectiveintegrationofresourceswithinthegroup,thecityresources,otherindustriesandregionalresources,mutualtrust,mutualbenefit,seekingwin-winprinciple,intheframeworkofnationalpoliciesandregulations,strictinspection
8、andargumentation,legalconsultation,examinationandapprovalprocedures,strictregulationofeconomicactivities,attractinjectionthesocialinvestmenttotheindustrygroup,toachieveleveragingthedevelo