网站大量收购独家精品文档,联系QQ:2885784924

管理信息系统课程方案设计书人事档案管理.docVIP

管理信息系统课程方案设计书人事档案管理.doc

  1. 1、本文档共19页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
? ? ? 沈阳理工大学 ----------机械工程学院课程设计 ? ? ? ? ? 题 目: 人事档案管理系统 班 级 专 业: 工业工程 学生姓名: 钱建飞 指导教师: 舒启林 ? ? ? ? ? 可行性分析 一.课程设计的目的和意义,可以涉及到大多数数据库的重要数据库对象、重要功能和特性,比如:视图和存储过程等。由此,通过这个课程设计可以加深对这些S数据库知识的学习、理解,积累在实际工程应用中运用各种数据库对象的经验,掌握使用应用软件开发工具开发数据库管理系统的基本方法。 2.业务流程图 3.数据流程图: 4.1实现菜单选项 菜单是程序最重要的特性之一,大多数程序都依赖一个定义良好的菜单使程序易于使用和维护,Visual Basic也提供了强大的创建菜单功能是程序更加标准。 您可以使用Visual Basic的Application Wizard也可以使用Visual Basic 的菜单编辑器建立菜单或者修改已经存在的菜单。 4.2实现工具栏 Toolbar 是工具条控件,是实现工具条的主体。其中的按钮可以显示图像和标题,并按功能分组或加入分隔符,还可以围棋设置鼠标停留在其上显示的提示字符。Toolbar也是一个控件容器且具有Style属性,并可以为其增加下拉按钮和平滑按钮等。 选择“工程”下拉菜单中的“部件”选项,显示“部件”对话框。在“控件”选项卡列表中选择“Microsoft Windows Common Controls 6.0”后工具相中增加改控件。其属性及对象如下: 1. Align属性定义工具条在窗体中的位置 2. ToolTipText属性是字符串类型,定义控件的提示字符 3. Style属性定义按钮外观。 4. ImageList属性定义与数据条对应的ImageList控件名,该控件定义工具条按钮显示的图像。 5. HotImangeList属性设置一个ImageList控件名,该控件定义按钮获得热点时显示的图像。 6. DisabledImageList属性定义工具条按钮无效时显示的图像。 创建工具条包括ImageList和Toolbar控件 ImageList用于为其他控件提供图像库,将ImageList控件加入到工具箱的操作于前述Toolbar控件相同。 系统设计 一、登录界面 当输入的账号和密码符合Access数据库中的用户表中的数据时 时,焦点落在确定上面,此时点击确定就可以登入系统。若错误,则会弹出对话框提醒“用户名密码错误,请重新输入!”并且它的输入密码为“*”,是在属性栏中的passwordchar设置“*”。 用户名及密码不能为空,如不填写两者或两者之一,则会弹出对话框提醒请输入用户名与密码! 如果用户输入的密码不是密码管理表中的用户名及密码,则会弹出对话框提醒无该用户! 设置了访问权限,根据不同人的管理职能提供相应的管理权限 它的具体代码为: Private Sub Command1_Click() Adodc1.RecordSource = select * from 用户登陆 where 用户名= Trim(Text1.Text) Adodc1.Refresh If Trim(Text1.Text) = Then MsgBox 用户名不能为空!, vbOKOnly + vbExclamation, 警告! Text1.SetFocus Exit Sub End If If Adodc1.Recordset.EOF Then MsgBox 用户名不存在,请重新输入!, vbOKOnly + vbExclamation, 警告! Text1.Text = Text1.SetFocus Exit Sub Else If Text2.Text Adodc1.Recordset.Fields(密码) Then MsgBox 密码错误!, vbOKOnly + vbExclamation, 警告! Text2.Text = Text2.SetFocus Exit Sub End If End If If Combo1.Text Adodc1.Recordset.Fields(身份) Then MsgBox 权限错误!, vbOKOnly + vbExclamation, 警告!Else If

文档评论(0)

phl805 + 关注
实名认证
文档贡献者

建筑从业资格证持证人

该用户很懒,什么也没介绍

领域认证该用户于2023年05月12日上传了建筑从业资格证

1亿VIP精品文档

相关文档