影片租借系统毕业论文

1、 目 录 摘要2第一章 绪论3 1.1 课题来源3 1.2 项目确定3 1.3 本文所做工作5第二章 影片租借系统设计分析5 2.1 需求分析5 2.2系统功能模块划分8 2.3系统功能调查8第三章 数据库设计11第四章 系统功能模块设计13 4.1主控模块13 4.2分控模块13第五章 程序设计及说明17第六章 系统特点与运行环境17第七章 结束语18参考文献 附录1 部分源程序附录2 部分报样式摘 要随着计算机技术的飞速发展，计算机在商业管理中广泛普及，利用计算机实现对影片租借管理是工作所需，也是办工自动化、现代化的内容之一，并且可以提高影像店的档次。本系统就是要将一个影像店的各项工作流程

2、，用计算机来实现的过程。本系统采用visual foxpro 6.0开发完成，采用模块化设计。整个系统从符合操作简便、界面友好、灵活、实用、安全的要求出发，完成查询、租借、归还、结账、会员管理的全过程，包括影片出租后出租表的建立、会员证的挂失、出租和归还引起影片出租状态的修改、影片资料查询、统计等工作以及新影片、新会员的入库、坏影片的删除，等管理工作。论文主要介绍了本课题开发的过程和所要完成的功能。通过用户需求分析，考虑到计算机管理的便利性和数据表的基本要求，精心设立了五个原始数据表。在数据表的设计与规范过程中，严格遵守数据库系统设计原则，以保证数据的完整性与一致性，尽量减少数据冗余。根据功能

3、需求建立了七个功能模块，分别为：碟库更新，影片查询，租借服务，归还服务，汇总统计，会员管理，用户设置，用来管理影像店的具体工作。关键词：数据库，模块设计，visual foxpro 6.0，影片租借系统第一章 绪论1.1 课题来源精彩的影片大大丰富了人们的业余生活，使之成为大家生活中不可缺少的一部分，而观看影片一般都愿意选择租碟的方式。影像店也就自然成为了人们常去的地方，因此影片出租行业有着广泛的市场。目前的影像店管理工作大多是由手工来完成的,而影像店对影片的管理是多方面的，由于店内的存碟量达到了几千张，甚至是几万张，而且类型众多、人们对其喜好各不相同，若影片分类不科学，顾客要从众多的影片中找

4、出一张满意的，恐怕需要好长的时间。而要把这些资料整理好，用手工去完成，既繁琐又复杂，并且工作效率低，缺乏准确性，但是如果利用数据库管理系统设计一个影片租借系统来管理的话,以上的问题都能迎刃而解。所以针对这一情况，本人开发了这个影片租借系统，比较好地解决了影像店所面临的这些问题。实践证明，影片出租，影片归还，收费结算，统计报表，等一系列具体工作使用计算机来完成，可以大大减轻管理人员的工作强度，同时计算机具有手工管理所无法比拟的优点。例如：检索迅速，查找方便，可靠性高，存储量大，保密性好等。这些优点能够极大地提高工作效率，也是与现代化接轨的重要条件。 1.2 项目确定当今是飞速发展的信息时代。在各

5、行各业中离不开信息处理，计算机正被广泛应用于信息管理系统。使用计算机进行信息控制，不仅提高了工作效率，而且大大的提高了其安全性和准确性。尤其对于复杂的信息管理，计算机能够充分发挥它的优越性。计算机进行信息管理与信息管理系统的开发密切相关，系统的开发是系统管理的前提。本系统就是为了管理好影像店而设计的。影片和顾客租借资料繁多，包含很多的信息数据，现今的影像店只是初步开始使用，尚未全面使用计算机进行信息管理。根据调查得知，他们以前对影片租借管理的主要方式是记录式的手工处理，对于影片租借情况（如租借人，租借天数、所付压金数）的统计和核实等往往采用对手抄记录进行人工检查，对客户的租借（会员，非会员）权

6、限、以及租借天数等用人工计算、手抄进行。数据信息处理工作量大，容易出错；由于数据繁多，容易丢失，且不易查找。总的来说，缺乏系统、规范的信息管理手段。数据处理手工操作，工作量大，出错率高，出错后不易更改。影像店采取手工方式对租借情况进行人工管理，由于需记录的信息比较多，使得管理工作容易混乱；一般租借情况是记录在本子上，工作人员也只是当时比较清楚，时间一长，如再要进行查询，就得在众多的记录中翻阅、查找了，造成查询费时、费力。基于这此问题，我认为有必要建立一个影片租借系统，使影片租借管理工作规范化，系统化，程序化，使之能够及时、准确、有效的查询和修改影片情况，避免给影像店带来不必的损失。本系统要达到

7、以下目标:(1).能详细，准确地记录所有影片的基本信息。建立影片基本数据库表，按照影片的属性及特征所建数据表的结构:影片编号、影片名称、主演、影片类型、片籍、片长、片数、出租状态、内容简介等记录。 (2).能准确快速地查询出顾客所需影片信息。提供多种条件查询的功能。有时，顾客想看某个影片却不一定都能说上名字来，使用这个系统，只需说出几个条件就能找出顾客想要的碟来。所以该系统应能够根据不同的关键字来查找到影片的相关信息。比如,可以根据主演来查,也可以根据影片类型进行查询，还可以根据片籍来查，也可以结合几个不同关键字实现复合查找(3).能准确地记录顾客租还信息。(4).能准确记录和计算出所有费用，

8、包括压金，租碟天数，应付租金数，应退还压金数，做到账面清楚。还要考虑影片的出租状态，会员的优惠政策等。(5).能准确地管理会员的信息。在会员的管理问题上，除了能增删会员外，另外为了维护会员的利益，会员证丢失后还可以挂失。(6).能把所有需要的信息制成报表，方便将来统计、查询，并将其打印出来。(7).能保证系统的安全性，不得有非法用户进入本系统。因为它关系到店主的切身利益,不允许那些非法用户来随意改动记录,由此可知,本系统应设置登录密码,只允许店主本人进入该系统进行管理,若密码不小心泄露，还可以随时改变密码。当然，如果有必要，还可以增删用户。对此，本人对系统做了简单的可行性分析。这个系统是个单用

9、户的系统，界面友好，略懂电脑操作的人就可使用，而且，也不需要增加其它设备，在现有的机器上完全可以运行。在技术特性上，本人学习过数据库原理、面向对象程序设计、软件工程、visual foxpro等课程，具备了软件开发的基本条件。在指导老师的正确指导下，能够独立完成该系统的开发，在做出详细的系统分析，能保证数据的正确性。对整个系统开发的过程，大体安排如下： 系统需求分析一个星期； 系统功能设计一个星期； 程序编码两个星期； 系统调试和测试一个星期；加上开发过程中不可预知的因素，整个系统开发大约为一个半月左右。1.3 本文所做工作绪论部分叙述了课题提出背景、目前应用现状，分析了影片租借系统设计的特点

10、和任务。第二章结合软件工程方法,对系统进行需求分析、功能划分、数据流程图设计，并结合数据库原理和功能划分进行er图的绘制。第三章设计了系统的数据库结构。第四章根据用户需求对系统功能进行了划分和详细设计。第五章介绍了本系统的开发工具。第六章介绍了系统特点和运行环境。第七章介绍了设计体会和编程体会，并指出了系统设计中的不足和改进的方向。第二章 影片租借系统设计分析2.1需求分析本系统的软件需求分析是以影像店管理人员的工作过程作为系统原理的基础，把它模型化、抽象化后设计出来的，在了解现有系统的不足，以及用户的需求后，设计出逻辑模型实例化，变成物理模型，在这个基础上，把物理模型具体化，就得到了目标系统

11、。影片租借系统需要满足来自三方面的需求，这三个方面分别是普通客户、会员客户、影像店管理员。普通客户的需求是查询影片的信息及个人租借情况；会员客户除了享有普通客户的需求外，还应享有会员的优惠政策。管理人员对客户的租借及归还进行操作的同时应考虑会员跟非会员的区别，为客户保存租碟和归还记录，并打印生成相应的报表给客户查看和确认。根据以上所做的需求分析，并略掉一些细节（如不考虑用户的登录；对记录的维护），得出以下的数据流图和部分er图。管理人员各种报表影片原始资料要租的碟与会员编号要租的碟影片租借系统碟库信息普通顾客图.系统顶层数据流图碟库信息会员顾客客户若要租借影片，首先便要对碟库里的影片进行查询，

12、再将查询后的符合要求的结果输出。所以，影片查询分析就是要实现这一流程。按影片单字段查找影片单字段影片清单查找条件选择影片资料按影片多字段查找影片多字段图2.2影片查询流程图：在影像店的工作过程中，查询是很重要的一个工作环节，查询到符合客户需求的影片后，接着就要出租影片了。它需要完成的任务是：记录客户租、借影片的过程及资料，在这个过程中，又要核对客户预租影片是否已被租出，再来决定客户是否能租它，等客户将影片归还后又要在记录中将其出租状态改为 “否”,还有交纳租金等问题。租借需求分析就是要实现这一流程。报表进行租借记录修改借的碟及客户信息会员与否验证尚未借出影片存在验证借的碟及客户信息影片资料租借

13、记录影片资料会员记录 图2.3 影片租借流程 影片名称实付租金应付租金压金姓名影片序号普通客户n1租借关系出租状态影片1会员客户状态主演影片类型影片产地入会时间姓名会员编号电话地址 图2.4影片租借e-r图 影片归还流程实现过程是：普通客户还碟时，管理员可根据客户姓名来查询租借的影片名称及数量（会员则是按会员编号查询），再将所还影片序号告诉计算机，计算机将应付的租金数计算并显视出来，管理员收取租金后便可将碟库中影片的出租状态改为否租借人会员编号租借记录查询所还影片序号选择查询字段显视租金影片记录和租借记录修改根据客户类型结账出租记录影片资料图2.5 影片归还流程2.2系统功能模块划分 总体设计

14、：根据功能分析，可分为以下几类模块：主控模块、分控模块、功能模块。主控模块 显示系统总体功能，提供用户选择，根据选择实现分支，进入分控模块或功能模块。分控模块 根据各分支功能进行设置。根据系统功能要求、系统结构化的程序思想进行设计,把整个系统分成七个子模块,在每个子模块下,又分为几个功能模块,每个功能模块执行各自的功能。 根据以上考虑，系统功能模块结构图如下：影片租借系统退出本系统用户设置影片查询归还服务统计报表会员管理影库更新添加用户密码修改删除用户会员入会会员出会会员证挂失会员一览会员需知归还服务出租服务月收入情况总汇影片出租情况影片资料汇总图.系统力能模块结构图欢迎界面三次否nn输入用户

15、及口令 y主表单 选择功能模块n自动退出进行模块操作退出系统吗？y退出本系统图.系统模块流程图2.4.1 系统功能调查整个系统从总体上分为影片管理、租还管理、会员管理、系统维护四大部分，每一部分应实现的功能如下：2.3.1影片管理功能 新影片的信息输入 影片基本信息维护:包括修改、删除 影片基本信息查询：支持多条件查询，可以选择名称、主演、产地、类型、出租状态进行查询，也可以组合这些关键字查询。2.3.2租还管理功能 影片出租：包括影片信息，会员信息的核对，出租表的改写。 影片归还：包括最后的结账，影片出租状态的改写2.33会员管理功能 新会员的入会 会员注消 会费的管理。2.34 系统维护功

16、能用户管理：包括新增用户、删除用户、修改用户密码等第三章 数据库设计按关系数据的要求，尽量减少冗余数据。本系统共设计了五个原始数据表，其中ypzl.dbf和cuzu.dbf是核心表,分别用于存放影片的基本资料和顾客租借影片的详细资料和信息。在数据表的设计与规范过程中，严格遵守数据库系统设计原则，以保证数据的完整性与一致性，为了计算和查询的方便，有时采取了牺牲数据冗余小这个原则，将有些衍生数据也进行存储。比如说租金是可以通过一定的法则进行运算出来的，但是运算牵涉的因素多，计算繁琐，有会员跟非会员的差别（会员不需要交压金，租金有优惠）为了在结账的时候，做到让顾客心中有数，在设计库结构的时候就有了压

17、金，应付租金和实付租金字段。以下是本系统中数据表的结构: mima.dbf说明：为了便于多个用户管理该系统，建立此表，用于用户身份验证，增加用户，删除用户。其结构如下：字段字段名类型宽度小数位索引排序nulls1用户名字符型普通2密码字符型否ypzl.dbf功能：用于存储影片资料，它是进行影片管理的基础。其结构如下：字段字段名类型宽度小数位索引排序nulls1影片序号字符型6唯一升2影片名称字符型203剧情类型字符型104影片类型字符型85影片产地字符型86主 演字符型167片 长字符型108集 数字符型59出租状态字符型210内容简介字符型100cuzu.dbf功能：用于记录影片的租还记录。

18、为保证数据的一致性和历史资料的完整，表的记录不能被删除，如果影片归还，只更改其状态为 归还。其结构如下：字段字段名类型宽度小数位索引排序nulls1影片序号字符型6普通升2影片名称字符型20普通升3租借人字符型8普通升4会员编号字符型6普通升5是否会员字符型26出租集数字符型47出租日期日期型88归还日期日期型89租碟天数字符型410压 金货币型811应付租金货币型812应退租金货币型813状 态字符型4huike.dbf功能：用于记录客户基本资料，其结构如下：字段字段名类型宽度小数位索引排序nulls1会员编号字符型6普通升2姓名字符型83性别字符型24身份证字符型155电话字符型126地址

19、字符型307入会时间日期型88状态字符型4普通huifei.dbf说明：用于记录会员交费情况。字段字段名类型宽度小数位数索引排序nulls1会员编号字符型6普通升2交费金额货币型83交费日期日期型84交费年份字符型7第四章 系统功能模块设计.1、主控模块主程序的设计 程序名：main.prg主程序主要有几项功能：设置运行环境(包括设置必要的全局变量)、运行表单及建立事件循环。主程序将首先调用seteven程序设置运行环境，然后设置默认目录和搜索路径，最后运行欢迎界面（表单welcome.scx）。密码验证就放在此表单中，用于防止非法用户闯入本系统，保证系统的安全，输入口令时屏幕显示为“*”以利

20、保密。要求输入密码，允许输入三次，密码错误不能进入本系统，输入正确继续执行，进入主表单（表单：main.scx）。通过主表单运行系统功能。4.2 分控模块（1） 新碟入库模块（表单：ypzl.scx）功能：该表单用于实现影片资料的输入，完成成新影片的入库，初始状态下所有输入和选择框均无效，只有点击 “增加新影片”按钮后才可用。其屏幕中用文本框输入影片基本数据，每部影片的序号是唯一的。该表单内有三个组合框，分别是 “影片类型”、 “影片产地”、 “剧情类型”,数据源来自与数据表ypzl.dbf的字段。在该表单中，可以实现增加新影片、修改影片、删除影片功能，若操作错误，取消操作可取消对表所做的修改

21、。（2）影片查询模块（表单：ypfind.scx）功能：可以根据不同的条件组合，查询影片的基本信息，查询条件包括影片名称、主演、剧情类型、影片产地、出租状态，条件可以任意组合。多条件查询是本模块重点考虑的内容，本设计完成了对多字段、多条件的查询，用起来比较方便。该屏幕分为两个部分，上半部分用于查询条件的选择，由五个复选框和一个命令按钮组成。选择好查询的关键字后单击 “确定”便可击活下半部文本框，输入查询条件，单击 “显示查询结果”就能快速地得到影片的信息。其运行界面如图所示：只有选中了的关键字对应的文本框才被激活出租服务模块（表单：chuzu.scx）功能：本模块用于实现影片的出租。模块中影片

22、的名字与序号之间设定有绑定的关系，只需输入影片的序号，影片的名字就会自动填入，会员编号跟租借人也有绑定关系。用户输入完后，点 “确定”，系统先会对输入的资料进行核对，在影片借出的同时，并将影片总库里的出租状态改为 “是”,表示此碟已被借走。同时还会对会员进行核实，若会员证被挂失，系统会马上提示，能很好地保护会员的利益。其运行界面如图所示：（4）归还服务模块 (表单：guihuan.scx)功能：可实现影片归还后资金的结算。在表单中，输入租借人的姓名或是会员编号，在下面的表格中便会将其所借影片记录显视出来，结账按钮，用于结算顾客应付的租金，因为会员跟非会员在价格方面有很大的区别，所以将其分开显视

23、。等顾客交完钱后就可点下面的 “还碟确定”了，这样他的租碟状态就会改为 “已还”，同时也将影片资料表中的 “出租状态”改为否，这样下一个客户又可以租它了。为了避免错误操作，这个按钮在没有点击结账前是灰色不可用的状态。其运行界面如图所示：此键在未点结账之前的状态为不可用 （4）会员管理模块（表单：huyuan.scx）功能：为适应当今社会的发展趋势，专门设定了这个会员管理的模块，利用会员可以享受很多优惠政策的方式，来吸引顾客，以提高经济效益。本模块设有，添加会员、删除会员、会费管理，会员一览表。其运行界面如图所示:（5）用户设置模块（表单：user.scx）功能：用于实现管理用户的功能(有添加用

24、户、修改密码、删除用户三个子页框)，添加用户子页框它能够完成添加用户的功能。修改密码模块:当管理人员发现密码泄露后，可用此项功能修改密码。删除模块用于用户注销（6）汇总统计模块（表单：baobiao.scx）功能：本模块有三项汇总功能，分别是：月收入汇总，会员情况汇总，影片资料汇总。（7）退出模块（表单：quit.scx）功能：调用本表单后，结束语由表单下端向上升，四秒后自动退出本系统。各模块的调用关系统如：main.prgwelcome.prgmain.scxquit.scxguihuan.scxuser.scxypfing.scxchuzhu.scxypzl.scxhuyuan.scxba

25、obiao.scxxxzxx 第五章 程序设计与说明因为vfp是一个专业的数据库管理系统，功能齐全，加上其面向对像的特征，使得程序具有设计简单等特点。本人选择了visual foxpro 6.0作为系统开发工具。作为程序设计的主要任务是完成用户需求分析的功能，所以设计时力求功能的完善与实用，其次考虑操作界面的美观性与操作的便利性。在系统开发过程中，使用了vfp中的报表向导工具。在设计过程中，由于初次涉及系统项目开发，所以借鉴了其他的一些系统，从中吸取了不少经验，为今后的工作奠定了基础。程序源代码见附录。 第六章 系统特点与运行环境系统运行的环境：、硬件环境： 586/100m/64m/20g/

26、tnt 显卡或配置在其以上的机器，并配有鼠标。2、软件环境：操作系统平台：windows98或windows me装有visual foxpro 6.0 系统系统特点：(1) 界面友好，容易撑握使用方法，也能很方便的找到需要的信息。(2) 设计的条理比较清楚，基本符合影像店工作的要求，尤其是影片查询和租还服务两个模块，是系统中比较突出的两个模块。 第七章 结束语这是本人参与的第一次项目开发，但在整个设计过程中，本人都认真的作好了各项工作，尤其是系统需求分析和功能模块的分析。在设计的过程中，有很多借鉴其它系统的地方，也遇到了不少疑难，在指导老师的精心指导下，才得以解决。visual foxro

27、6.0是本人的自学课程之一，由于时间和水平的局限，本系统中还有不足之处，敬请各位老师指教。通过这次项目开发，熟悉了项目开发的流程，相信在以后的工作中，也能独立完成小型系统的开发。参考文献1. 数据库原理郑若忠 编著 国防科大出版社2.软件工程齐治昌编著 高等教育出版社3 visual foxpro 6.0 数据库系统开发实例导航 邵洋 谷宇 何旭洪 编著 人民邮电出版社4. visual foxpro 6.0 入门与应用实例 李俊德 编著 清华大学出版社附录1 报表式样 报表（huike.frx）报表（mm.frx）主程序main.prg_screen.left=-10000public my

28、pathset talk offset excl onset dele onmypath=sys(5)+sys(2003)set defa to (mypath)set path to data,forms,tutu,progs,reports,libsdo form welcomeread events1.欢迎界面(welcome.scx)确定按钮的chick事件set exact onselect mimaif n2 messagebox(三次密码错误，不能使用本系系统！) thisform.release set sysmenu to default clear readelseloca

29、 for allt(用户名)=allt(thisform.text1.value) if found() if allt(密码)=allt(thisform.text2.value) thisform.release do form main else messagebox(密码错误!) thisform.text2.value=space(10) n=n+1 thisform.refresh thisform.text2.setfocus endifelsemessagebox(没有此用户!) thisform.text1.value=space(10) thisform.text2.val

30、ue=space(10) n=n+1 thisform.refresh thisform.text1.setfocus endifendif2.主界面(main.scx)timer1的timer事件if i=0 thisform.label2.fontsize=26 thisform.label3.fontsize=26 thisform.label2.forecolor=16711935 thisform.label3.forecolor=65535 i=1 j=j+1 else thisform.label2.fontsize=22 thisform.label3.fontsize=36

31、thisform.label3.forecolor=16711935 thisform.label2.forecolor=65535 i=0 j=j+1 endif3.碟库更新（ypzl.scx）上一个的 chick事件skip -1if bof() messagebox(已是第一个记录,48,信息窗口) mand1.enabled=.f. mand2.enabled=.f. skip else mand1.enabled=.t. mand2.enabled=.t. endi

32、f mand3.enabled=.t. mand4.enabled=.t. thisform.refresh第一个的chick 事件goto mand1.enabled=.mand3.enabled=.mand4.enabled=.t.thisform.refresh下一个的chick事件skip if eof() messagebox(已是最后一个记录,48,信息窗口) skip -1 mand3.e

33、nabled=.f. mand4.enabled=.f. else mand3.enabled=.t. mand4.enabled=.t.endif mand1.enabled=.t. mand2.enabled=.t. thisform.refresh 最后一个的chick事件goto mand3.enabled=.mand1.enabled=.t.this.paren

34、mand2.enabled=.t. thisform.refresh新增影片的chick事件mandgroup2.enabled=.f.mand2.enabled=.f.mand3.enabled=.f.mand4.enabled=.t.if mand1.caption=增加新影片thisform.container1.text1.enabled=.t.thisform.container1.text2.enabled=.t.thisform.container1.

35、combo1.enabled=.t.bo2.enabled=.t.thisform.container1.text3.enabled=.t.thisform.container1.text4.enabled=.t.thisform.container1.text5.enabled=.t.bo3.enabled=.t.bo4.enabled=.t.thisform.container1.edit1.enabled=.t.待添加的隐藏文字内容2append bl

36、mand1.caption=保存thisform.refreshthisform.container1.text1.setfocuselsegetid=alltrim(thisform.container1.text1.value)getname=alltrim(thisform.container1.text2.value)getsex=alltrim(bo1.value)getjob=alltrim(bo2.value)getindate=alltrim(thisfor

37、m.container1.text3.value)getrank=alltrim(thisform.container1.text4.value)getgood=alltrim(thisform.container1.text5.value)getuse=alltrim(bo3.value)getgod=alltrim(bo4.value)gethp=alltrim(thisform.container1.edit1.value)if empty(getid) or empty(getname) or

38、empty(getsex) or empty(getjob) or empty(getindate) or empty(getrank) or empty(getgood) or empty(getuse) or empty(getgod) or empty(gethp)messagebox(资料不足,48,错误)mand1.caption=增加新记录tableupdate(.t.)thisform.container1.text1.enabled=.f.thisform.container1.text2.enabled=.f.thisform.containe

39、bo1.enabled=.f.bo2.enabled=.f.thisform.container1.text3.enabled=.f.thisform.container1.text4.enabled=.f.thisform.container1.text5.enabled=.f.bo3.enabled=.f.bo4.enabled=.f.thisform.container1.edit1.enabled=.f.mandg

40、roup1.enabled=.t.mand2.enabled=.t.mand3.enabled=.t.mand4.enabled=.f.endifendif修改影片的chick事件mand1.enabled=.f.mand3.enabled=.f.mand4.enabled=.t.mandgroup2.enabled=.t.if mand2.caption=修改这条记录thisform.container

41、1.text1.enabled=.t.thisform.container1.text2.enabled=.t.bo1.enabled=.t.bo2.enabled=.t.thisform.container1.text3.enabled=.t.thisform.container1.text4.enabled=.t.thisform.container1.text5.enabled=.t.bo3.enabled=.t.thisform.container1

42、.combo4.enabled=.t.thisform.container1.edit1.enabled=.t.mand2.caption=修改确认mand2.caption=修改这条记录tableupdate(.t.)thisform.container1.text1.enabled=.f.thisform.container1.text2.enabled=.bo1.

43、enabled=.bo2.enabled=.f.thisform.container1.text3.enabled=.f.thisform.container1.text4.enabled=.f.thisform.container1.text5.enabled=.bo3.enabled=.bo4.enabled=.f.thisform.container1.edit1.enabled=.mand1.enabled=.

44、t.mand3.enabled=.t.mand4.enabled=.f.mandgroup2.enabled=.t.endif删除影片的chick事件getid=alltrim(thisform.container1.text1.value)thisform.container1.text1.controlsource=thisform.container1.text2.controlsource=bo1.controlsource=thisform.container1.co

45、mbo2.controlsource=thisform.container1.text3.controlsource=thisform.container1.text4.controlsource=thisform.container1.text5.controlsource=bo3.controlsource=bo4.controlsource=thisform.container1.edit1.controlsource=use ypzl exclusiveset order to 影片序号seek

46、 getiddeletepackthisform.container1.text1.controlsource=影片序号thisform.container1.text2.controlsource=影片名称bo1.controlsource=影片类型bo2.controlsource=影片产地thisform.container1.text3.controlsource=主演thisform.container1.text4.controlsource=片长thisform.container1.te

47、xt5.controlsource=集数bo3.controlsource=剧情类型bo4.controlsource=出租状态thisform.container1.edit1.controlsource=内容简介thisform.refreshthisform.container1.text1.enabled=.f.thisform.container1.text2.enabled=.f.bo1.enabled=.f.thisform.container

48、1.combo2.enabled=.f.thisform.container1.text3.enabled=.f.thisform.container1.text4.enabled=.f.thisform.container1.text5.enabled=.f.bo3.enabled=.f.bo4.enabled=.f.thisform.container1.edit1.enabled=.f.取消操作的chick事件if mand1.caption=增加确认thisform.co

49、mmand1.caption=增加新记录mand2.enabled=.t.mand3.enabled=.t.mandgroup2.enabled=.t.tablerevert(.f.)endifif mand2.caption=修改确认mand2.caption=修改这条记录mand1.enabled=.t.mand3.enabled=.t.tablerevert(.f.)endifthisform.container1.text1.enabled=.f.thisform.container1.text2.enabled=.bo1.enabled=.bo2.enabled=.f.thisform.container1.text3.enabled=.f.thisform.container1.t