ACCESS仓库管理系统实验报告.docVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
ACCESS仓库管理系统实验报告

1.开发概述 1 2需求分析 1 2.1 系统目标 1 2.2 功能需求 1 3数据库设计 2 3.1 概念设计 2 3.2 存储过程 2 4系统设计 3 4.1 总体设计 3 4.2 系统流程图 3 5系统实现 4 5.1建立表 4 5.1.1 4 5.1.2建立表之间联系 8 5.2窗体设计 8 5.2.1登录窗体的设计 8 5.2.2“数据库系统”窗体设计 10 5.2.3窗体的设计 12 5.3创建查询 14 5.4报表设计 16 6系统生成 18 7系统测试 19 8课程设计总结 19 1.开发概述 在现代企业中,仓库管理是一项繁琐复杂的工作,每天要处理大量的单据数据。为及时结清每笔业务,盘点库存和货物流动情况,保证企业生产用料以及货物安全,库管人员要花费大量人力物力和时间作数据记录统计工作。本系统正是根据仓库管理的专业特点而开发的,用现代电子技术提高库管工作的质量和效率。适用于小型企业库管以及储运业务,界面直观,操作简便,运用鼠标,在窗口的不同部位供使用者录入和查询统计。 在计算机飞速发展的今天采用计算机管理信息系统给企业管理来了明显的经济效益和社会效益减少入库管理出库管理及库存管理中的漏洞可以节约不少管理开支 提高仓库的管理业务处理效率增加企业收入建立仓库管理系统已变得十分心要 基于课程学习,线设计开发一系统,应对简单的商品在途、入库、在库、出库管理。 开发平台:本系统以Microsoft公司的Office软件系列中Microsoft Access 2003为开发平台,适用于Microsoft Access 2003及其以上版本装载的计算机。 2需求分析 1.2.1功能划分 用户通过输入正确的用户名和密码后进入主界面。主界面为登陆用户提供了2项选择:存物品,取物品。 1.2.2功能描述 存物人信息管理: 显示存物人的基本信息,用户可以添加,查询,删除存物人信息,以达到维护存物人信息的功能。 物品信息管理: 显示物品的基本信息,用户可以添加,查询,删除物品信息。 存取信息管理: 给出物品存取的情况信息,可以以此把物品取出,存物人也可以通过姓名查询物品实现存取功能。 3数据库设计 3.2 存储过程 使用存储过程可以优化系统,并提高效率此,构建完数据库的表结构后,就可以创建表信息选、添加、更新以及删除的相关存储过程。系统设计.1 总体设计 仓库系统分为入库管理、库存盘点、出库管理和基础数据。其主结构图如下图-1所示。 图-1系统图4.2 系统流程图 系统的流程图-2如图所示 图系统图 lag=0 ‘从“用户”表里读下去账号和密码 openrecord “select*from 用户”,record ‘循环判断用户名是否存在,密码是否正确 Do Until record.EOF strusername=record(“用户名”) strpassword=record(“密码”) If UCase(Me.txtusername.Value)UCase(strusername)Then Record.MoveNext ‘若相等,说明用户名存在,可以跳出循环 Else flag=1 Exit Do End if Loop ‘flag=0 说明用户名不存在,进行处理 ‘设置文本框的内容为空,“登录系统”不可用,焦点设在txtusername If flag=0 Then MsgBox”没有这个用户名,请重新输入” Me.txtpassword.Value=”” Me.txtusername.Value=”” Me.txtusername.SetFocus cmdenter.Enabled=False Exit Sub ‘若flag=1 说明所输入的用户名存在,进一步比较密码是否正确 ‘若密码出错,设置txtusername的内容不变,txtpassword的内容为空 ‘若密码错误,“确定”键不可用,并把焦点设在txtpassword Else If UCase(Me.txtpassword.Value)UCase(strpassword)Then MsgBox(“密码错误。请重新输入”) Me.txtpassword.Value=”” Me.txtpassword.SetFocus Cmdenter.Enabled=False Exit Sub End If End If ‘用户名和密码都正确,打开“数据库系统”窗体 DoCmd.Close DoCmd.OpenForm” 数据库系统” End Sub 5.2.2“数据库系统”窗体设计 “数据库系统”窗体又叫“切换面板”,

文档评论(0)

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

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

1亿VIP精品文档

相关文档