还剩31页未读,继续阅读
本资源只提供10页预览,全部文档请下载后查看!喜欢就下载吧,查找使用更方便
文本内容:
实验报告书课程名称物流信息系统学生姓名学号所在班级所在系(部)物流工程系指导教师实验学期2013~2014学年第一学期山东交通学院交通与物流工程
一、实验名称物流信息系统认识上机
二、时间2013年9月14日
三、地点交通与物流工程实验中心,机房(
6207、
6205、6103室)
四、指导教师刘建磊
五、实验目的通过一般的物流信息系统软件的实际操作,认识这类软件的常见主要功能,了解物流过程中的库存管理、运输管理、配送管理流程,学会这类软件的基本操作
六、实验用仪器设备计算机、相关物流信息系统软件
七、实验内容与实验步骤1使用物流管理系统软件,获知其主要功能有1部门资料设置对部门资料进行增加、删除、修改、查询等操作,截图如下2车辆调度安排随时掌握司机以及车辆的动态,对车辆进行合理的安排,截图如下3车辆资料设置将车辆以及司机的资料电子化,方便、快捷的对车辆信息进行及时的更新,来对车辆的信息做到进一步的完善,截图如下4__修改对__进行简单的修改工作,截图如下5货物托运管理进行货物托运的各项内容设置,比如对托运的货物进行增减,承运单位的各种信息,以及__单位的各种信息,截图如下除以上功能外,该物流管理系统软件还具有货物验收管理、____设置、司机资料设置等使用物流物流管理系统软件,获知其主要功能有1物资入库单填写主要记录物资的编号、数量、名称等项目,截图如下2物资出库单填写主要内容和入库单的大体相同,截图如下3用户管理通过__设置来进行用户的识别与管理,截图如下3使用钢材行业物流管理软件,获知其主要功能有1审核报损出库单对报损物品进行备注与审核,截图如下2查询存款单,截图如下
一、实验名称物流信息技术上机
二、时间2013年9月18日
三、地点交通与物流工程实验中心,机房(
6207、
6205、6103室)
四、指导教师刘建磊
五、实验目的熟悉VB的系统环境,了解VB程序的编写、保存和编译的方法过程;掌握基本语句的使用;掌握表达式的正确书写方法及函数、运算符的正确使用;掌握逻辑表达式及关系表达式的正确书写形式,掌握IF语句单行和块书写格式及其正确使用
六、实验用仪器设备计算机、VisualBasic软件
七、实验内容与实验步骤1编一程序,程序运行的初始界面如图所示,当用户在文本框中输入姓名,例如输入“张三”,单击“确定”按钮,则程序的运行情况如图1-2所示,如果单击“结束”按钮,即结束程序运行源代码PrivateSubCom__nd1_ClickCom__nd
2.Enabled=FalseText
1.Text=EndSubPrivateSubCom__nd2_ClickEndEndSub2设计一个猜数字游戏软件,__出题按钮,产生一个10到99的随机数,然后在文本框中由用户输入数字,如果结果不对,应提示是大了,还是小了,否则提示正确运行界面如图3-1所示程序源代码为DimaAsSinglePrivateSubCom__nd1_Clicka=IntRnd*90+10EndSubPrivateSubCom__nd2_ClickDimbAsSingleDimcAsSinglec=ab=Text
1.TextIfcbThenMsgBox您猜的数字大了,加油加油IfcbThenMsgBox您猜的数字小了,加油加油Ifc=bThenMsgBox您猜对了,恭喜恭喜Text
1.Text=EndSubPrivateSubCom__nd3_ClickEndEndSub3设计一个登陆界面,包含用户名、__及文本框,确定按钮,退出按钮,并编写代码实现,用户名和__正确时弹出对话框,提示“欢迎使用该系统”,否则提示“用户名和__错误,请重新输入”截图如下写入实现上述内容的一段代码:DimaAsSingleDimbAsSinglePrivateSubCom__nd1_Clicka=123b=456IfText
1.Text=aAndText
2.Text=bThenMsgBox欢迎使用该系统ElseMsgBox__错误,请重新输入EndIfText
1.Text=Text
2.Text=EndSub
一、实验名称物流信息技术上机
二、时间2013年10月12日
三、地点交通与物流工程实验中心,机房(
6207、6205室)
四、指导教师张良智
五、实验目的掌握For语句的使用掌握Do…Loop{While|Until}两种形式的使用掌握如何控制循环条件,防止死循环或不循环熟练掌握循环条件设置及循环的控制方法掌握数组的声明、数组元素的引用掌握静态数组和动态数组的使用差别应用数组解决与数组有关的常用问题
六、实验用仪器设备计算机、VisualBasic软件
七、实验内容与实验步骤
1、编一程序,显示出所有的水仙花数所谓水仙花数是指一个三位数的各位数字立方和等于该数字本身如153=,因此153是一个水仙花数截图如下程序源代码为PrivateSubForm_clickDimiAsIntegerFori=100To999Ifi\100^3+i\10Mod10^3+iMod10^3=iThenPrintiNextEndSub
2、设计一个程序,将用户输入的10个数字进行倒置截图如下程序源代码为PrivateSubForm_clickDimsAsStrings=InputBox请输入要倒置的数字测试IfsThens=StrReversesMsgBoxsEndIfEndSub
3、设计一个程序,定义一个5×5的二维数组,随机存放10-60之间的整数,输出内容如下1)按矩阵形式输出所有数组元素2)在每行结尾输出各行元素之和3)在每列的下面输出主对角线上的元素截图如下程序源代码为PrivateSubForm_clickDimIAsIntegerJAsIntegerDimIntSumHAsIntegerDimIntSj1To51To5AsIntegerRandomizeForI=1To5IntSumH=0Print|;ForJ=1To5IntSjIJ=IntRnd*51+10IntSumH=IntSumH+IntSjIJPrintIntSjIJ;NextJPrint|;PrintIntSumHNextIForI=1To5Print--;NextIPrintPrint;ForI=1To5PrintIntSjII;NextIPrintPrint;ForI=1To5PrintIntSj6-II;NextIEndSub
一、实验名称数据库操作上机
二、时间2013年10月16日
三、地点交通与物流工程实验中心,机房(
6207、6205室)
四、指导教师张良智
五、实验目的理解关系数据库的基本概念,掌握Ac__ss数据管理系统的基本操作练习建立数据表,熟悉各数据类型的内容
六、实验用仪器设备计算机、AC__SS软件
七、实验内容与实验步骤1AC__SS数据库软件的主要功能有新建数据库,截图如下图1供应商表设计视图图2货物表设计视图图3货物出库表设计视图图4货物入库表设计视图图5客户表设计视图图6运货商设计视图图7货物表数据视图图8货物出库表数据视图图9货物入库表数据视图
一、实验名称数据库操作上机
二、时间2013年10月30日
三、地点交通与物流工程实验中心,机房(
6207、6205室)
四、指导教师张良智
五、实验目的通过在VB和AC__SS的交互操作,练习高级语言操作数据库的多种方法,重点掌握使用DATA控件、ADODC控件和DATAGRID控件、数据窗体设计器三种方法连接数据库,并了解使用ADO对象编写代码连接数据的方法
六、实验用仪器设备计算机、AC__SS软件、VisualBasic软件
七、实验内容与实验步骤
1、使用DATA控件连接数据库在硬盘的用户盘上建立一个用户目录(如E:\WORK),用于保存所有实验文件启动AC__SS,找到数据库“仓储管理信息系统”确认有货物表,并已经录入了多条数据将“仓储管理信息系统”数据库打开,转化97格式的数据库,取名“仓储管理信息系统-97”,__到用户目录下启动VB,在窗体上加入DATA控件data1,文本框控件text1,保存文件和工程到用户目录下设置DATA控件的databasename属性为“仓储管理信息系统97”,设置DATA控件的Recordsour__属性为货物表设置文本框控件的datasour__属性为data1设置文本框控件的datafield属性为货物名称运行程序,查看结果修改上述文本框控件的datafield属性,查看结果添加其他文本框控件,设置属性,显示更多的货物表内容显示多个货物表信息的界面截屏如下图10货物出库查询
2、使用ADODC控件连接数据库在硬盘的用户盘上建立一个用户目录(如E:\WORK),用于保存所有实验文件启动AC__SS,找到数据库“仓储管理信息系统”确认有货物表,并已经录入了多条数据__到用户目录下启动VB通过菜单工程—部件—控件添加控件MicrosoftADODATACONTROL
6.0和MicrosoftDATAgridCONTROL
6.0通过工具箱加两个控件到窗体上设置ADODC的属性,生成—提供程序—MicrosoftJET
4.0OLEDB;连接—WLGL—测试连接成功;记录源—命令类型2—表名称货物表设置datagrid控件属性datasour__为ADODC
1.运行程序,显示货物表全部内容的界面如下图11物资查询
3、使用数据窗体设计器操作数据库在硬盘的用户盘上建立一个用户目录(如E:\WORK),用于保存所有实验文件启动AC__SS,找到数据库“仓储管理信息系统”确认有货物表,并已经录入了多条数据将“仓储管理信息系统”数据库打开,转化97格式的数据库,取名“仓储管理信息系统97”,__到用户目录下启动VB通过菜单外接程序—可视化数据管理器,在visdata界面上文件--打开数据库—MicrosoftAC__SS-“仓储管理信息系统97”实用程序--数据窗体设计器—窗体名称:huowu—记录源货物表—添加使用的多个字段到右侧—生成窗体—关闭对自动生成的窗体,重新排列位置、设置字体大小,颜色,控件长度等,调整界面美观大方,不留空白,不显拥挤运行程序,得到操作数据库的界面设计如下图12客户管理表
一、实验名称物流信息系统__上机
二、时间2013年11月13日
三、地点交通与物流工程实验中心,机房(
6207、6205室)
四、指导教师张良智
五、实验目的通过编制系统可行性分析报告了解物流信息系统可行性分析的内容,通过系统业务流程图的绘制,熟悉系统业务过程,学会绘制业务流程图;通过界面设计熟练输入设计、输出设计的方法,掌握基本的界面设计方法
六、实验用仪器设备计算机、AC__SS、WORD、VB、DiagramDesigner软件
七、实验内容与实验步骤1系统可行性分析
(1)方案的可行性本系统方案是适应现代仓储业高效仓储化作业而设计的,且系统界面友好,系统功能比较简单,任何人都可以很快掌握操作原理并使用,不存在太大难度
(2)技术的可行性系统的总体架构将采用三层架构模型,数据库采用微软的Ac__ss,其工作稳定,功能强大,资源耗费较少,所以能够充分满足目前的需要采用VB语言进行编程VB是安全的、稳定的、简单的面向对象的编程语言因此,__本系统在技术上是可行的
(3)经济的可行性 由于本系统的__以课程设计为依托,参与人员的目的以学习为主,投入成本比较小本系统比较简单且只在本机使用,暂不考虑网络,因而__费用小同时无纸化办公可以节省资源,减少后期资源浪费因此,__本系统在经济上是可行的
(4)社会的可行性在社会生产飞速发展的今天,物流己经成为国民经济的支柱,尤其是仓储管理,信息化是发展物流、提高效率的关键仓储管理系统数据逻辑设计规范,系统功能健全,数据标准化,可以满足企业物流仓储业务的实际需要,提高仓储工作的效率这些需求成为发展物流的关键因素因此,本系统在社会上具有可行性
2.业务流程图图13入库作业流程图图14出库作业流程图图15盘点作业流程图3.界面设计截图如下图16用户登录界面图17仓储管理系统主界面图18客户管理界面图19供应商查询界面图20供应商管理界面
一、实验名称物流信息系统__上机
二、时间2013年11月28日
三、地点交通与物流工程实验中心,机房(
6207、6205室)
四、指导教师张良智
五、实验目的通过系统分析(含业务流程分析和数据流程分析)、系统设计(含数据库设计、界面设计)、系统实施等环节,让学生全面掌握物流信息系统__的全部内容,并初步掌握一些关键技术,了解系统__的整体流程
六、实验用仪器设备计算机、AC__SS、WORD、VB、DiagramDesigner软件
七、实验内容与实验步骤
(一)系统分析采购入库时由仓储部门开出会验收通知单,交相关检验人员进行检验(验收标准由使用部门即生产科给定,在本系统中不进行管理),开出验收单,如果验收合格,则进行移仓,并记入仓库台帐,然后财务根据具体情况进行付款操作,当然付款作业并不包括在本仓储管理系统内,本系统仅仅在此预留与财务系统的接口而已;如果验收不合格,则视具体情况进行处理,根据需要进行退货作业,在此本系统只负责退货单的维护领料出库有多种形式,生产领料和其他领料如设备维修领料等的领料作业流程和领料单都相同领料出库时,由相关检验人员查可用库存量,如果领料量小于可用库存量则进行发料,从而入仓库台账;如果领料单不小于库存量则重新填写领料单并且填写请购单
(二)系统设计
1.物理配置方案设计随着信息技术的飞速发展,各种计算机软、硬件产品竞相投向市场多种多样的计算机技术产品为信息系统的建设提供了极大的灵活性,其性价比也是五年前甚至是半年前所无法比拟的,使我们可以根据应用的需要灵活选用不同生产者的性能各异的软、硬件产品该系统采用Client/Server、Browser/Server结构,采用了最先进的三层结构设计,使应用层和数据库逻辑分离,进而使核心数据库更安全,升级和扩展可不受原系统的局限服务器采用Windows2000Server操作系统,数据库是SQLServer2000,中间层服务器和客户端__语言为VB
6.
02.系统设计原则系统设计遵循的原则
(1)系统的标准化和规范化,系统的标准化和规范化是信息系统建设基本而又关键的一步,要实现信息通讯与共享,必须规范信息技术标准
(2)系统的实用性、稳定和可靠性,系统建设要以满足工作的业务需求为首要目标,建设方案以实际可接受能力为尺度,避免盲目追求新技术系统中的软硬件及信息资源要满足可靠性设计要求,系统必须可靠地__安全运行,即系统的设计必须在成本可以接受的条件下,从系统结构、设计方案、设备选型、厂商的技术服务与维护响应能力、备件供应能力等方面考虑,使得系统故障发生的可能性尽可能少,对各种可能出现的紧急情况有应急的工作方案和对策
(3)系统的安全性遵循有关信息安全标准,系统具有很强的安全防卫机制,应提供多方式、多层次、多渠道的安全保密措施,防止各种形式与途径的非法侵入和机密信息泄露;同时要有备份机制,保证客户信息的安全
(4)系统的灵活性和可扩充性计算机技术发展迅速,日新月异,系统的设计要保证软件兼容的情况下,利用最小代价,使网络系统结构平滑过渡到新的网络结构体系,可以灵活扩充系统能有较强的应变能力,实现程序与处理数据分离,处理数据的变化不需要修改应用程序软件,如表格、数据结构的定义,既满足上级的要求,又满足用户自己的特殊需要,用户可以灵活定义和变化
3.网络结构网络主要由企业内部网和信息发布系统两部分组成根据企业客户信息管理系统的需求,在网络系统的设计中,采用目前先进成熟的快速以太网技术,以最优的性能__比实现整个网络系统的高性能和高可靠性这样,客户随时随地都可通过公众网访问本信息系统网络设计的目标是
(1)系统采用星型网络结构,因此单机损坏对整个系统无影响;
(2)采用高容错技术,系统可以不间断的运;
(3)星型布线使站点不受限制,在站点增加、减少的情况下,系统不停机;
(4)采用实用的客户机/服务器和浏览器/服务器结构;
(5)服务器采用易于管理的WindowsNT系统;
(6)客户端采用方便实用的Windows
98、2000和XP
4.系统软件
(1)操作系统WindowsNTServer该系统为各种组织的计算环境提供了一个完整的方案从文件/打印操作,到Intranet和Internet服务,关键任务的应用程序支持,所有的服务被嵌入操作系统从基本点着手,WindowsNTServer设计成为最具有集成性,完整性和便捷性的服务器操作系统,并提供了对关键任务应用程序所必备的评测性,可靠性和管理性
(2)数据库系统SQLServer2000SQLServer2000是一个综合的分布式管理框架结构,允许你集中地管理组织机构中所有数据库服务器通过增强的基于Windows的管理工具和强大的基于服务器的作业日程安排,你可以直观地控制多个服务器,并且实现分布式环境命令构成的远程操作的自动执行考虑到与Internet的集成,SQLServer还提供了高性能的Web页面信息访问机制它的新组件WebAssistant能使你通过多种方式利用SQL数据__你的Web服务,允许在一个私有Intranet网或在世界范围网(Internet)的Web上分发公司数据
(3)客户端系统软件客户端操作系统可采用WindowsNTWorkstation
4.0或Windows98中文版
(三)数据库设计
1.使用DATA控件连接数据库在硬盘的用户盘上建立一个用户目录(如E:\WORK),用于保存所有实验文件启动AC__SS,找到数据库“仓储管理信息系统”确认有货物表,并已经录入了多条数据将“仓储管理信息系统”数据库打开,转化97格式的数据库,取名“仓储管理信息系统-97”,__到用户目录下启动VB,在窗体上加入DATA控件data1,文本框控件text1,保存文件和工程到用户目录下设置DATA控件的databasename属性为“仓储管理信息系统97”,设置DATA控件的Recordsour__属性为货物表设置文本框控件的datasour__属性为data1设置文本框控件的datafield属性为货物名称运行程序,查看结果修改上述文本框控件的datafield属性,查看结果添加其他文本框控件,设置属性,显示更多的货物表内容
2.使用ADODC控件连接数据库在硬盘的用户盘上建立一个用户目录(如E:\WORK),用于保存所有实验文件启动AC__SS,找到数据库“仓储管理信息系统”确认有货物表,并已经录入了多条数据__到用户目录下启动VB通过菜单工程—部件—控件添加控件MicrosoftADODATACONTROL
6.0和MicrosoftDATAgridCONTROL
6.0通过工具箱加两个控件到窗体上设置ADODC的属性,生成—提供程序—MicrosoftJET
4.0OLEDB;连接—WLGL—测试连接成功;记录源—命令类型2—表名称货物表设置datagrid控件属性datasour__为ADODC
1.
3.使用数据窗体设计器操作数据库在硬盘的用户盘上建立一个用户目录(如E:\WORK),用于保存所有实验文件启动AC__SS,找到数据库“仓储管理信息系统”确认有货物表,并已经录入了多条数据将“仓储管理信息系统”数据库打开,转化97格式的数据库,取名“仓储管理信息系统97”,__到用户目录下启动VB通过菜单外接程序—可视化数据管理器,在visdata界面上文件--打开数据库—MicrosoftAC__SS-“仓储管理信息系统97”实用程序--数据窗体设计器—窗体名称:huowu—记录源货物表—添加使用的多个字段到右侧—生成窗体—关闭对自动生成的窗体,重新排列位置、设置字体大小,颜色,控件长度等,调整界面美观大方,不留空白,不显拥挤
(四)系统实现
(1)实现对供应商管理的代码PrivateSubcmdAdd_ClickData
1.Recordset.AddNewEndSubPrivateSubcmdDelete_Click如果删除记录集的最后一条记录记录或记录集中唯一的记录Data
1.Recordset.DeleteData
1.Recordset.MoveNextEndSubPrivateSubcmdRefresh_Click这仅对多用户应用程序才是需要的Data
1.RefreshEndSubPrivateSubcmdUpdate_ClickData
1.UpdateRecordData
1.Recordset.Book__rk=Data
1.Recordset.LastModifiedEndSubPrivateSubcmdClose_ClickUnloadMeForm
2.ShowEndSubPrivateSubData1_ErrorDataErrAsIntegerResponseAsInteger这就是放置错误处理代码的地方如果想忽略错误,注释掉下一行代码如果想捕捉错误,在这里添加错误处理代码MsgBox数据错误__命中错误Error$DataErrResponse=0忽略错误EndSubPrivateSubData1_RepositionScreen.MousePointer=vbDefaultOnErrorResumeNext这将显示当前记录位置为动态集和快照Data
1.Caption=记录Data
1.Recordset.AbsolutePosition+1对于Table对象,当记录集创建后并使用下面的行时,必须设置Index属性Data
1.Caption=记录Data
1.Recordset.RecordCount*Data
1.Recordset.Per__ntPosition*
0.01+1EndSubPrivateSubData1_ValidateActionAsIntegerS__eAsInteger这是放置验证代码的地方当下面的动作发生时,调用这个__SelectCaseActionCasevbDataActio__oveFirstCasevbDataActio__ovePreviousCasevbDataActio__oveNextCasevbDataActio__oveLastCasevbDataActionAddNewCasevbDataActionUpdateCasevbDataActionDeleteCasevbDataActionFindCasevbDataActionBook__rkCasevbDataActionCloseEndSelectScreen.MousePointer=vbHourglassEndSub
(2)实现用户注册的单击__PrivateSubCom__nd1_ClickIfText
1.TextAndText
2.TextAndText
3.TextAndText
3.Text=Text
2.TextThenpubConn.ConnectionString=Provider=Microsoft.Jet.OLEDB.
4.0;DataSour__=App.Path\仓储管理信息系统.mdb;PersistSecurityInfo=FalsepubConn.ConnectionTimeout=30pubConn.Openrs.CursorLocation=adUseClientstrSQL=select*fromuserrs.OpenstrSQLpubConnadOpenDynamicadLockOptimisticrs.AddNewrs!用户名=Text
1.Textrs!__=Text
2.Textrs.UpdateMsgBox注册成功!vbExcla__tion+vbOKOnly警告Form
4.HideElsem=MsgBox错误请重新登录vbExcla__tionText
1.Text=Text
2.Text=Text
3.Text=EndIfEndSub
(3)实现货物出库管理的代码PrivateSubcmdAdd_ClickData
1.Recordset.AddNewEndSubPrivateSubcmdDelete_Click如果删除记录集的最后一条记录记录或记录集中唯一的记录Data
1.Recordset.DeleteData
1.Recordset.MoveNextEndSubPrivateSubcmdRefresh_Click这仅对多用户应用程序才是需要的Data
1.RefreshEndSubPrivateSubcmdUpdate_ClickData
1.UpdateRecordData
1.Recordset.Book__rk=Data
1.Recordset.LastModifiedEndSubPrivateSubcmdClose_ClickUnloadMeForm
2.ShowEndSubPrivateSubData1_ErrorDataErrAsIntegerResponseAsInteger这就是放置错误处理代码的地方如果想忽略错误,注释掉下一行代码如果想捕捉错误,在这里添加错误处理代码MsgBox数据错误__命中错误Error$DataErrResponse=0忽略错误EndSubPrivateSubData1_RepositionScreen.MousePointer=vbDefaultOnErrorResumeNext这将显示当前记录位置为动态集和快照Data
1.Caption=记录Data
1.Recordset.AbsolutePosition+1对于Table对象,当记录集创建后并使用下面的行时,必须设置Index属性Data
1.Caption=记录Data
1.Recordset.RecordCount*Data
1.Recordset.Per__ntPosition*
0.01+1EndSubPrivateSubData1_ValidateActionAsIntegerS__eAsInteger这是放置验证代码的地方当下面的动作发生时,调用这个__SelectCaseActionCasevbDataActio__oveFirstCasevbDataActio__ovePreviousCasevbDataActio__oveNextCasevbDataActio__oveLastCasevbDataActionAddNewCasevbDataActionUpdateCasevbDataActionDeleteCasevbDataActionFindCasevbDataActionBook__rkCasevbDataActionCloseEndSelectScreen.MousePointer=vbHourglassEndSub。