毕业设计(论文)VFP音像租赁管理系统.doc

上传人:laozhun 文档编号:3977251 上传时间:2023-03-30 格式:DOC 页数:46 大小:895.50KB
返回 下载 相关 举报
毕业设计(论文)VFP音像租赁管理系统.doc_第1页
第1页 / 共46页
毕业设计(论文)VFP音像租赁管理系统.doc_第2页
第2页 / 共46页
毕业设计(论文)VFP音像租赁管理系统.doc_第3页
第3页 / 共46页
毕业设计(论文)VFP音像租赁管理系统.doc_第4页
第4页 / 共46页
毕业设计(论文)VFP音像租赁管理系统.doc_第5页
第5页 / 共46页
点击查看更多>>
资源描述

《毕业设计(论文)VFP音像租赁管理系统.doc》由会员分享,可在线阅读,更多相关《毕业设计(论文)VFP音像租赁管理系统.doc(46页珍藏版)》请在三一办公上搜索。

1、毕业设计(论文)说明书作 学 号: 学院(系): 计算机工程系 专 业: 计算机应用与维护 题 目: 音像租赁管理系统 主 题: 指导教师: 职称: 教授 2006年5月摘要 随着科学技术的飞速发展,计算机科学日臻成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。音像租借管理系统是市场经济条件下,一些大众传播媒介和商家不可缺少的部分,它的内容不论对于媒介和商家的管理者,还是对于用户来说都至关重要。本系统本着服务大众的思想,从符合操作简便、界面友好、灵活、实用、安全的要求出发,完成音像租借管理中包括音像信息、客户信息的建立,租借、归还处理的记录,音像、客户的

2、新增以及相关数据的统计、查询、修改等音像租借管理的全过程的工作。租赁时分为会员租赁与零租以方便管理。总之,该系统对音像制品的租赁管理实现了规范化,非常适合于中小型音像租赁店的日常工作管理。关键字:音像租赁管理系统,ViusualFoxPro98,租借和归还操作 【summary】Fly technically to develop soon along with science, the calculator science day attains mature, it the strong function has already been people deep understanding

3、, it has already got into each realm of the society of mankind to erupt to flick a more and more important function.Sounds ising like lease to manage system is under market economy condition, the part of some mass communications medias and companys house indispensability, its contents in spite of fo

4、r the governor of the medium and companys house, still for the customer say all go to close importance.This system is in the light of with hour accompany enter of policy, from match operation simple, interface amity, vivid, practical, safety of the request set out, completing a sound to be like leas

5、e to manage medium include the establishment that the sound is like an information, customers information, lease, return a processed record, the sound is like, the customer add and the covariance, search, modification of the related data etc. the sound is like the work of the whole processeses ofwit

6、h lend-lease management.Is divided into a member to lease while leasing with zero rent to manage by convenience.In a word, that system was like the leasing management of ware to carry out norm to turn to the sound, very suitable for medium the small scaled sound is like a daily pursuit management of

7、 leasing the store.【Keyword 】The sound is like the system, ViusualFoxPro98 of the leasing management, leasing and returning an operation目录摘要Summauy.2第一章: 引言.5第二章: 研究现状及设计目标.72.1开发一个音像租赁系统的重要性.7 2.2本课题要达到的设计目标.82.3本人所做的工作.8第三章: 要解决的几个关键问题.93.1现实音像管理存在的问题.93.2具体实现中采用的关键技术用复杂性分析.9第四章: 系统结构与模型.94.1 设计实现

8、的策略.114.2 程序流程.114.3 数据流程图.124.4 数据库技术.17第五章: 系统实现技术.195.1分模块详述系统各部分的实现方法.20第六章: 性能测试与分析.416.1测试实例(测试集)的研究与选择416.2发测试环境与测试条件.416.3实例测试44第七章: 结束语.45第八章:致谢46第九章: 参考文献.46引言音像租赁管理系统是专门为各类光盘出租店铺设计服务的,是音像店不可缺少的一部分。本系统具有界面清晰、操作简易、存储数据安全性高等特点,考虑到人们的一些操作习惯,提高了其的可操作性,完全能够满足你的需求。这是一款针对中小音像租赁店设计的程序。有了它,您可以轻松管理您

9、的音像数据库,方便的进行交易管理,灵活的搜索和查询功能使您完全摆脱传统管理模式下经营者面对庞大的音像制品库,不知道自己有哪些音像制品,租出多少,还存多少;解决顾客面对长长的音像目录,很难找到自己要找的影片的弊端。从经济利益上讲,现今社会,时间就是金钱,浪费大量的时间等于一个企业减少了在社会大潮中竞争的力量,这也是和经济利益挂钩的。随着科学技术的不断提高,计算机科学的日渐成熟,计算机的强大功能已被人们深刻地认识,它已经和现代社会的发展隔离不开了。越来越多的人用计算机来处理日常事务,使计算机的应用得到普及,这样就创造出以计算机为基础的一系列生活方式。不仅如此,计算机还被广泛的应用到商业上,越来越多

10、的人们意识到计算机给自己带来的方便以及他所创造的巨大财富。人们开始把计算机应用到现代的各个领域中,可以不客气地说,现代社会是一个计算机时代,如果没有计算机的应用,我们的发展就不会如此之快!作为计算机应用的一部分,使用计算机对音像商品租赁等各项操作进行管理,具有手工管理所无法比拟的优点,其优势已非常明显。例如:查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大的提高租赁操作的效率,节省了很大一部分时间,大大增强了企业的竞争能力,也是标志着一个企业的科学化、正规化管理,与世界接轨的重要条件。本系统本着实际、实用的原则,在系统界面开发上追求操作简便、灵活、实用、安全等特点,完

11、成音像租借管理中包括音像信息的添加和删除、客户信息添加、删除及会员管理,音像的租借、归还以及相关数据的统计、查询、修改等全过程的工作。租赁时分为会员租赁与零租以适合用户的长期发展要求。总之,该系统对音像制品的租赁管理实现了规范化,非常适合于中小型音像租赁店的日常工作管理。本系统的用户界面十分简洁、实用,系统编制过程中充分考虑了计算机的优越性,对于不是计算机专业的人员来说,只要阅读了操作说明书,也可以很方便的进入系统和使用本系统提供的功能。 在开发方法的选择上,选择了面向对象的方法,遵循系统调查研究、系统分析、系统设计和系统实施四个主要阶段进行设计,而在具体的设计上,采取了模块化设计方案,先根据

12、客户需要加以分析,大体设计出几大块功能,然后对于其细节进行细划,力求每个模块的功能得以完全实现并且便于客户理解和操作。任何一个系统都是在不断的发展中完善的,本系统也不例外,所以这套音像管理系统是在参阅了一些原有设计的基础上进行的从新整合与设计,在系统设计完成后征求了部分客户的意见并进行了试运行,获得了大家的认可。在开发工具的选择上,本系统利用VFP98的编程语言进行开发,鉴于专业的限制,充分考虑到业余爱好及专业所长,最后决定使用VF进行设计。另一方面,VFP为数据库结构和应用程序的开发提供了功能强大的面向对象的设计环境。无论是组织信息,运行查询,创建集成的关系型数据库系统,还是为终端用户编写功

13、能全面的数据管理应用程序,VFP都可以提供管理数据所需的所有工具。使用其自带的数据库,保证了数据的完整性与一致性。 第二章: 研究现状及设计目标2.1开发一个音像租赁系统的重要性1.音像租赁的发展现状以前大多数管理者管理光盘的时候都是使用人工的方式来管理,一开始的时候大家都觉得没有问题,还都可以应付得过来。可是随着光盘的增多,经营业务也不断得增加,便使得经营者不得不雇越来越多的店员来管理这些事务,这样作得代价毫无疑问是成本的增加,这也是经营者迫切需要解决的问题。目前也有类似系统在使用,但很多都存在着一定的问题,比如要么功能过于简单不能满足客户的需要,要么有的系统过于追求全面,提高价值,其功能累

14、赘,界面过于烦琐,让使用着感觉不太如意,而本系统本着简单实用的原则,在界面和功能上力求简洁、美观、实用,是各音像管理店面的理想使用版本。2. 计算机已经成为我们学习和工作的得力助手:今天,计算机的价格已经十分的低廉, 性能却有了长足的进步.它已经被应用于许多的领域,计算机之所以如此的流行的主要原因在于以下的几个方面 :首先 计算机可以代替人工记忆许多的繁杂的劳动。其次 计算机可以节省许多的资源。第三 计算机可以大大的提高人们的工作效率。第四 计算机可以使敏感文档更加的安全 ,等等。3. 用计算机管理音像租赁系统的意义。 现在我国很多商业管理水平还停留在人工管理的基础上,这样的机制已经不能适合现

15、代的发展,因为他浪费了许多人力和物力,在信息时代这种的系统的管理方法必然被计算机为基础的信息管理所替代。 这套音像租赁管理系统,可以让音像管理者从烦琐的记录和统计中解脱出来,尽情享受生活,同时也可以让他们更多的了解计算机,学会使用计算机处理日常事物,提高劳动生产率。4 对于音像租赁管理系统的好处可归纳以下几点: (1) 方便管理,使原来烦琐的音像管理工作变的简单有趣。(2) 增加效益,使用计算机进行音像信息的管理,节余了大量用户时间,是用户在相同的时间内可以完成更多的工作量。(3) 节省投资,使用本系统可以实现无纸化管理,节约了大量纸介费用。2.2本课题要达到的设计目标 音像商店的管理者使用本

16、系统进行管理,能够使用户感到方便,系统操作简单,功能基本符合其管理要求,方便的计算租金、了解租用情况、了解客户情况,了解片碟的库存情况等,以全面提升商店的竞争力。 同时本系统还要求查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大的提高租赁操作的效率,节省了很大一部分时间,相对而言增加音像商店的管理者收益。2.3本人所做的工作由于时间仓促,系统设计量大,故本系统是由两人合作而成,本人在此系统中的所做仅包含以下四个模块:1.封面的制作,提供用户进入及退出本系统。2.登陆界面的制作,该界面提供验证用户密码及权限的功能,用户通过验证后可以登陆本系统,实现权限内的操作。3.实现

17、客户信息管理,包括浏览客户信息、添加客户信息和会员交费功能。4.实现音像信息信息管理,包括浏览音像信息、租借归还和添加新音像功能。余下的皆由与我合作的另一位同学制作和编写。对于上述四个模块,不足之处恳请给予指导和批评,本人将尽力更改。第三章: 要解决的几个关键问题3.1现实音像管理存在的问题由于商店未采用自动化管理,工作人员往往对光盘库存的情况不甚了解,有时为了查找顾客需要的某类光盘在上万册的光盘中寻找,却发现已经销售或者出租完,无功而返,或者在数百页的登记册中查找租借记录,非常吃力。而各部门之间信息也不能及时沟通,在工作上也带来了诸多不便。通过分析可以发现,现行系统存在的问题,主要是由于传统

18、的手工操作方难以满足当前大量业务操作需求而引起的。另外,传统手工操作方法的低效、易出错以及当前没有一种比较适合用户需求的管理系统出现导致了许多中小型音像管理店面任然处在这种原始的管理阶段。不仅浪费了大量人力物力,更重要的是生产力的落后而直接导致经济的滞后。3.2研究设计中要解决的问题 在进行本系统的设计时,要考虑解决以下几个问题: 1.充分发挥计算机的快速计算优势,让用户的查询即时显示结果,并保证结果符合要求,用户可以方便的理解和记忆。 2.创建信息数据库,解决因纸介问题造成的查询移动困难问题,并保证数据库符合用户要求,管理和查询方便。3.保证系统安全性,不同的客户登陆要求其权限有所差别。以次

19、来实现信息的安全性。4 系统各界面美观,用户观看和理解容易,便于管理及维护。 4 有直接的修改界面,便于管理员进行管理。3.2具体实现中采用的关键技术及复杂性分析 实现本系统需要的关键技术: 1 要有一定的VFP使用能力,了解各项控件的使用及熟悉VFP的语法使用规则,可以用其实现各种功能。 2 熟悉数据库与表单各控件的连接,使表单控件可以按要求显示数据库中的各项数据。 3 熟悉系统的连编过程,了解对各种错误的处理方法并最终编译出要求的应用程序。 3.3 数据库技术 数据库研究跨越于计算机应用、系统软件和理论三个领域,其中应用促进新系统的研制开发,新系统带来新的理论研究,而理论研究又对前两个领域

20、起着指导作用。数据库系统的出现是计算机应用的一个里程牌,它使得计算机应用从以科学计算为主转向以数据处理为主,并从而使计算机得以在各行各业乃至家庭普遍使用。在它之前的文件系统虽然也能处理持久数据,但是文件系统不提供对任意部分数据的快速访问,而这对数据量不断增大的应用来说是至关重要的。为了实现对任意部分数据的快速访问,就要研究许多优化技术。这些优化技术往往很复杂,是普通用户难以实现的,所以就由系统软件(数据库管理系统)来完成,而提供给用户的是简单易用的数据库语言。由于对数据库的操作都由数据库管理系统完成,所以数据库就可以独立于具体的应用程序而存在,从而数据库又可以为多个用户所共享。因此,数据的独立

21、性和共享性是数据库系统的重要特征。数据共享节省了大量人力物力,为数据库系统的广泛应用奠定了基础。数据库系统的出现使得普通用户能够方便地将日常数据存入计算机并在需要的时候快速访问它们,从而使计算机走出科研机构进入各行各业、进人家庭。第四章: 系统结构与模型4.1设计实现的策略 本系统的实现,主要经历了以下步骤: 1 粗略规划各模块功能,设计草图 2 根据模块设置各具体功能,设计出系统界面 3 根据功能编写个功能代码,并根据实际情况修改界面 4 简单测试各功能块的运行状况,适当增加模块。 5 运行整个系统,修改系统漏洞及错误。 6 连编系统。4.2 程序流程421 功能层次图客户信息管理音像信息管

22、理租借归还管理数据统计管理管理维护管理归还修改客户数据租借情况统计排行榜汇总统计添加新音像查找并选片音像详细信息会员交费给新客户注册浏览客户记录修改音像数据修改个人密码修改密码权限影像租赁管理系统登陆43 数据流程图:4.3.1数据流第一层图数据流顶层图比较概括,没能很好地反映出系统的详细业务,因此进行进一步的详细扩展,形成数据流第一层图如下图的各个子图所示。整个系统包括了音像管理、客户管理、操作员管理、日常操作、查询和统计共六个加工部分,每个部分包含了各个业务部门以及与之相关的外部项、数据库之间的业务数据来源和去处。员工添加音像修改音像删除音像查询音像音像数据库音像管理模块 第一层图本流程图

23、解释了员工对音像数据库的操作过程,包括员工添加音像到数据库;从音像数据库中调出音像资料进行修改或删除;对音像数据库进行查询操作。本流程图解释了员工对客户信息数据库的操作过程,包括员工添加会员信息到客户信息数据库;从客户信息数据库中调出信息进行修改了删除;对客户信息数据库进行查询。员工出租音像归还音像音像数据库音像数据库日常操作图 第一层图此流程图解释了员工的日常操作过程,包括出租音像和归还音像的过程,在此过程中都要对音像数据库进行操作,并要求系统对此信息做好记录。员工顾客采购员负责人查询模块统计模块音像数据库客户信息库其他模块 第一层图此流程图解释了本系统的其他功能模块,这些功能是系统初始化的

24、条件以及为该项业务的发展规划提供数据基础。4.3.2 数据流第二层图继续细化,得到各个模块的数据流第二层图。下图表示的是音像管理模块的四个子模块的数据流第二层图。操作员管理模块的四个子模块数据流第二层图与客户管理的子模块一一对应,只是数据流的组成有所差异(名字、密码、权限),在此不再赘述。所有模块的数据流第二层图中包括了详细的数据流组成要素以及具体流向等,具有很好的自明性,在此不再进行解释和说明。音像资料表添加音像资料修改音像资料会员资料表添加客户资料修改音像资料对音像资料表进行操作 第二层图对客户资料表进行操作 第二层图4.3.3 数据流表数据流系统名:音像租赁管理系统编号:条目名:入库光盘

25、信息别名:无来源:添加光盘存储处:音像数据库数据流结构:入库信息=音像编号,影片类型,影片语言,影片名称,导演,发行年度,影片介绍,应收押金,日租价格,过期扣款,影片主角 流量:约100/每月简要说明:入库信息是新购买光盘入库时的相关信息。修改记录:编写: 日期:2006.05审核: 日期:2006.054.3.4 数据存储表数据存储系统名:音像租赁管理系统编号:条目名:光盘信息库别名: 无存储组织:记录数:无限制主关键字:音像编号二维表数据量:约100KB辅关键字:无记录组成:音像编号,影片类型,影片语言,影片名称,导演,发行年度,影片介绍,应收押金,日租价格,过期扣款,影片主角 简要说明:

26、存放库存光盘的相关信息修改记录:编写: 日期:2006.05审核: 日期:2006.054.3.5 数据加工表数据加工系统名:音像租赁管理系统编号:条目名:新光盘入库别名: 无输入:音像编号,影片类型,影片语言,影片名称,导演,发行年度,影片介绍,应收押金,日租价格,过期扣款,影片主角输出:添加是否成功加工逻辑:在光盘信息库中添加一条记录,将输入的新光盘信息对应保存。简要说明:用于记录添加新的光盘到库存中。修改记录:编写: 日期:2006.05审核: 日期:2006.054.4 系统数据库表 表1:密码表 本表为客户登陆密码表,客户在登陆界面登陆时,系统会查询该表,验证该用户是否存在以及是否具

27、有一些修改权限。 表2:客户表 本表为客户信息注册表,用于管理客户信息,只要用于实现音像借出的安全性,同时便于准确统计客户信息,为未来发展方向做好铺垫。 表3:音像表 本表为音像数据表,只要用于了解店面的所有音像,便于进货管理,同时可提供查询,便于准确了解该音像是否到位。表4:交费表 交费表的作用主要是用来记录会员交费情况,并以次判断客户信誉度,是否给予会员待遇及优惠等。第五章: 系统实现技术 本系统的实现主要运用了数据库为核心,在数据库管理系统的支持下,进行信息的收集、整理、存储、检索、更新、加工、统计和传播等操作。对于数据库应用开发人员来说,为使现实世界的信息流计算机化,并对计算机话的信息

28、进行各种操作,就是如何利用数据库管理系统、系统软件和相关硬件系统,将用户的要求转化成有效的数据结构,并使数据库结构易于实现用户新的要求的过程。 确切的说,数据库设计是指对于一个给定的应用环境,提供一个确定最优数据模型与处理模式的逻辑设计,以及一个确定数据库存储结构与存取方法的物理设计,建立起既能反映现实世界信息和信息联系,满足用户数据要求和加工要求,有能被某个数据库管理系统所接受,同时能实现系统目标,并有效存取数据的数据库。5.1分模块详述系统各部分的实现方法本系统主要实现以下管理功能:客户信息管理,音像信息管理,租借/归还管理,数据统计管理,管理维护管理等等。下面分别介绍一下这些功能模块。5

29、11用户信息管理该模块主要包括客户登陆,客户信息(浏览客户记录,给新客户注册,会员交费)5111 本界面为音像租赁管理系统的封面设计,它会在用户打开系统的时候出现,主要起系统引导作用,若用户为系统合法用户,可以单击“进入系统”打开验证密码窗口,若用户不想使用该系统,可以直接单击“退出系统”来取消该程序的运行。音像租赁管理系统的封面代码如下:Timer1-initpublic jj=0thisform.label3.visible=.f.thisform.label4.visible=.f.&定义标签3和标签4为不可见 定义公共变量j,初始值为0Timer1-timerif j%20thisfo

30、rm.label3.visible=.t.thisform.label4.visible=.t.j=j+1elsethisform.label3.visible=.f.thisform.label4.visible=.f.j=j+1endif&定义计数器j,使其是奇数时标签3和标签4可 见,偶数时不可见,从而实现其闪烁的效果。Command1-clickdo form 密码.scx&单击按纽“进入系统”时调用密码表单验证用户是否合法及其权限。Command2-clickthisform.release&释放表单“封面”5112 本界面为客户登陆,需要用户输入正确的用户名和密码,才能进入本系统。

31、该页面提供用户登陆功能,用户在运行该系统时,先在此界面中输入管理员设定的用户密码,系统开始查询用户登陆表,若验证正确,将会引导用户进入使用界面,若用户权限为超级用户(即系统管理员)则还可以进行系统管理。输入密码的代码如下:-loadSELE 1USE 密码 &在第一工作区打开表“密码”-initThisform.text1.SetFocus()Thisform.text1.passwordchar=*&设置text1在初始化时其占位符用“*”代替,并拥有焦点。Option1-clickPUBLIC M.权限,M.密码sele 1SET EXAC ONLOCA FOR 密码=ALLTRIM(Th

32、isform.text1.Value)IF FOUND() M.密码=密码M.权限=权限do form 主窗口thisform.releaseELSE Thisform.text1.passwordchar= Thisform.text1.Value=密码错误! A=INKEY(1) Thisform.text1.Value= THISFORM.OPTIONGROUP1.VALUE=0 Thisform.text1.SetFocus() Thisform.text1.passwordchar=*ENDIF &定义公共变量 M.权限,M.密码,查询密码表,若找到该用户,记录其密码及权限,调用主窗

33、口,释放该表单。Option2-clickThisform.Release()& 关闭本表单512客户信息(浏览客户记录,给新客户注册,会员交费)5121 本界面为浏览客户记录界面,用户可以通过此界面来浏览在本系统里注册过的用户,通过按钮“上行”,“下行”来实现上下记录翻动,“首行”“末行”用来直接定位客户记录的第一条和最后一条记录。查询完毕通过按纽“返回”到达主界面。同时用户还可以通过该界面上的“查找用户”按钮来快速查询某个用户的信息,充分体现了计算机处理数据快速的特点。浏览客户记录的代码如下:-loaduse 客户&打开表“客户”-initpublic m.no1m.no1=1&定义m.n

34、o1,初始值为1-activego m.no1thisform.refresh&数据指针定义在记录15122 本界面是给新客户注册。用户单击按纽“新客户注册”,表单个控件变为可用,用户可以填写客户的具体信息,填写完毕后单击“保存”,填写的数据将会被保存到客户信息表中。在填写过程中若出错,可以单击“取消”来清空各控件已填内容。同时本表提供租借证的浏览功能,注册好的用户若需办理租借证,可以直接单击按纽“浏览租借证”。给新客户注册的代码如下:-loadsele 1set safe offuse khtempZAPsele 2use 客户&在1工作区中使用表“khtemp”并清除其所有记录 在2工作区

35、中使用表“客户”-initmand2.enabled=.f.mand3.enabled=.f.mand4.enabled=.f.&设置命令按纽2,3,4不可用Command1-clickmand3.enabled=.t.mand2.enabled=.t.mand1.enabled=.f.Thisform.txt客户姓名.SetFocus()SELE 2K=RECC()sele 1append blankrepl 客户编号 with right(00000+ALLTRIM(str(K+1),6)thisform.refresh&记录当前记录号,添加新记录command2-clickif empt

36、y(thisform.txt客户姓名.value) or empty(thisform.txt身份证号.value) or empty(thisform.txt联系方式.value)messagebox(你输入的信息不完整,系统将不予提交!,0+48,提示)elseUSE IN 1SELE 2appe from khtempK=RECC()sele 1use khtempset safe offzap appe blankrepl 客户编号 with right(00000+ALLTRIM(str(K+1),6)thisform.refreshmand2.enabled=.f.mand3.en

37、abled=.t.endif&验证客户姓名,身份证号及联系方式是否为空,输出提示信息。从临时表“khtemp”中添加记录到表“客户”,清空临时表记录,追加编号。command3-clickk=thisform.txt客户编号.valuedelepackappe blankrepl 客户编号 with kthisform.refreshmand2.enabled=.f.mand3.enabled=.t.&清除当前编号为K的记录,从新设置该记录信息。5123本界面为会员交费。在进入该界面后单击“交费”,客户编号变为可用,用户直接输入要交费的客户编号和交费的金额,系统将自动添加日期及更新交费年份。数

38、据输入完成后单击“确定”进行保存,保存结果系统将会给予提示。会员交费的代码如下:-loadsele 1use 会员交费表sele 2use 客户&在工作区1中打开会员交费表,工作区2中打开表“客户”-initthisform.Text1.value=请输入客户编号thisform.Text1.readonly=.t.thisform.Text2.readonly=.t.thisform.Text3.readonly=.t.thisform.Text4.readonly=.t.mand1.enabled=.f.mand2.enabled=.f.thisform.text1.lostfocus&设

39、置表单控件的只读属性。command1-clickIF EMPTY(thisform.Text1.value) messagebox(请输入客户编号!,0+48,提示) elseIF len(alltrim(thisform.text1.value)6 messagebox(用户编号必须是六位!,0+48,提示)ENDIF sele 1locate for 客户编号=alltrim(thisform.text1.value) and 会费年份=alltrim(thisform.text4.value)if found() messagebox(此客户已交会费!,0+48,提示信息)else s

40、ele 2 locate for 客户编号=alltrim(thisform.text1.value) if found() if 客户.会员=.f. repl 客户.会员 with .t. repl 客户.入会时间 with date() repl 客户.交会费 with .t. else repl 客户.交会费 with .t. endif sele 1 append blank repl 会员交费表.客户编号 with thisform.text1.value repl 会员交费表.交费日期 with thisform.text2.value repl 会员交费表.交费金额 with t

41、hisform.text3.value repl 会员交费表.会费年份 with alltrim(thisform.text4.value) messagebox(交费成功!,0+48,提示) else messagebox(无此客户!,0+48,提示信息) sele 1 endifendifendif&验证客户输入信息是否为空及输入客户编号是否符合规定的六位,在工作区1中查询该客户是否已交费并更新相应信息。512音像信息管理(音像详细信息,查找并选片,添加新音像)5121 本界面为音像详细信息,通过本界面你可以直观地浏览入库的所有音像资料,同时本界面也将为后来的各种临时表提供数据基础。单击“上行”,“下行”你可以逐条浏览音像详细信息。另外,本界面提供对音像数据的查询功能,当库存音像过多时,再逐条浏览显然不符合用户要求,这时用户可以单击“查找音像”,输入音像编号或音像名称进行查询,此部分功能用户可以自己体会。浏览音像信息的代码如下:-loadsele 1use 音像&在工作区1中打开表“音像”-initpublic m.no2m.no2=1&定义m.no2,初始值为1-activatego m.no2thisform.refresh&使记录指针指到第一条记录。command1-clickif reccount()0 go top thisform.refresh

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 办公文档 > 其他范文


备案号:宁ICP备20000045号-2

经营许可证:宁B2-20210002

宁公网安备 64010402000987号