基于时间序列法的营销管理系统方案.doc

《基于时间序列法的营销管理系统方案.doc》由会员分享，可在线阅读，更多相关《基于时间序列法的营销管理系统方案.doc（26页珍藏版）》请在三一办公上搜索。

1、目 录1 概述 11.1 课题开发背景 11.2 课题研究现状 11.3 课题开发目标 22 相关理论支持 22.1 时间序列法 22.2 一元线性回归预测法 33 系统分析 53.1 需求分析 53.2 可行性分析 63.3 数据流程分析 63.4 数据字典 73.4.1 数据项描述 .73.4.2 数据结构描述 83.4.3 数据流描述 84 系统设计 94.1 开发及运行环境 94.2 系统总体结构设计 94.2.1 系统功能结构设计 94.2.2 主要模块说明 94.3 数据库设计 114.3.1 数据库概念结构设计 114.3.2 数据库表设计 115 系统实施 155.1 主要功能

2、界面设计 155.1.1 市场走势界面设计 155.1.2 数据导入界面设计 175.1.3 销售预测界面设计 185.2 系统管理功能设计 206 总结与展望 236.1 课题总结 236.2 课题展望 231 概述1.1 课题开发背景步入信息时代,世界各国经济密切联系,互相依赖,仅依靠传统的经济手段已不能很好地促进经济发展。随着中国市场经济体制的建立,企业逐步走出国门,走向世界,广阔的的国际市场给企业的发展不仅带来了机遇,更让企业面临诸多挑战。营销作为企业业务重要的一环,在企业发展壮大的过程中,其竞争环境也日益加剧1。与大企业相比,中小企业的生存和竞争环境也发生了根本性的变化。对中小企业而

3、言,实现信息化管理是提升公司管理能力的一个重要方面。营销部门作为企业业务管理中的重要一环,管理着企业的产品、业务人员及其他相关信息,是保证企业盈利、高效运转的关键环节之一,辅之以营销管理系统,结合网络技术,再加上管理员的合理操作,则可让营销部门的管理工作更上一层楼。营销管理系统的建立是以营销信息管理理论为支撑,以营销信息链为主线,打造企业竞争的情报中心2。营销管理系统就是融合企业部信息与外部信息、直接信息与间接信息,以问题为导向,对信息进行搜集和整理、分析与使用,从而确立信息对营销管理与决策的支撑地位。1.2 课题研究现状在中国经济崛起的背后,中小企业异军突起,国外各个方面的环境给中小企业带来

4、了诸多机遇,同时也让它们面临诸多挑战。对中小企业而言,实现信息化管理已是企业管理的方向,结合计算机网络技术和互联网技术,在加上人工管理,可让企业部的管理工作有条不紊。但多数企业仅仅看重管理,而没有对企业管理进行深度剖析,从企业长远发展的角度看,管理值得重视,但对相关数据进行挖掘和分析,则是完善企业管理的很好办法。课题研究的是时间序列法等预测方法在企业产品销售中的应用。在当前市面上,多数企业已在使用企业管理软件 ERP 或 SAP,ERP 是针对物质资源管理、人力资源管理、财务资源管理、信息资源管理集成一体化的企业管理软件,它已经囊括了一些预测容,预测方法则根据企业的需求不同分为近期预测、短期预

5、测、中期预测、长期预测等。但对多数企业而言,将 ERP 应用到企业的管理中也有其局限性。首先,ERP 的投入是一个系统工程,并不能立竿见影,它所贯彻的主要是管理思想,这是企业管理中的一条红线。其次,ERP 的实施需要复合型人才,他们既要懂计算机技术,又要懂管理,当前高校对复合型人才的培养远远满足不了企业的需求。再者,ERP 运用到企业中,需要企业有一定的经济实力。条件具备的企业要不失时机地运用 ERP 管理系统,不论只研究纯理论,要整理好企业部管理的基本数据,选定或开发适合自己企业的 ERP 软件。但对中小企业而言,它们往往没有条件应用 RRP 系统,或是较为机械的使用ERP 对企业日常业务进

6、行管理。把管理引向更深的层次是未来企业管理的趋势,这需要对企业的各种数据做出综合归纳、整理、分析, 并将结果运用到企业的战略管理中。销售预测是让企业领导层做出生产计划的一个重要参考指标,但销售预测准确率低则是众多营销管理者非常棘手的问题。销售预测准确率低会造成生产计划无所适从,一方面,按计划生产出来的产品届时可能由于某些条件不满足而不能发货,容易造成库存,另一方面,没有按计划生产产品又可能由于需求量增加缺少货源。这既然营销部门不便管理,又降低了产品销售的竞争力。课题只针对营销部门进行研究,在完善管理的同时又加入了分析、预测功能,可以帮助中小企业分析销售业务,预测未来的销售情况,同时能为企业高层

7、做出合理决策提供依据。1.3 课题开发目标企业营销管理系统是一款中小规模的企业管理软件,是针对中小型企业来开发的。在开发系统的过程中,本着经济、实用、高效的原则,为企业提供一个便捷、高效、规的营销工作环境,满足企业不断发展壮大的需求。研究本课题需要弄清企业营销部门的业务流程,在理解相关预测方法的前提下,对企业提供的销售数据进行分析,结合企业实际,分析企业未来的销售状况。从系统功能上讲,要大致实现以下目标：实现美观友好的系统界面,数据增删查改方便、灵活、准确,尽量避免人为管理的错误；根据业务员的销售业绩情况,以图表的形式分析商品市场价格的走势；根据前期的销售数据,运用时间序列法、一元线性回归分析

8、法预测未来某一时期的销售情况；与 Excel 进行关联,可直接从 Excel 表中导入销售数据；增设用户权限,实现用户分权管理,确保系统的安全性；确保系统运行稳定、安全可靠；系统最大限度地实现了易安装性、易维护性和易操作性1。2 相关理论支持2.1 时间序列法时间序列法就是将过去的历史资料和数据按时间顺序排列起来的一组数字序列。其特点是：假定影响未来市场需求和销售量的各种因素与过去的影响因素大体相似,并且产品的需求形态有一定的规律。因而,只要将时间序列的倾向性进行统计分析并加以延伸,便可以推测出市场需求的变化趋势,从而做出预测。这种方法简单易行,应用较为普遍,但经济事件的未来状态不可能是过去的

9、简单重复,因此,这种方法适用于短期预测或中期预测。若时间序列的数据虽时间的变化波动很大,或是市场环境变化很大,国家的经济政策有重大变化,经济增长发生转折,一般不宜采用这种方法。市场需求的变化随时间而变,一般都受两类因素的影响：一类是对市场需求动态起主导作用的规律性因素；另一类是对市场需求动态起辅助性和临时性作用的偶然性因素。时间序列分析法主要是要消除偶然性因素的影响,把时间序列作为随机变量序列,采用数学平均或加权平均方法进行预测。经常使用的时间序列分析法有简单平均法、加权平均法、指数平滑法和季节指数法。这里仅介绍前两种分析方法。如果产品的需求形态近似于平均形态或产品处于成熟期,可用简单平均法进

10、行预测,将过去的实际销售量的时间序列数据进行简单平均,把平均值作为下一期的预测值。以下是简单平均法的计算公式：过去各期实际销量之和预测销售量期数如果过去的实际销售量有明显的增长趋势,则使用加权平均法。即逐步加大近期实际销售量在平均值中的权数,然后予以平均,确定下期的预测值。以下是加权平均法的两种计算公式：11WniiiniiiiC DC式中: W -预测值 D-i 期的销售额 C-i 期销售额的“ 权” 值11WC DC1niiiiiniiii式中: W -预测值 D-期的销售额 C-期的销售额的“ 权” 值 2.2 一元线性回归预测法公式2-1公式2-2公式2-3一元线性回归预测法是分析一个

11、因变量与一个自变量之间的线性关系的预测方法,常用统计指标：平均数、增减量、平均增减量。一元回归预测的基本思想是确定回归直线,得出回归直线方程,并依此得出预测值。确定直线的方法是最小二乘法,其基本思想是：最有代表性的直线应该是直线到各店距离最近,然后用这条直线进行预测。一元线性回归预测模型的建立步骤：选取一元线性回归模型的变量；绘制计算表和模拟合散点图；计算变量间的回归系数及其相关的显著性；回归分析结果的应用。下面比较详细地描述一元回归直线的求法。在取得两个变量的实验数据之后,若在普通直角坐标系上标出各个数据点,若果各点的分布近似乎一条直线,则可考虑采用线性回归法求其表达式。一元线性回归分析法的

12、预测模型为： ,tttabxtYa bY式中，x 代表期自变量的值 代表t 期因变量的值代表一元线性回归方程的参数a、b 参数由下列公式求得用代表： ni 1 为简便计算,我们作以下定义： iiXYXYnn式中，这样定义 a、b 后,参数由下列公式求得： 公式2-6公式2-5公式2-4公式2-7将 a、b 代入一元线性回归方程,就可以建立预测模型,那么,只要ttYabX给定值,即可求出预测值 。tXtY在回归分析预测法中,需要对 X、Y 之间相关程度做出判断,这就要计算相关系数 Y,其公式如下： 相关系数 r 的特征有：相关系数取值围为：-1r1。r 与 b 符合相同。当r0,称正线性相关,X

13、i 上升,Yi 呈线性增加。当 r0,称负线性相关,Xi 上升,Yi呈线性减少。|r|=0,X 与 Y 无线性相关关系；|r|=1,完全确定的线性相关关系；0|r|0.7,为高度线性相关；0.3|r|0.7,为中度线性相关；|r|0.3,为低度线性相关。3 系统分析3.1 需求分析企业营销管理系统主要应用于中小型企业的营销部门。在网络发达的今天,企业在发展过程中,网络技术已应用到企业的各个部门。尤其是对中小型企业的营销部门而言,仅依靠人工管理已不能很好地对相关业务和人员进行管理。使用一款实用的企业管理软件,再配上相关管理员,便可很好的处理部门业务。企业营销信息系统分为七个模块：基础资料管理、销

14、售组织、市场管理、销售业务管理、销售分析、系统管理、辅助工具。以下是每个模块功能的详尽描述。 基础资料管理主要是管理企业的基本业务。主要职能包括：区域管理、产品管理、销售训练项目设置、销售考核指标设置。销售组织可有效地管理企业的销售团队,提高业务人员的专业水平,激励他们再接再厉。其主要职能包括：销售组织、业务员管理、销售训练、销售业绩考核。市场管理主要根据搜集到的市面上产品价格信息,形成产品价格走势图,为企业领导层提供决策支持。其主要职能包括：市场反馈、市场跟踪、市场走势。公式2-8公式2-9销售业务管理主要管理销售业务流程各个环节的活动,实现销售数据的导入或录入,并根据销售数据对下一年度某一

15、销售区域的销售情况进行预测,同时制订下一年的销售计划。其主要职能包括：销售数据导入、销售数据录入、销售预测、年销售计划。销售分析主要对销售过程中各种数据进行分析,如销售月报表、销售季报表。其主要职能包括：月销售分析、季销售分析、年销售分析。登录系统时需要验证身份,只有合法的用户才可以进入系统,不同的用户拥有不同的操作权限。系统管理员可管理普通用户,对系统原有的数据进行初始化操作,以清空系统的原始数据。其主要职能包括：用户管理、密码修改、 、数据初始化。辅助工具中提供了使用本系统的帮助及信息。其主要包括：帮助、关于。3.2 可行性分析可行性分析是进行系统分析的前端性工作,在满足用户全部要求的前提

16、下来开发系统往往存在诸多问题,这些问题可能充斥各个方面,容分散,甚至含糊不清,这就要求系统分析人员对用户提出的各种问题识别初始要求,进行可行性分析3。可行性分析是对系统进行论证、分析的方法。其目的是对技术先进程度,经济合理性和条件可能性的分析论证,选择以最小的人力、物力、财力耗费,取得最佳技术、经济、社会效益的切实方案3。营销管理系统处理的业务比较简单,且每个数据容既有较强的关联性,设计的计算过程不是很复杂,因此,可采用大家所熟悉的 SQL Server2000 进行数据库管理。经过初步估计,开发出的系统对机器配置要求较低,一般的电脑在存储量、速度方面都能满足其运行要求。在开发技术方面,采用比

17、较简单的二层 C/S 结构开发模式,基于 Visual Basic 的开发环境,再加上能方便的找到一些开源代码,为系统的开发提供了诸多便利。实现预测功能方面,课题研究人员熟悉时间序列分析法和一元线性回归预测法,并能实现简单的预测功能,处理结果可以达到预期的目标。3.3 数据流程分析系统的操作员进入系统后依据其应有的权限进行管理,在录入或导入销售数据,反馈市场形势,分析销售情况的前提下,预测今后某产品在某区域的销售情况,同时给出相应的销售计划。图 3-1 为数据流程图。系统管理员D1D5产品信息D4区域信息D3市场反馈信息D2销售数据信息P1操作员管理管理操作员添加P4区域管理P5产品管理管理管

18、理区域添加产品添加用户P2销售数据管理P3市场反馈管理管理管理录入或导入数据反馈信息添加操作员信息图 3-1 数据流程图3.4 数据字典数据字典是关于数据的信息集合,也就是对数据流程图中包含所有元素定义的集合,它是对数据流程图中的数据项、数据结构和数据流进行定义和描述的功能工具3。以下是系统主要的数据字典。3.4.1 数据项描述数据项是数据的最小单位,具有逻辑不可再分性3。图 3-2,图 3-3,图 3-4分别为产品单价,产品规格,区域名称的数据项描述。数据项编号：SJX-01数据项名称：产品单价别名：单价简述：销售产品的单位价格类型及宽度：decimal,6取值围：000001-999999

19、图 3-2 产品单价描述数据项编号：SJX-02数据项名称：产品规格别名：规格简述：销售产品的规格类型及宽度：varchar,20取值围：001-999图 3-3 产品规格描述数据项编号：SJX-03数据项名称：区域名别名：区域名称简述：销售产品所在的区域名称类型及宽度：varchar,20取值围：001-999图 3-4 区域名描述3.4.2 数据结构描述数据结构描述数据项之间的关系,可由若干数据项、数据结构或数据与数据结构组成3。图 3-5,图 3-6 分别为产品信息、区域信息的数据结构描述。数据结构编号：SJJG-01数据结构名称：产品信息简述：某种产品组成：产品编号+品名规格+单位+单

20、价+备注相关数据流：销售区域名称、业务员名称相关处理逻辑：销售区域管理、业务员管理图 3-5 产品信息描述数据结构编号：SJJG-02数据结构名称：区域信息简述：多种产品的销售区域组成：区域编号+本级编号+区域名称+区域全称+区域码+邮政编码+编码级次相关数据流：产品名称、销售组织名称相关处理逻辑：产品管理、销售组织管理图 3-6 区域信息描述3.4.3 数据流描述数据流由一个或一组固定的数据项组成。可以是一个已定义的数据结构,也可以由若干数据项、简单的数据结构和复杂的数据结构组成3。图 3-7 为反馈信息的数据流描述。数据流编号：SJL-01数据流名称：市场反馈信息数据流来源：反馈信息模块数

21、据流去向：管理员数据流量：5 份/天高峰流通量：20 份/天图 3-7 反馈信息描述4 系统设计4.1 系统平台设计系统平台设计是根据新系统的目标,在各种技术手段和实施方法中选择适当的系统物理配置方案,以满足新系统逻辑模型的需要和技术需求3。营销管理系统主要的开发及运行环境有以下几点：系统开发平台为 Visual Basic 6.0；数据库管理平台为 SQLServer 2000；运行平台为 Windows XP/Windows 2000/Windows 7。4.2 系统总体结构设计系统的总体结构设计,是指在系统分析的基础上,对整个系统在结构上的划分,硬软件环境的配置和确定子系统与模块的处理流

22、程,对新系统的总体结构型和可利用的资源进行宏观设计3。根据营销系统不同的功能需求,可把系统划分为七个模块：基础资料管理、销售组织、市场管理、销售业务管理、销售分析、系统管理、辅助工具。4.2.1 系统功能结构设计系统的功能结构设计是根据系统所具备的功能来绘制出系统的功能图。系统的功能图主要用来描述系统的功能块,说明参与者和功能之间的关系3。图4-1 是根据系统的数据流程设计出的系统功能结构图。4.2.2 主要模块说明模块是指可以组合、更换和分解的单元,是组成系统,便于处理的基本单元3。上节的系统功能结构图给出了各个模块的基本功能。表 4-1,表 4-2 分别为 产品管理模块,区域管理模块的说明

23、书。营销管理信息系统 基础资料管理销售组织销售分析系统管理辅助工具市场管理销售业务管理区区域域管管理理产产品品管管理理销销售售训训练练项项目目设设置置销销售售考考核核指指标标设设置置销销售售组组织织销销售售训训练练销销售售业业绩绩考考核核业业务务员员管管理理市市场场反反馈馈市市场场走走势势市市场场跟跟踪踪销销售售数数据据导导入入销销售售数数据据录录入入销销售售预预测测年年销销售售计计划划月月销销售售分分析析 季季销销售售分分析析年年销销售售分分析析用用户户管管理理数数据据初初始始化化密密码码修修改改帮帮助助关关于于图 4-1 系统功能结构图表 4-1 产品模块说明书模块标识JCZL01所属子模

24、块基础资料管理模块名称产品管理主要功能管理员可对产品信息进行增删查改调用模块被调用模块市场跟踪、市场走势输入选择产品规格输出产品单价相关数据表区域表、业务员表算法根据产品销售情况,添加相关产品信息设计者： 鹏 设计日期：2010-5-15 版本：表 4-2 区域模块说明书模块标识JCZL02所属子模块基础资料管理模块名称区域管理主要功能管理员可对区域信息进行增删查改调用模块被调用模块销售组织、市场反馈、市场走势输入选择区域名输出区域编号、区域名称、区域码相关数据表产品信息表、销售组织表算法根据产品销售情况,添加相关产品信息。设计者： 鹏 设计日期：2010-5-15 版本：4.3 数据库设计数

25、据库设计在信息系统的设计过程中占有重要地位,其结构设计的好坏会影响系统运行的效率的高低和实现效果的好坏。合理的数据库结构设计可以提高数据库存储的效率,保证数据的完整性和一致性3。4.3.1 数据库概念结构设计根据数据库设计的要求,需要设计出满足要求的各种实体以及他们之间的关系3。这些实体包括销售组织、销售区域、产品,业务员等。图 4-2 为主要实体之间关系的 E-R 图。销售组织业务员产品销售区域1区域编号本级编号产品编号编码级次邮政编码区域码区域全称区域名称联系电话身份证号性别姓名编号单价品名规格备注单位联系地址登记日期其他联系方式备注手机号码属于NN销售NN属于N1所在区域电话E-mail

26、邮编简介地址核心产品名称编号负责人销售排名成立日期备注产品规格品名规格单价单位月销量月销售额销售组织编号销售组织名称所在区域单据号所在月份录入日期图 4-2 主要实体之间关系的 E-R 图4.3.2 数据库表设计关系模型的逻辑结构式一组关系模式的集合,所以将 E-R 图转换为关系模型实际就是要将实体、实体的属性和实体之间的联系转换为关系模式3。以下为各个数据库表的详细结构。表 4-3 产品信息表字段名数据类型长度可否为空主键/外键产品编号varchar5N主键品名规格varchar50N单位varchar10Y单价decimal6N备注text16Y表 4-4 业务员表t_ywy 表字段名数据

27、类型长度可否为空主键/外键编号varchar4N主键varchar10N性别char2N号char18N联系varchar20N手机varchar11N其他联系方式varchar40Yvarchar50N备注varchar50Y登记日期datetime10N表 4-5 区域表字段名数据类型长度可否为空主键/外键区域编号varchar10N主键本级编号varchar10N区域编号varchar20N区域全称varchar50N区域码varchar5Y邮政编码varchar10Y编码级次int10N表 4-6 市场反馈表字段名数据类型长度可否为空主键/外键IDint10N主键业务员编号varcha

28、r4N主键业务员名称varchar20N反馈项目varchar200N反馈容varchar200N反馈时间datetime10N所属区域varchar20N区域负责人varchar10N表 4-7 市场跟踪表字段名数据类型长度可否为空主键/外键IDint8N主键品名规格varchar200N市场价格money4N市场信息text16N备注text16Y跟踪日期datetime10N跟踪人varchar10N录入日期datetime10N表 4-8 考核指标表字段名数据类型长度可否为空主键/外键IDint8N主键考核指标varchar20N表 4-9 训练项目表字段名数据类型长度可否为空主键/外

29、键IDint10N 主键训练项目varchar50N表 4-10 销售组织表字段名数据类型长度可否为空主键/外键编号varchar5N主键名称varchar50N负责人varchar10N所在区域varchar200N地址varchar50Yvarchar30YEmailvarchar40Yvarchar10Y表 4-11 销售考核表字段名数据类型长度可否为空主键/外键IDint8N主键业务员编号varchar4N主键业务员varchar10N考核指标varchar20N完成率varchar10N分数varchar9N年度varchar10N考核日期datetime10Y表 4-12 销售表字

30、段名数据类型长度可否为空主键/外键产品编号varchar5N主键品名规格varchar200N单位varchar10Y单价decimal6N月销量numeric9N月销售额money8N销售组织编号varchar5Y销售组织名称varchar50N所在区域varchar200Y单据号varchar30N所在月份varchar10N录入日期datetime10Y表 5-13 销售计划表字段名数据类型长度可否为空主键/外键IDint10N主键品名规格varchar200N计划销量varchar50N计划销售额money50N销售区域varchar200N计划年份varchar10N单据号varch

31、ar30N表 5-14 销售训练表字段名数据类型长度可否为空主键/外键IDint10N主键业务员编号varchar4N主键业务员varchar20N训练项目varchar50N时数int50N开始时间datetime10Y结束时间datetime10Y成绩varchar10N表 4-15 预测表字段名数据类型长度可否为空主键/外键IDint8N主键产品编号varchar5N主键品名规格varchar200N预测年销量numeric9N预测年销售额money8N固定增长率varchar10N预测日期datetime10N5 系统实施系统实施是系统开发的重要一环,在开发团队中,这一环主要由程序员完

32、成。它是将系统设计的方案转化为实在的系统,通过程序设计、测试、调试等工作,让实现的系统满足前期设计的要求。5.1 主要功能界面设计界面设计是系统实施中的重要组成部分,针对系统的功能结构设计,并结合系统亮点,以下选取市场走势界面,数据导入界面,销售预测界面进行界面设计说明。5.1.1 市场走势界面设计市场走势模块主要是实现对产品价格走势的描述功能。它需要市场跟踪模块提供近几个月来市面上同类产品的价格信息,然后方能描述产品的价格走势。图 5-1 为市场走势的效果图。图 5-1 市场走势效果图市场走势模块代码：Dim rs1 As New ADODB.RecordsetPublic cp As St

33、ringPrivate Sub Form_Load For i = 1 To MSChart1.RowCount MSChart1.Row = i: MSChart1.RowLabel = i & 月 Next i Me.Caption = text rs1.Open select 市场价格,跟踪月份 from 市场跟踪表 where 品名规格= + cp + order by 跟踪月份, Cnn, adOpenKeyset, adLockOptimistic If rs1.RecordCount 0 Then rs1.MoveLast rs1.MoveFirst nums = rs1.Rec

34、ordCount Radium arrValues For i = 1 To nums arrValues = & rs1!跟踪月份 arrValues = rs1!市场价格 rs1.MoveNext Next i MSChart1.ChartData = arrValues End If rs1.Close MSChart1.Title = & cp & 市场价格走势图 End Sub5.1.2 数据导入界面设计销售数据导入模块主要是与 Excel 表的进行对接,实现从 Excel 表向数据库表中导入数据。5-2 为导入销售数据的效果图。图 5-2 销售数据导入效果图销售数据导入模块代码：D

35、im newxls As Excel.ApplicationDim newbook As Excel.WorkbookDim newsheet As Excel.WorksheetPrivate Sub Label3_Click Set newxls = CreateObject If Option1.Value = True Then xstb = 销售表 Else xstb = 销售计划表 End If Set newbook = newxls.Workbooks.Open newxls.Visible = TrueEnd SubPrivate Sub Command1_Click Com

36、monDialog1.ShowOpen CommonDialog1.Filter = Excel 文件|*.xls Text1 = CommonDialog1.FileNameEnd SubPrivate Sub Command2_Click If Option1.Value = True Then xstb = 销售表 Else xstb = 销售计划表 End If Text2 = 正在导入数据. Set newxls = CreateObject Set newbook = newxls.Workbooks.Open Set newsheet = newbook.Worksheets M

37、e.Enabled = False rs1.Open xstb, Cnn, adOpenKeyset, adLockOptimistic intOr = rs1.RecordCount For r = 2 To 2000 If newsheet.Cells Then rs1.AddNew For c = 1 To rs1.Fields.Count - 2 rs1.Fields = newsheet.Cells Next c rs1.Update intNew = intNew + 1 End If Next r rs1.Close newxls.Quit Text2 = Text2 & Chr

38、 & Chr & 共成功导入 & intNew & 条数据。 Me.Enabled = TrueEnd Sub5.1.3 销售预测界面设计销售预测主要是根据某个产品前一段时期的销售情况来绘制出其销售额的走势图,同时采用加权平均法和简单平均法分别计算出下一期的销售额,预测值与实际值进行比对分析之后,发现采用加权平均法进行预测更为科学,得到的预测值更接近实际的销售额。图 5-3 为销售预测界面效果图。图 5-3 销售预测界面效果图预测功能主要代码如下：Dim rs1 As New ADODB.RecordsetDim i As IntegerDim k As LongDim sum, A, j A

39、s Long sum 为每月销售额*权值 ,A 记录每月销售额,J 每月的权值Private Sub Command1_Click 按加权平均法预测下个月的销售额 If Text1.text = And Text1.text = And Text1.text = And Text1.text = And Text1.text = And Text1.text = _ And Text1.text = And Text1.text = And Text1.text = And Text1.text = And Text1.text = And Text1.text = Then MsgBox 至

40、少提供两个月的销售额！, , 提示！ Text1.text = 0 End If For i = 0 To 6 A = ValText1.text text 数组控件传递每月销售额的值 Next i For i = 0 To 6 sum = ValText1.text * ValText2.text Next i Text1.text = sum + sum + sum + sum + sum + sum + sum End SubPrivate Sub Command6_Click 按简单平均法预测 If Text3.text = And Text3.text = And Text3.tex

41、t = And Text3.text = And Text3.text = And Text3.text = _ And Text3.text = And Text3.text = And Text3.text = And Text3.text = And Text3.text = And Text3.text = Then MsgBox 至少提供两个月的销售额！, , 提示！ Text1.text = 0 End If For i = 0 To 6 A = ValText3.text Next i k = A + A + A + A + A + A + A Text3.text = k /

42、7End Sub5.2 系统管理功能设计系统管理设计的一个重要模块,它负责管理系统操作员的账号和密码,设置他们的管理权限,让系统操作员根据他们所具备的管理权限来管理相应的模块。同时此模块具备让初始化数据库表的功能,这样,方面管理员更新数据库表中的数据。图 5-4,图 5-5 分别为用户管理、数据初始化的效果图。图 5-4 用户管理效果图图 5-5 数据初始化效果图用户管理的主要代码：Dim rs1 As New ADODB.RecordsetDim i As IntegerPrivate Sub form_load Me.Caption = text rs1.Open 权限信息表, Cnn,

43、adOpenKeyset, adLockOptimistic For i = 0 To Check1.UBound Check1.Caption = rs1.Fields.Name Next i rs1.Close Set rs1 = Nothing DataList1.text = ado1.Recordset.Fields DataList1_ClickEnd SubPrivate Sub Command3_Click 为操作员设置权限 For i = 0 To Check1.UBound If Check1.Value = 1 Then Cnn.Execute update 权限信息表

44、set & Check1.Caption & =1 where 操作员= + DataList1.BoundText + Else Cnn.Execute update 权限信息表 set & Check1.Caption & =0 where 操作员= + DataList1.BoundText + End If Next i Unload MeEnd Sub初始化功能的设计代码：Dim i As IntegerPrivate Sub form_load Me.Caption = text Dim rstSchema As ADODB.Recordset Set rstSchema = Cn

45、n.OpenSchema Do Until rstSchema.EOFIf left sys and Left dtp then List1.AddItem rstSchema!TABLE_NAME End If rstSchema.MoveNextLoop rstSchema.CloseEnd SubPrivate Sub cmdDel_Click 清除所选表中数据 Dim Counter As Integer 定义一个整型变量 Dim Workarea As String 定义字符串变量 ProgressBar1.Visible = True ProgressBar1.Max = UBou

46、nd ProgressBar1.Min = LBound 设置进度的值为 Min ProgressBar1.Value = ProgressBar1.Min 在整个数组中循环 For Counter = LBound To UBound 设置数组中每项的初始值 Workarea = Counter ProgressBar1.Value = Counter For i = 0 To List1.ListCount - 1 If List1.Selected = True Then Cnn.Execute delete from & List1.List End If Next i Next Co

47、unter ProgressBar1.Visible = False ProgressBar1.Value = ProgressBar1.MinEnd Sub6 总结与展望6.1 课题总结根据中小型企业的发展状况,在研究销售部门的业务情况和时间序列法、一元线性回归分析法等理论的前提下,使用 ADO 数据库连接方式,在 Visual Basic 6.0 开发环境下,采用 C/S 开发模式设计并实施企业营销管理系统。系统主要实现的功能是产品、业务员、销售数据的录入、修改、查询；系统管理员对用户的管理；产品的市场走势,销售数据的预测等。课题的收获是：在 Visual Basic 6.0 开发环境下,

48、采用传统的二层 C/S 架构开发,充分利用其开发周期短的优势,设计出适合中小型企业营销部门的管理系统,开发界面友好,体现了人性化的管理理念。同时,结合时间序列法、一元线性回归分析法实现了对产品走势和销售预测的功能,基本达到预期的研究目标。随着信息技术的深入,企业信息化的速度定会加快,对中小型企业而言,实现信息化管理显得尤为重要,对数据进行分析可以帮助企业高层做出合理决策。由于销售部门在企业业务管理中的重要地位,采用营销系统对销售业务及销售人员进行管理更为必要,能更方便、高效地处理营销业务。6.2 课题展望基于各种原因,在进行系统分析之时,没有过多地考虑企业营销部门的功能结构,进行预测方面的设计时,相关理论并没有很好地运用到系统中,因此,课题还可进行以下研究：进一步规营销业务流程,可考虑用其它较为主流的编程工具实现系统；结合企业实际,运用更为完善的预测算法进行销售预测,并根据预测结果对预测的变量和因变量的相关性进行深层次的分析。