logo资料库

仓库管理毕业论文.doc

发布时间：2022-06-24 发布人：admin 分类：说明书 资料大小：1.87M 资料格式：doc 举报 版权申诉
第1页 / 共44页
第2页 / 共44页
第3页 / 共44页
第4页 / 共44页
第5页 / 共44页
第6页 / 共44页
第7页 / 共44页
第8页 / 共44页
资料共44页，剩余部分请下载后查看
    Summary
    This system chiefly accomplishes the stock managem
    The Access 2000 that the system adopted among Micr
    The keyword: the data base, SQL's language, vb6.0,
    Warehouse management.
    第三章 Visual Basic下的控件所实现的功能
    1． Align属性定义工具条在窗体中的位置
    第四章 系统总体规划
    仓库管理系统
    系统功能结构图
    ___ 主界面具体实现见下图
    5.2基础资料设置的实现
    图3
    Option Explicit
    Public LoginSucceeded As Boolean
    '检查正确的密码
    If txtPassword = Me.DCboUserName.BoundText
    Else
    Else
    Option Explicit
    Private rsSys As ADODB.Recordset
    Private cmSys As ADODB.Command
    Public Function connstring() As String
    "Security Info=False;Data Source=" & App.Path
    End Function
    Private Sub MDIForm_Load()
    Dim strSQL As String
    'Dim rsSys As ADODB.Recordset
    Dim Conjxc As ADODB.Connection
    Set Conjxc = New ADODB.Connection
    Conjxc.ConnectionString = connstring
    Dim rsSys As ADODB.Recordset
    Conjxc.Open 'adOpenDynamic, adLockOptimistic
    Set rsSys = New ADODB.Recordset
    'rsSys.MoveFirst
    If rsSys!offline Then
    Me.mnuAct_dj.Enabled = False
    Me.mnuSql.Enabled = False
    Me.mnuReport.Enabled = False
    Me.mnuSys_trans.Enabled = False
    Me.mnuSys_start.Enabled = True
    Me.mnuSys_begqty.Enabled = True
    Else
    Me.mnuAct_dj.Enabled = True
    Me.mnuSql.Enabled = True
    Me.mnuReport.Enabled = True
    Me.mnuSys_trans.Enabled = True
    Me.mnuSys_start.Enabled = False
    Me.mnuSys_begqty.Enabled = False
    End If
    'Set cmSys = New ADODB.Command
    End Sub
    'Private Sub MDIForm_Load()
    'End Sub
    Private Sub MDIForm_QueryUnload(Cancel As Integer,
    Call mnuExit_Click
    If intNumWindows > 0 Then
    Cancel = True
    End If
    Set rsSys = Nothing
    Set cmSys = Nothing
    End Sub
    Private Sub mnuEdit_other_Click()
    FrmOtherEdit.Show
    End Sub
    Private Sub mnuEdit_ps_Click()
    FrmPsEdit.Show
    End Sub
    Private Sub mnuEdit_sales_Click()
    FrmSaleEdit.Show
    End Sub
    Private Sub mnuExit_Click()
    If intNumWindows = 0 Then
    Unload Me
    Else
    MsgBox "请关闭所有子程序后再关闭该主程序！", vbCritical, "提
    End If
    End Sub
    Private Sub mnuRec_other_Click()
    FrmOtherChk.Show
    End Sub
    Private Sub mnuRec_ps_Click()
    FrmPsChk.Show
    End Sub
    Private Sub mnuRec_sales_Click()
    FrmSaleChk.Show
    End Sub
    Private Sub mnuReport_DetailUse_Click()
    FrmRptDetUse.Show
    End Sub
    Private Sub mnuReport_Mat_Click()
    FrmRptMat.Show
    End Sub
    Private Sub mnuReport_TotalUse_Click()
    FrmRptTotUse.Show
    End Sub
    Private Sub mnuReport_TotalYearUse_Click()
    FrmRptYearUse.Show
    End Sub
    Private Sub mnuSet_department_Click()
    FrmSetDep.Show
    End Sub
    Private Sub mnuSet_employee_Click()
    FrmSetEmp.Show
    End Sub
    Private Sub mnuSet_product_Click()
    FrmSetPro.Show
    End Sub
    Private Sub mnuSet_protype_Click()
    FrmSetPrTy.Show
    End Sub
    Private Sub mnuSet_supplier_Click()
    FrmSetSup.Show
    End Sub
    Private Sub mnuSql_djother_Click()
    FrmOtherSql.Show
    End Sub
    Private Sub mnuSql_djps_Click()
    FrmPsSql.Show
    End Sub
    Private Sub mnuSql_djsales_Click()
    FrmSaleSql.Show
    End Sub
    Private Sub mnuSys_begqty_Click()
    FrmSetMattmp.Show
    End Sub
    Private Sub mnuSys_delete_Click()
    Dim intDel As Integer
    Dim strSQL As String
    If intDel = vbYes Then
    MsgBox "资料删除完毕!", vbInformation, "资料删除"
    End If
    Me.mnuAct_dj.Enabled = False
    Me.mnuSql.Enabled = False
    Me.mnuReport.Enabled = False
    Me.mnuSys_trans.Enabled = False
    Me.mnuSys_start.Enabled = True
    Me.mnuSys_begqty.Enabled = True
    End Sub
    Private Sub mnuSys_start_Click()
    Dim strBeg As String
    Dim strYear, strMonth As String
    Dim strSQL As String
    If IsDate(strBeg) Then
    Me.mnuAct_dj.Enabled = True
    Me.mnuSql.Enabled = True
    Me.mnuReport.Enabled = True
    Me.mnuSys_trans.Enabled = True
    Me.mnuSys_start.Enabled = False
    MsgBox "系统已正式启用!", vbInformation, "系统启用"
    Else
    MsgBox "日期格式错误！", vbCritical, "启用错误"
    Exit Sub
    End If
    End Sub
    Private Sub mnuSys_trans_Click()
    Dim strBeg As String
    Dim strYear, strMonth As String
    Dim strSQL As String
    If IsDate(strBeg) Then
    Set rsSys = New ADODB.Recordset
    " price" & strYear & strMonth & "=pric
    MsgBox "月份结转完毕!", vbInformation, "月终结转
    Else
    MsgBox "该月份已经月终结转!", vbCritical, "月终结转
    End If
    Else
    MsgBox "日期格式错误！", vbCritical, "启用错误"
    Exit Sub
    End If
    End Sub
    Private Sub mnuSys_user_Click()
    FrmSetUser.Show
    End Sub
    BOOK THIRD.--IN THE YEAR 1817
    　　MM.
    BOOK SIXTH.--LE PETIT-PICPUS
    BOOK FIRST.-WATERLOO
    BOOK EIGHTH.--THE WICKED POOR MAN
    　　MARINGO
    　　 AUSTERLITS
    　　GOD; THE KING; HONOR AND THE LADIES; BY DUCRAY D
    仓 库 管 理 系 统 摘 要 本系统主要完成对仓库的库存管理，包括入库、出库、库存，员工信 息，供应商信息以及密码管理等六个方面。系统可以完成对各类信息的浏 览、查询、添加、删除、修改等功能。 系统的核心是入库、库存和出库三者之间的联系，每一个表的修改都将联 动的影响其它的表，当完成入库或出库操作时系统会自动地完成库存的修 改。查询功能也是系统的核心之一，在系统中即有单条件查询和多条件查 询，也有精确查询和模糊查询，系统不仅有静态的条件查询，也有动态生 成的条件查询，其目的都是为了方便用户使用。系统有完整的用户添加、 删除和密码修改功能，并具备报表打印功能。 系统采用 Microsoft Office 中的 Access 2000 来设计数据库，并使用当前 优秀的开发工具—VB 6.0 ，它有着最为灵活的数据库结构，对数据库应用 有着良好的支持。 论文主要介绍了本课题的开发背景，所要完成的功能和开发的过程。重点 的说明了系统设计的重点、设计思想、难点技术和解决方案。 关键字：数据库，SQL 语言，vb6.0，数据库组件，仓库管理 [英文摘要] Summary
    This system chiefly accomplishes the stock management to the storeho use, includes being put in storage, goes out the warehouse and stocks, an d staff’s information, six aspects such as supplier's information a s well as cryptogram management etc. What the system can accomplish to various kind the information glances over and the function such a s inquires about, adds, deletes andmodification etc. The systematic nucleus is is put in storage, stocks and goes ou t the contact between the warehouse, and when accomplishes being put in storage or going out a warehouse, the system can accomplish volu ntarily the modification of stock to other table of influence that t he modification of every table all will be linkageed when operating. Inquiring about the function also is one of systematic nucleus, nam ely having the wallscroll spare to inquire about and inquires about with many conditions in the system, also having accurately the query to inquire about with bluring, not only there is the condition quer y of static state in the system, also having the condition query of trends formations, his purpose all is using for convenient user. The system has completeuser to add, deletes and the cipher modification function, and has the reportform and prints the function. The Access 2000 that the system adopted among Microsoft Office co mes the design data warehouse, and use before one zorch development tool - VB6.0, it has the most nimble data base structure, and the applic ation has the
    good support to the data warehouses. The development background of this the subject, course of function and the development that will be accomplished were chiefly introduc ed to thesis. The emphatic explanation focal point of systems design, design tho ught and difficult point technology and settlement scheme. The keyword: the data base, SQL's language, vb6.0,'s data base packa ge, the Warehouse management. 目 录 第一章：引言 1．1课题来源 1．2．开发工具的选择 1．3所做的主要工作 1．第二章 数据库的概论 2．1数据库的发展 2.1.1 数据库的发展 2.1.2 数据库阶段的特点 2.1.3 数据库技术
    2.2 数据库理论基础 2.2.1 数据库模型 2.2.2 数据库体系结构 2.2.3 数据的独立性 2.2.4 范式 SQL语言基础 2.3.1 2.3.2 2.3.3 SQL简介 SQL查询 SQL数据更新 2.3 第三章 Visual basic下的控件所实现的功能 3．1 实现菜单选项 3．2 实现工具栏 3．3 帮助 3. 4 关于版本 第四章 系统总体规划 4．1 系统功能 4．2 系统功能结构图 4. 3 具体操作步骤一览表 第五章 系统具体实现 5．1 用户界面的实现 5．2 数据库的实现 5．2．1 库存数据库 5．2．2 用户管理库 5．3 与 VB 的连接 第六章 结束语 第七章 参考文献 第八章 程序源代码、各功能模块的界面图 第一章 引 言 §1.1 课题来源 随着社会经济的迅速发展和科学技术的全面进步，计算机事业的飞速发展， 以计算机与通信技术为基础的信息系统正处于蓬勃发展的时期。随着经济文化水 平的显著提高，人们对生活质量及工作环境的要求也越来越高。与此同时，为了 管理大量的物品，仓库也大量的出现，仓库的管理问题也就提上了日程。随着的 大量增加，其管理难度也越来越大，如何优化仓库的日常管理也就成为了一个大
    众化的课题。 在计算机飞速发展的今天，将计算机这一信息处理利器应用于仓库的日常管 理已是势必所然，而且这也将为仓库管理带来前所未有的改变，它可以带来意想 不到的效益，同时也会为企业的飞速发展提供无限潜力。采用计算机管理信息系 统已成为仓库管理科学化和现代化的重要标志，它给企业管理来了明显的经济效 益和社会效益。主要体现在： 极大提高了仓库工作人员的工作效率，大大减少了以往入出存流程繁琐，杂乱， 周期长的弊端。 基于仓库管理的全面自动化，可以减少入库管理、出库管理及库存管理中 的漏洞，可以节约不少管理开支，增加企业收入。 仓库的管理的操作自动化和信息的电子化，全面提高了仓库的管理水平。 随着我国改革开放的不断深入，经济飞速的发展，企业要想生存、发展，要想在 激烈的市场竞争中立于不败之地，没有现代化的管理是万万不行的，仓库管理的 全面自动化、信息化则是其中极其重要的部分。为了加快仓库管理自动化的步伐， 提高仓库的管理业务处理效率，建立仓库管理系统已变得十分心要。 入库、库存、出库还是现在企业仓库管理的常规基本模式，虽然，最近又出 现了很多新的管理模式，如：基于零库存思想的沃尔玛特管理方式，但这些新的 思想在中国大部分企业的管理中还是难以实现的。所以如何设计好仓库管理系 统，尽可能地减少仓库管理的重复性和低效性就成为当前最为重要的问题。仓库 管理的核心是入库、库存和出库之间的联系，如何处理好三者之间的关系是系统 最为关键的部分。另外，员工信息和供应商信息管理也是仓库管理中一个必不可 少的部分，它提供着与入库和出库相关的地一些信息，使得整个系统更加完整， 更加实用。 通过对仓库管理日常工作的详细调查，搜集了大量的资料，从系统结构的组 织，功能的实现，技术的要求以及可行性等多方面进行考虑，认为本课题是一个 适应现今仓库管理需求的计算机信息管理系统，具有一定的实际开发价值和使用 价值。 §1.2 开发工具的选择 现在，市场上可以选购的应用开发产品很多，流行的也有数十种。目前在我国市 场上最为流行、使用最多、最为先进的可用作企业级开发工具的产品有： Visual Basic、Visual C、DELPHI、PowerBulider，vfp 等 在目前市场上这些众多的程序开发工具中，有些强调程语言的弹性与执行效 率；有些则偏重于可视化程序开发工具所带来的便利性与效率的得高，各有各的 优点和特色，也满足了不同用户的需求。然而，语言的弹性和工具的便利性是密 不可分的，只有便利的工具，却没有弹性的语言作支持，许多特殊化的处理动作 必需要耗费数倍的工夫来处理，使得原来所标榜的效率提高的优点失去了作用； 相反，如果只强调程语言的弹性，却没有便利的工具作配合，会使一些即使非常 简单的界面处理动作，也会严重地浪费程序设计师的宝贵时间。 作为数据库系统的开发，Visual Basic 是一个非常理想选择。数据库是 MIS 中的重要支持技术，在 MIS 开发过程中，如何选择数据库管理是一个重要的问题，
    目前，数据库产品较多，每种产品都具有各自的特点和适用范围，因此，在选择 数据库时，应考虑数据库应用的特点及适用范围，本系统选用的数据库语言 Visual Basic 语言，该开发工具具有很多长处： Visual Basic 是一种可视化的、面对对象和条用事件驱动方式的结构化高 级程序设计，可用于开发 Windows 环境下的种类应用程序。它简单易学、效率高， 且功能强大，可以与 Windows 的专业开发工具 SDK 相媲美，而且程序开发人员不 必具有 C/C++编程基础。在 Visual Basic 环境下，利用事件驱动的编程机制、 新颖易用的可视化设计工具，使用 Windows 内部的应用程序接口(API)函数，以 及动态链接库(DLL)、动态数据交换(DDE)、对象的链接与嵌入(OLE)、开放式数 据访问(ODBC)等技术，可以高效、快速地开发出 Windows 环境下功能强大、图形 界面丰富的应用软件系统。 总的来说，Visual Basic 具有以下特点： 可视化编程： 用传统程序设计语言设计程序时，都是通过编写程序代码来设计用户界面， 在设计过程中看不到界面的实际显示效果，必须编译后运行程序才能观察。如果 对界面的效果不满意，还要回到程序中修改。有时候，这种编程-编译-修改的操 作可能要反复多次，大大影响了软件开发效率。Visual Basic 提供了可视化设 计工具，把 Windows 界面设计的复杂性“封装”起来，开发人员不必为界面设计 而编写大量程序代码。只需要按设计要求的屏幕布局，用系统提供的工具，在屏 幕上画出各种“部件”，即图形对象，并设置这些图形对象的属性。Visual Basic 自动产生界面设计代码，程序设计人员只需要编写实现程序功能的那部分代码， 从而可以大大提高程序设计的效率。 面向对象的程序设计 4.0 版以后的 Visual Basic 支持面向对象的程序设计，但它与一般的面向对 象的程序设计语言(C++)不完全相同。在一般的面向对象程序设计语言中，对象 由程序代码和数据组成，是抽象的概念；而 Visual Basic 则是应用面向对象的 程序设计方法(OOP)，把程序和数据封装起来作为一个对象，并为每个对象赋予 应有的属性，使对象成为实在的东西。在设计对象时，不必编写建立和描述每个 对象的程序代码，而是用工具画在界面上，Visual Basic 自动生成对象的程序 代码并封装起来。每个对象以图形方式显示在界面上，都是可视的。 结构化程序设计语言 Visual Basic 是在 BASIC 语言的基础上发展起来的，具有高级程序设计语言 的语句结构，接近于自然语言和人类的逻辑思维方式。Visual Basic 语句简单 易懂，其编辑器支持彩色代码，可自动进行语法错误检查，同时具有功能强大且 使用灵活的调试器和编译器。 Visual Basic 是解释型语言，在输入代码的同时，解释系统将高级语言分解 翻译成计算机可以识别的机器指令，并判断每个语句的语法错误。在设计 Visual Basic 程序的过程中，随时可以运行程序，而在整个程序设计好之后，可以编译 生成可执行文件(.EXE)，脱离 Visual Basic 环境，直接在 Windows 环境下运行。 事件驱动编程机制 Visual Basic 通过事件来执行对象的操作。一个对象可能会产生多个事件， 每个事件都可以通过一段程序来响应。例如，命令按钮是一个对象，当用户单击 该按钮时，将产生一个“单击“(CLICK)事件，而在产生该事件时将执行一段程 序，用来实现指定的操作。
    在用 Visual Basic 设计大型应用软件时，不必建立具有明显开始和结束的 程序，而是编写若干个微小的子程序，即过程。这些过程分别面向不同的对象， 由用户操作引发某个事件来驱动完成某种特定的功能，或者由事件驱动程序调用 通用过程来执行指定的操作，这样可以方便编程人员，提高效率。 访问数据库 Visual Basic 具有强大的数据库管理功能，利用数据控件和数据库管理窗 口，可以直接建立或处理 Microsoft Access 格式的数据库，并提供了强大的数 据存储和检索功能。同时，Visual Basic 还能直接编辑和访问其他外部数据库， 如 dBASE，FoxPro，Paradox 等，这些数据库格式都可以用 Visual Basic 编辑和 处理。 Visual Basic 提供开放式数据连接，即 ODBC 功能，可通过直接访问或建立 连接的方式使用并操作后台大型网络数据库，如 SQL Server，Oracle 等。在应 用程序中，可以使用结构化查询语言 SQL 数据标准，直接访问服务器上的数据库， 并提供了简单的面向对象的库操作指令和多用户数据库访问的加锁机制和网络 数据库的 SQL 的编程技术，为单机上运行的数据库提供了 SQL 网络接口，以便在 分布式环境中快速而有效地实现客户/服务器(client/server)方案。 动态数据交换(DDE) 利用动态数据交换(Dynamic Data Exchange)技术，可以把一种应用程序中 的数据动态地链接到另一种应用程序中，使两种完全不同的应用程序建立起一条 动态数据链路。当原始数据变化时，可以自动更新链接的数据。Visual Basic 提供了动态数据交换的编程技术，可以在应用程序中与其他 Windows 应用程序建 立动态数据交换，在不同的应用程序之间进行通信。 对象的链接与嵌入(OLE) 对象的链接与嵌入(OLE)将每个应用程序都看作是一个对象(object)，将不 同的对象链接(link)起来，再嵌入(embed)某个应用程序中，从而可以得到具有 声音、影像、图像、动画、文字等各种信息的集合式的文件。OLE 技术是 Microsoft 公司对象技术的战略，它把多个应用程序合为一体，将每个应用程序看作是一个 对象进行链接和嵌入，是一种应用程序一体化的技术。利用 OLE 技术，可以方便 地建立复合式文档(compound document)，这种文档由来自多个不同应用程序的 对象组成，文档中的每个对象都与原来的应用程序相联系，并可执行与原来应用 程序完全相同的操作。 动态链接库(DLL) Visual Basic是一种高级程序设计语言，不具备低级语言的功能，对访问机器硬 件的操作不太容易实现。但它可以通过动态链接库技术将C/C++或汇编语言编写 的程序加入到Visual Basic应用程序中，可以像调用内部函数一样调用其他语言 编写的函数。此外，通过动态链接库，还可以调用Windows应用程序接口(API) 函数，实现SDK所具有的功能。 1.3 本文所做工作 引言部分介绍了本系统的课题来源以及对数据库开发工具的选择。 第二章介绍了数据库的发展，关系数据库，数据库体系结构，并系统介绍了 SQL 语言，为设计和理解应用程序做了铺垫。 第三章系统介绍了 Visual Basic6.0 及其部分控件，SQL 语言在 Visual Basic6.0 中的应用，以及 Access 等。 第四章是本文的主体，按照软件工程的要求，从需求分析开始，经过概要设计最
    数据库概论 数据库的发展 后到详细设计，完成对整个系统的设计。 第五章根据第四章的设计结果利用 Access 2000 和 Visual Basic6.0 进行了具体 的窗体和应用程序设计。 总结部分介绍了设计体会和编程体会，并指出了系统设计中的不足和改进的方向 第二章 §2.1 数据库处理在信息系统的研究中一直是非常重要的主题，然而，近年来，随着 World Wide Web(WWW)的猛增及 Internet 技术的迅速发展，使得数据库技术之时 成为最热门技术之一。数据库技术能使 Internet 应用超越具有早期应用特点的 简单的发布。同时，Internet 技术提供了一种向用户发布数据库内容的标准化 的访问方法。这些技术没有脱离经典数据库技术的要求。它们只是加重了数据库 技术的重要性。 数据库的设计和开发及包括艺术有包括工程。理解用户的需求，然后，把它们转 变为有效的数据库设计是一个艺术过程。把设计转变为实际的数据库，并且这些 数据库带有功能完备、高效能的应用，是一个工程过程。 数据库的目的是帮助人们跟踪事务。经典的数据库应用涉及诸如订单、顾客、工 作、员工、学生、电话之类的项，或其它数据量较大、需要密切关注的事务。最 近，由于数据库的普及，数据库技术已经被应用到了新的领域，诸如用于 Internet 的数据库或用于公司内联网的数据库。数据库也被越来越多地应用于 生成和维护多媒体应用程序上。 计算机的数据处理应用，首先要把大量的信息以数据形式存放在存储器中。存储 器的容量、存储速率直接影响到数据管理技术的发展。从 1956 年生产出第一台 计算机到现在，存储器的发展，为数据库技术提供了良好的物质基础。 使用计算机以后，数据处理的速度和规模，无论是相对于手工方式，还是机械方 式，都有无可比拟的优势。通常在数据处理中，计算是比较简单的而数据的管理 却比较复杂。数据管理是指数据的收集、整理、组织、存储、维护、检索、传送 等操作，这部分操作是数据处理业务的基本环节，而且是任何数据处理业务中必 不可少的共有部分。数据管理技术的优劣，将直接影响数据处理的效率。 2.1.1 数据库的发展 数据管理技术的发展，与硬件（主要是外存）、软件、计算机应用的范围有密切 的联系。数据管理技术的发展经过三个阶段：人工管理阶段、文件系统阶段和数 据库阶段。 人工管理阶段和文件系统阶段都有着相当多的缺陷，诸如数据冗余性 ，数据不 一致性以及数据联系弱等等。也正是由于这些原因，促使人们研究新的数据管理 技术，从而产生了数据库技术。 20 世纪 60 年代末发生的三件大事，层次模型 IMS 系统的推出、关于网状模型 DBTG 报告的发表以及关于关系模型论文的连续发表标志着数据管理技术进入数据库 阶段。进入 70 年代以后，数据库技术得到迅速发展，开发了许多有效的产品并 投入运行。数据库系统克服了文件系统的缺陷，提供了对数据更高级更有效的管 理。 当进入数据库阶段后，随着数据管理规模一再扩大，数据量急剧增加，为了提高 效率，开始时，人们只是对文件系统加以扩充，在应用文件中建立了许多辅助索 引，形成倒排文件系统。但这并不能最终解决问题。在 20 世纪 60 年代末，磁盘 技术取得重要进展，具有数百兆容量和快速存取的磁盘陆续进入市场，成本也不
    分享到：
    赞 收藏

    相关推荐

    资料库

    数据库

    共收录1218份资料，累计14个分类，关注成员有19位，主要包括：NoSQL,MongoDB,Redis,SQLite,Memcached,DB2,Sybase,Informix,PostgreSQL,MySQL,SQLServer,Access,Oracle,其它

    热门标签

    NoSQL MongoDB Redis SQLite Memcached DB2 Sybase Informix PostgreSQL MySQL SQLServer Access Oracle 其它

    最新资料