网上图书管理系统.doc

_ 网上书店管理系统课程设计软件工程课程设计书店管理系统（网络版）一、用户描述41.引言41.1编写目的41.2项目背景42.任务描述42.1目标42.2运行环境53.数据描述53.1.数据流程图：53.2.网上书店管理系统中所要处理的表单：53.3.功能6二、可行性分析61.可行性研究的前提62.技术可行性73.经济可行性74.法律可行性75结论7三、需求分析8系统设计目标8描述：8总体结构8功能划分9系统业务流程10总体数据流图：11买书流程图：12实体关系图为：12实体初步描述13对新系统的环境要求调查14基本要求14适应性14需求分析15功能性15可用性15可靠性15性能15性能需求：15联机用户文档和帮助系统需求16用户界面16通信接口16适用的标准16四、概要设计说明书171引言171.1编写目的171.2背景171.3定义172总体设计172.1需求规定172.2运行环境182.3基本设计概念和处理流程182.4结构202.5人工处理过程203接口设计213.1用户接口213.2外部接口214系统出错处理设计214.1补救措施21五、详细设计说明书225.1 引言225.1.1 编写目的225.1.2 背景225.1.3 定义225.2 程序系统的结构225.3.1 算法255.3.2 流程逻辑255.3.3存储分配255.3.4 注释设计25六、数据库设计说明书266.1引言266.1.1编写目的26编写一个可靠地网上书店管理系统，实现图书的网上销售。266.1.2背景266.1.3定义266.2外部设计266.2.1标识符和状态266.3结构设计276.3.1概念结构设计276.3.2逻辑结构设计276.3.3物理结构设计276.4运用设计276.4.1数据字典设计276.4.2安全保密设计286.5 部分实现时的数据库设计286.6 部分实现时的数据字典设计29七、部分编程实现307.1进入系统：307.2显示主窗体317.3图书管理327.3.1添加图书327.3.2修改图书337.3.3删除图书367.4用户查询397.5多库检索41硬件接口42软件接口42故障处理42一、用户描述1.引言当今社会,随着计算机的应用和Internet的普及, Internet网络给人类社会带来了巨大变化,网络在我们的生活中几乎无处不在。因此,建立网上电子书店的销售管理系统是时代的潮流。网上书店系统可以实现人们远程逛书店、了解相应图书信息和购买图书的愿望。要求系统实现的功能是实现网上购书。基本功能包括用户注册、会员登录、图书查询、新书介绍、网上购书以及后台管理等。本系统就是针对这方面的迫切需求而设计实现的。1.1编写目的编写一个可靠地网上书店管理系统，实现图书的网上销售。1.2项目背景项目名称：书店管理系统（网络版）项目委托单位：软件开发单位：2.任务描述2.1目标本系统要求能够显示每本书的详细信息、显示购物车和顾客选购的图书信息、收集顾客个人资料、对定单的修改、确认、提交等。另外，管理员登陆系统可以对图书信息进行增加，修改等相关操作。查看顾客购买书籍情况，并形成相应的销售报表。本软件系统要求安全、可靠（具有出错处理能力）、准确。2.2运行环境本系统是基于C/S模式的采用VB实现的管理信息系统（Management Information System）。数据库服务器由SQL Server实现。操作系统：WINDOWS 2003 Advance Server；数据库服务器端软件SQL Server。3.数据描述3.1.数据流程图：输出：输入：确认订单查询图书信息网上书店管理系统顾客店主销售表店主顾客输入选购信息+个人资料给出顾客订单查询结果3.2.网上书店管理系统中所要处理的表单：3.2.1 “管理员、顾客”表格：用户名、账号、密码、备注 3.2.2 “图书信息”表格：图书名、作者、出版社、价格、类型、简介、备注3.2.3 “银行卡”表格：银行卡卡号、密码、姓名、备注3.2.4 “订单”表格：用户名、图书名、数量、备注 3.3.功能3.3.1功能划分本系统由“前台阅读模块”、 “后台管理模块”组成。前台阅读模块包含一个子模块：“匿名用户子模块”。后台管理模块包含三个子模块：“管理员登陆子模块”、“书籍管理子模块”、“订单管理子模块”。匿名用户子模块包含4个功能模块：“书店首页”、 “查找书籍”、“网上注册”、“网上购书”。管理员登陆子模块包含1个功能模块：“身份确认”。书籍管理子模块包含4个功能模块：“书籍分类”、“修改分类”、“添加新书”、“修改书籍信息”。订单管理子模块包含2个功能模块：“审核订单”、“网上交易”3.3.2描述书店首页模块：通过浏览器浏览，为顾客浏览本书店查找书籍模块：通过系统，匿名用户可以查找自己需要的书籍网上注册模块：匿名用户注册成为系统的用户网上购书模块：注册用户通过系统完成网上购书身份确认模块：管理员完成对注册用户的身份确认书籍分类模块：店主在录入书籍后，完成对书籍的分类修改分类模块：店主对已分类书籍的分类进行修改添加新书模块：店主添加新的书籍加入本系统修改书籍信息模块：店主修改书籍的相关信息（出版社、作者、价格、简介）审核订单模块：管理员完成对顾客订单的审核网上交易模块：店主和顾客完成网上交易二、可行性分析1.可行性研究的前提A.功能：书店管理系统要随时接受每个用户的访问(查找书籍、网上注册等)，记录顾客订单情况以形成销售表，当某个顾客进行书籍订购时，向店主发出提醒，在系统下与用户完成交易；此外，管理员在需要时还可以要求系统打印出书籍销售表。B. 性能：1、本系统要求能够完成书籍查询订购，顺利进行网上交易.2、定期对数据库备份C. 输出如报告、文件或数据：本系统要求输出的数据有：查询信息、销售报表、顾客订单D在安全与保密方面的要求：顾客负责注册用户基本信息的输入，店主负责书籍管理和订单管理模块，管理员负责系统的维护和用户身份审核。2.技术可行性a经费、投资方面的来源和限制：各种硬件和工作人员工资需至少xx元b 硬件、软件、运行环境和开发环境方面的条件和限制：软件需求：操作系统WINDOWS 2003 Advance Server以上；数据库服务器端软件SQL Server。硬件需求：10M以上的LAN接入网络带宽，P4 3.0G Xeon CPU /4G内存/360G(10K) SCSI硬盘的服务器，P4以上微机（带网卡）的客户机，P4 3.0G Xeon CPU /4G内存/36G(10K) RAID硬盘的数据库服务器本系统采用jsp 实现，依靠其强大的控件系统，SQL Server数据库管理系统，能在短期内开发出系统。3.经济可行性某书店目前由于完全采用实体商店的方式来完成图书销售工作，现阶段存在着推广缓慢、店铺运营成本较高无法在短时间内形成规模扩大营业额。根据目前电子商务的发展和网民网购的兴起，遂决定开发本平台实现网上购书、网上售书，节约成本、扩大效益。由于网上图书管理系统实现了低成本、高效益、高竞争力的特点，所以目前我们无法简单的计算出这套网上图书管理系统在对比店面租金和员工薪酬方面，所具备的具体经济优势。但是可以预见的是未来电子商务的兴起和发展以及人民购物习惯的改变，因此开发本平台不但可以在前期协助推广书店，更可以为今后书店的发展带来切实的利益，让其更好的发展。4.法律可行性由于在本系统中是有合同作为双方合作的基础，所以不会存在任何侵犯、妨碍和责任问题。即使存在了，也可以根据合同进行分析，一定有人会负责任，所以此系统完全可以进行开发。由以上经济、技术、操作和法律四方面的分析可以看出，本系统的开发时机成熟，从多种角度考虑，都是可行的。5结论本系统值得投资。三、需求分析图书销售管理的合理化和准确化是书店经营效益的关键。拥有了先进的技术还要有更加良好的管理体制，才可以让书店的经营效益发挥到最好的状态。充分利用现代先进的技术，可以节约大量的人力资源和财力资源。系统设计目标网上书店最重要的功能就是图书的销售,以及管理用户的购物车,此外还需要提供给用户查找数据库中的图书相关记录的功能,最后还必须具备管理员的功能,允许管理员以整个数据库进行操作。所要实现的功能如下:本系统由“前台阅读模块”、 “后台管理模块”组成。前台阅读模块包含一个子模块：“匿名用户子模块”。后台管理模块包含三个子模块：“管理员登陆子模块”、“书籍管理子模块”、“订单管理子模块”。匿名用户子模块包含4个功能模块：“书店首页”、 “查找书籍”、“网上注册”、“网上购书”。管理员登陆子模块包含1个功能模块：“身份确认”。书籍管理子模块包含4个功能模块：“书籍分类”、“修改分类”、“添加新书”、“修改书籍信息”。订单管理子模块包含2个功能模块：“审核订单”、“网上交易”描述：书店首页模块：通过浏览器浏览，为顾客浏览本书店查找书籍模块：通过系统，匿名用户可以查找自己需要的书籍网上注册模块：匿名用户注册成为系统的用户网上购书模块：注册用户通过系统完成网上购书身份确认模块：管理员完成对注册用户的身份确认书籍分类模块：店主在录入书籍后，完成对书籍的分类修改分类模块：店主对已分类书籍的分类进行修改添加新书模块：店主添加新的书籍加入本系统修改书籍信息模块：店主修改书籍的相关信息（出版社、作者、价格、简介）审核订单模块：管理员完成对顾客订单的审核网上交易模块：店主和顾客完成网上交易总体结构开始网站首页匿名用户注册用户登陆后经权限判断普通用户系统管理员查找书籍网上购书网上注册书籍分类修改书籍分类修改书籍分类添加新书管理用户管理交易查看订单浏览分类查找书籍功能划分任何一个网站都需要达到一定的设计功能要求，作为一个网上书店系统，其主要功能是：用户登录及身份验证功能、图书查询及浏览功能、图书的销售功能、用户的购物车管理,还需要提供给用户查找数据库中的图书相关记录的功能,最后还必须具备管理员的功能,允许管理员以整个数据库进行操作。所要实现的功能如下表所示:模块分模块模块功能网上书店管理系统前台阅读匿名用户书店首页查找书籍网上注册网上购书后台管理管理员登录身份确认书籍管理书籍分类修改分类添加新书修改书籍信息订单管理审核订单网上交易系统业务流程网上书店管理系统是一个面向网站管理人员，提供决策服务的信息管理系统，它是书籍管理、订单管理及存货管理的有机结合体，三者之间相互关联、密不可分。业务流程图（Transaction Flow Diagram, TFD）就是用一些规定的符号及连线来表示网站具体业务处理过程。用来描述系统组织结构、业务流程。网上书店部分的业务流程为：(1)用户实现注册、登录、搜索、放入购物车、填写订单、收货。(2)管理员实现对用户注册、登录、注销等操作，同时根据用户的实际要求，实现书籍信息的发布、查看、修改，确认已经提交的订单和交易单，从而完成对网上书店网站的管理。总体数据流图：开始书店首界面选择书店概况网上购书书籍信息查询会员登陆注册返回首页买书流程图：买书使用网上银行付款现金支付网上支付修改数据库成功下订单实体关系图为：管理员用户名账号密码管理银行卡图书卡号密码姓名书简介出版社书名作者价格种类 管理员管理E-R图顾客银行卡使用图书购买出版社书店作者价格种类卡号密码姓名数量优惠额度书简介 银行卡-顾客-图书E-R图实体初步描述参与系统的实体有：管理员、顾客、图书、银行卡。(1):管理员和顾客有以下属性：用户名、帐号、密码 (2):图书有以下属性：书名、作者、出版社、价格、类型、简介（3）银行卡有以下属性： 卡号、密码、姓名（4）订单表：用户名、购买书名、数量对新系统的环境要求调查基本要求1)体系结构：C/S2)操作系统：windows系列3)数据库管理系统：SQL server4)开发工具：Visual Basic 6.0软件需求：操作系统WINDOWS 2003 Advance Server以上；数据库服务器端软件SQL server， VB。硬件需求：10M以上的LAN接入网络带宽，P4 3.0G Xeon CPU /4G内存/360G(10K) SCSI硬盘的服务器，P4以上微机（带网卡）的客户机，P4 3.0G Xeon CPU /1G内存/36G(10K) RAID硬盘的数据库服务器适应性本系统只适合于windows系列操作系统需求分析功能性本系统要求能够显示每本书的详细信息、显示购物车和顾客选购的图书信息、收集顾客个人资料、对定单的修改、确认、提交等。另外，管理员登陆系统可以对图书信息进行增加，修改等相关操作。查看顾客购买书籍情况，并形成相应的销售报表。本软件系统要求安全、可靠（具有出错处理能力）、准确。可用性普通用户所需的培训时间：3天 高级用户所需的培训时间：3天 本系统符合Microsoft 的GUI标准可靠性建议使用“天网防火墙”精确度 具体数据按照标准来衡量。 基于TCP/IP协议性能性能需求：数据精确度注册时，输入用户名后，输入密码，再次确认密码，点击“注册”，如果用户名已经存在则不能注册，反之注册成为会员，输出注册失败或者注册成功。登录时，输入用户名和密码，经过验证，如果正确则成功登录。查找书籍时，输入书名，查找数据库后输出书籍的信息。在购书时，所购买书的数量必须大于零，小于这本书的总量，点击“确定”后，输出购书订单。付款时，钱数精确到分即小数点后两位，经过审核，输出交易成功。适应性JavaBeans 通过提供符合一致性设计模式的公共方法将内部域暴露称为属性。众所周知，属性名称符合这种模式，其他Java 类可以通过自省机制发现和操作这些JavaBean 属性。用户可以使用JavaBean将功能、处理、值、数据库访问和其他任何可以用java代码创造的对象进行打包，并且其他的开发者可以通过内部的JSP页面、Servlet、其他JavaBean、applet程序或者应用来使用这些对象。用户可以认为JavaBean提供了一种随时随地的复制和粘贴的功能，而不用关心任何改变。 当操作方式发生变化时，一些功能同样能够实现。因为在实现各项功能时，把功能划分成了模块，各模块之间互不干扰，而且Java Bean都采用类的形式，每个功能都封装成一个类。运行环境发生变化时，对程序会有一些影响，但打上补丁就可以继续运行了。总体上讲，本系统具有一定的自适应性。联机用户文档和帮助系统需求本系统具有联机帮助功能用户界面1、 屏幕格式采用C/S模式，界面由VB设计实现，完全基于windows兼容的桌面平台 2、报表格式 采用与实际的报表格式一致，当然这也要求客户端的硬件配置（如打印机等）要一致。3、菜单格式 采用工具栏与菜单并用的方式，力图简洁、明了。通信接口本系统要求每个计算机都有网卡。适用的标准1、TCP/IP2、Microsoft GUI 设计四、概要设计说明书1引言当今社会,随着计算机的应用和Internet的普及, Internet网络给人类社会带来了巨大变化,网络在我们的生活中几乎无处不在。因此,建立网上电子书店的销售管理系统是时代的潮流。网上书店系统可以实现人们远程逛书店、了解相应图书信息和购买图书的愿望。要求系统实现的功能是实现网上购书。基本功能包括用户注册、会员登录、图书查询、新书介绍、网上购书以及后台管理等。本系统就是针对这方面的迫切需求而设计实现的。1.1编写目的编写一个可靠地网上书店管理系统，实现图书的网上销售。1.2背景项目名称：书店管理系统（网络版）项目委托单位：软件开发单位：1.3定义MIS：（Management Information System）管理信息系统的英文缩写。VB:本系统所使用的编程语言2总体设计2.1需求规定本系统要求能够显示每本书的详细信息、显示购物车和顾客选购的图书信息、收集顾客个人资料、对定单的修改、确认、提交等。另外，管理员登陆系统可以对图书信息进行增加，修改等相关操作。查看顾客购买书籍情况，并形成相应的销售报表。本软件系统要求安全、可靠（具有出错处理能力）、准确。2.2运行环境本系统是基于C/S模式的采用JSP实现的管理信息系统（Management Information System）。数据库服务器由SQL server实现。为使系统能够正常运行，软硬件环境需求如下：软件需求：操作系统WINDOWS 2003 Advance Server以上；数据库服务器端软件SQL server， VB。硬件需求：10M以上的LAN接入网络带宽，P4 3.0G Xeon CPU /4G内存/360G(10K) SCSI硬盘的服务器，P4以上微机（带网卡）的客户机，P4 3.0G Xeon CPU /1G内存/36G(10K) RAID硬盘的数据库服务器2.3基本设计概念和处理流程系统数据流图如下：顶层数据流图：输出：输入：确认订单查询图书信息网上书店管理系统顾客店主销售表店主顾客输入选购信息+个人资料给出顾客订单查询结果2.4结构开始网站首页匿名用户注册用户登陆后经权限判断普通用户系统管理员查找书籍网上购书网上注册书籍分类修改书籍分类修改书籍分类添加新书管理用户管理交易查看订单浏览分类查找书籍2.5人工处理过程1、图书信息由店主输入2、会员注册信息需要顾客输入3接口设计3.1用户接口本系统的用户界面如下所示菜单快捷功能键区 用户输入界面（系统显示界面）提交区3.2外部接口 本系统采用C/S模式，由VB实现的管理信息系统（Management Information System），与数据库服务器相连。4系统出错处理设计 4.1补救措施1. 联机事务处理(OLAP)是建立在TCP/IP 协议上，有多阶段事务处理响应控制，保证事务处理前后台一致性。2. 数据库处理事务失败自动回滚技术，保证数据库表的数据一致性和完整性。3. 重要数据的校验检查。4. 各个子系统的操作监控，异常情况报告；并提供报表等跟踪记录。5. 提供友好的用户界面和帮助信息及配合严格的检查，减少用户出错机会。五、详细设计说明书5.1 引言当今社会,随着计算机的应用和Internet的普及, Internet网络给人类社会带来了巨大变化,网络在我们的生活中几乎无处不在。因此,建立网上电子书店的销售管理系统是时代的潮流。网上书店系统可以实现人们远程逛书店、了解相应图书信息和购买图书的愿望。要求系统实现的功能是实现网上购书。基本功能包括用户注册、会员登录、图书查询、新书介绍、网上购书以及后台管理等。本系统就是针对这方面的迫切需求而设计实现的。5.1.1 编写目的编写一个可靠地网上书店管理系统，实现图书的网上销售。5.1.2 背景项目名称：书店管理系统（网络版）项目委托单位：软件开发单位：5.1.3 定义MIS：（Management Information System）管理信息系统的英文缩写。VB:本系统所使用的编程语言5.2 程序系统的结构IPO表系统:前台阅读子系统作者：模块：匿名用户子模块日期：2009/12/21编号：11被调用：管理员登陆子模块、订单管理子模块调用：书籍管理子模块输入：注册信息，查询书籍信息输出：有效的记录处理：局部数据元素：注释：系统：后台管理子系统作者：模块：管理员登陆子模块日期：2009/12/21编号：2-1被调用：调用：匿名用户子模块输入：输出：处理：审核注册用户身份局部数据元素：注释：系统：后台管理子系统作者：模块：书籍管理子模块日期：2009/12/21编号：2-2被调用：匿名用户子模块调用：匿名用户子模块输入：书籍相关信息输出：书籍相关信息处理：输入、修改、书籍基本信息局部数据元素：注释：系统：后台管理子系统作者：模块：订单管理子模块日期：2009/12/21编号：2-3被调用：调用：书籍管理子模块输入：输出：交易订单处理：审核订单、完成网络交易局部数据元素：注释：5.3.1 算法 数据库操作：SQL语言操作 报表操作：使用VB的报表生成程序5.3.2 流程逻辑见图：程序系统结构图5.3.3存储分配根据需要，说明本程序的存储分配。5.3.4 注释设计 程序中的注释统一用：“/”来表示，在每个触发事件函数的开头注释六、数据库设计说明书6.1引言当今社会,随着计算机的应用和Internet的普及, Internet网络给人类社会带来了巨大变化,网络在我们的生活中几乎无处不在。因此,建立网上电子书店的销售管理系统是时代的潮流。网上书店系统可以实现人们远程逛书店、了解相应图书信息和购买图书的愿望。要求系统实现的功能是实现网上购书。基本功能包括用户注册、会员登录、图书查询、新书介绍、网上购书以及后台管理等。本系统就是针对这方面的迫切需求而设计实现的。6.1.1编写目的编写一个可靠地网上书店管理系统，实现图书的网上销售。6.1.2背景项目名称：网上书店管理系统项目委托单位：软件开发单位： 6.1.3定义MIS：（Management Information System）管理信息系统的英文缩写。VB:本系统所使用的编程语言6.2外部设计6.2.1标识符和状态 本系统将采用SQL server数据库，数据库名称为bookshop 6.3结构设计6.3.1概念结构设计1 “管理员、顾客”表格：用户名、账号、密码、备注 2 “图书信息”表格：图书名、作者、出版社、价格、类型、简介、备注3 “银行卡”表格：银行卡卡号、密码、姓名、备注4 “订单”表格：用户名、图书名、数量、备注 6.3.2逻辑结构设计1 “管理员、顾客”表格：用户名、账号、密码、备注 2 “图书信息”表格：图书名、作者、出版社、价格、类型、简介、备注3 “银行卡”表格：银行卡卡号、密码、姓名、备注4 “订单”表格：用户名、图书名、数量、备注 6.3.3物理结构设计 程序IPO图：（见需求分析）6.4运用设计6.4.1数据字典设计1.表名：管理员和顾客表字段名称字段类型字段长度说明功能备注UserNamechar10 用户名passwardchar6密码2.表名：图书表字段名称字段类型字段长度说明功能备注BookNameChar20书名BookAuthorchar10作者名PublisherNvarchar50出版社BookPriceMoney8金额BookTypeChar10书籍分类BookInfoNvarchar1000图书简介3.银行卡表字段名称字段类型字段长度说明功能备注CardIDInt4银行卡卡号CardCodeChar6银行卡密码NameChar10持卡人姓名4. 患者生理信号安全范围表(SaveValue)字段名称字段类型字段长度说明功能备注Userchar10用户名BookNameChar10书籍名BookNumInt4书籍数目6.4.2安全保密设计1.用户：a.超级用户（管理员）：拥有全部权限 b.店主：只有输入、修改、删除书籍基本信息和完成交易的权利。 6.5 部分实现时的数据库设计1 “table4”表格：（管理员、用户表格）Iden、用户名、密码、身份2 “table1”表格：（图书信息表格）编号、图书名、作者、出版社、价格、类型、简介、原价、会员价、svip价3 “shop”表格：（图书所在店铺表格）序号、书店名。书店书数6.6 部分实现时的数据字典设计1.表名：table1（图书表）字段名称字段类型字段长度说明功能备注编号Nvarchar6图书名char10新旧char2出版日期Datatime8所在书店Char20原价Int4会员价Int4Svip价Int42.table4表（管理员用户表）字段名称字段类型字段长度说明功能备注IdenInt4用户名Nvarchar8密码Nvarchar8身份Nvarchar13. shop表字段名称字段类型字段长度说明功能备注序号Nvarchar4书店名称Char20书店数目Nvarchar6七、部分编程实现7.1进入系统：1.窗体功能：操作员输入自己的用户名和密码，以不同身份进入网上书店管理系统。输入正确密码即可进入本系统。2.窗体界面。3.代码实现。Private Con As ADODB.ConnectionPrivate rs As ADODB.RecordsetPrivate Const constr = driver=sql server;server=(local);database=bookshopPrivate Sub Command1_Click()sql = select 身份 from TABLE4 where 用户名= & txtname.Text & and 密码= & txtpw.Text & Set Con = New ADODB.ConnectionWith Con.ConnectionString = constr.OpenEnd WithSet rs = New ADODB.Recordsetrs.Open sql, Con, adOpenKeyset, adLockOptimisticIf (rs.RecordCount 0) Thenidentity = CInt(rs.Fields(身份)Unload MeSelect Case identityCase 0Form3.ShowUnload Form1Case 1Form3.ShowUnload Form1Case 2Form3.ShowForm3.mnurefresh.Enabled = FalseUnload Form1End SelectLoad frm_mainfrm_main.ShowElseMsgBox 非法用户！End Ifrs.CloseCon.CloseEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()identify = -1End SubPrivate Sub txtname_Change()End Sub7.2显示主窗体1.窗体功能：系统操作平台的所有功能，通过主窗体连接起来。其中添加修改删除操作，普通权限用户无法进行操作。2.窗体界面：7.3图书管理7.3.1添加图书1.窗体功能。添加图书信息。2.窗体界面。3.代码实现。Dim Cnn As ADODB.ConnectionDim Rst As ADODB.RecordsetDim sql As StringPrivate Sub Command2_Click()Rst.AddNewRst.Fields(编号) = Text1.TextRst.Fields(书名) = Text2.TextRst.Fields(新旧) = Combo1.TextRst.Fields(出版日期) = Text4.TextRst.Fields(所在书店) = Combo2.TextRst.Fields(原价) = Text6.TextRst.Fields(会员价) = Text7.TextRst.Fields(svip价) = Text8.TextRst.Fields(热销度) = (CInt(Text6.Text) + CInt(Text7.Text) + CInt(Text8.Text) 3Rst.UpdateMsgBox 插入成功！Unload Form7End SubPrivate Sub Form_Load()Combo1.AddItem 新Combo1.AddItem 旧Combo2.AddItem 0001Combo2.AddItem 0002Combo2.AddItem 0003Combo2.AddItem 0004Set Cnn = New ADODB.ConnectionConnectString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & file.mdb;Persist Security Info=FalseConnectString = driver=sql server;server=(local);database=bookshopCnn.Open ConnectStringSet Rst = New ADODB.Recordsetsql = select * from TABLE1Rst.Open sql, Cnn, adOpenKeyset, adLockOptimisticEnd SubPrivate Sub Text6_Change()End Sub7.3.2修改图书1.窗体功能。修改图书信息。2.窗体界面3.代码实现。Dim Cnn As ADODB.ConnectionDim Rst As ADODB.RecordsetDim sql As StringPrivate Sub Combo2_Change()End SubPrivate Sub Command1_Click(Index As Integer)Select Case IndexCase 0:If Not Rst.BOF ThenRst.MoveFirstText1.Text = Rst.Fields(编号)Text2.Text = Rst.Fields(书名)Combo1.Text = Rst.Fields(新旧)Text4.Text = Rst.Fields(出版日期)Combo2.Text = Rst.Fields(所在书店)Text6.Text = Rst.Fields(原价)Text7.Text = Rst.Fields(会员价)Text8.Text = Rst.Fields(svip价)End IfCase 1:Rst.MovePreviousIf Not Rst.BOF ThenText1.Text = Rst.Fields(编号)Text2.Text = Rst.Fields(书名)Combo1.Text = Rst.Fields(新旧)Text4.Text = Rst.Fields(出版日期)Combo2.Text = Rst.Fields(所在书店)Text6.Text = Rst.Fields(原价)Text7.Text = Rst.Fields(会员价)Text8.Text = Rst.Fields(svip价)ElseRst.MoveFirstEnd IfCase 2:Rst.MoveNextIf Not Rst.EOF ThenText1.Text = Rst.Fields(编号)Text2.Text = Rst.Fields(书名)Combo1.Text = Rst.Fields(新旧)Text4.Text = Rst.Fields(出版日期)Combo2.Text = Rst.Fields(所在书店)Text6.Text = Rst.Fields(原价)Text7.Text = Rst.Fields(会员价)Text8.Text = Rst.Fields(svip价)ElseRst.MoveLastEnd IfCase 3:If Not Rst.BOF ThenRst.MoveLastText1.Text = Rst.Fields(编号)Text2.Text = Rst.Fields(书名)Combo1.Text = Rst.Fields(新旧)Text4.Text = Rst.Fields(出版日期)Combo2.Text = Rst.Fields(所在书店)Text6.Text = Rst.Fields(原价)Text7.Text = Rst.Fields(会员价)Text8.Text = Rst.Fields(svip价)End IfEnd SelectEnd SubPrivate Sub Command2_Click()Rst.Fields(编号) = Text1.TextRst.Fields(书名) = Text2.TextRst.Fields(新旧) = Combo1.TextRst.Fields(出版日期) = Text4.TextRst.Fields(所在书店) = Combo2.TextRst.Fields(原价) = Text6.TextRst.Fields(会员价) = Text7.TextRst.Fields(svip价) = Text8.TextRst.UpdateMsgBox 修改成功！Unload Form9End SubPrivate Sub Form_Load()Combo1.AddItem 新Combo1.AddItem 旧Combo2.AddItem 0001Combo2.AddItem 0002Combo2.AddItem 0003Combo2.AddItem 0004Set Cnn = New ADODB.ConnectionConnectString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & file.mdb;Persist Security Info=FalseConnectString = driver=sql server;server=(local);database=bookshopCnn.Open ConnectStringSet Rst = New ADODB.Recordsetsql = select * from TABLE1Rst.Open sql, Cnn, adOpenKeyset, adLockOptimisticRst.MoveFirstText1.Text = Rst.Fields(编号)Text2.Text = Rst.Fields(书名)Combo1.Text = Rst.Fields(新旧)Text4.Text = Rst.Fields(出版日期)Combo2.Text = Rst.Fields(所在书店)Text6.Text = Rst.Fields(原价)Text7.Text = Rst.Fields(会员价)Text8.Text = Rst.Fields(svip价)End Sub7.3.3删除图书1.窗体功能。删除图书信息2.窗体界面。3.代码实现。Dim Cnn As ADODB.ConnectionDim Rst As ADODB.RecordsetDim sql As StringPrivate Sub Command1_Click(Index As Integer)Select Case IndexCase 0:If Not Rst.BOF ThenRst.MoveFirstText1.Text = Rst.Fields(编号)Text2.Text = Rst.Fields(书名)Combo1.Text = Rst.Fields(新旧)Text4.Text = Rst.Fields(出版日期)Combo2.Text = Rst.Fields(所在书店)Text6.Text = Rst.Fields(原价)Text7.Text = Rst.Fields(会员价)Text8.Text = Rst.Fields(svip价)End IfCase 1:Rst.MovePreviousIf Not Rst.BOF ThenText1.Text = Rst.Fields(编号)Text2.Text = Rst.Fields(书名)Combo1.Text = Rst.Fields(新旧)Text4.Text = Rst.Fields(出版日期)Combo2.Text = Rst.Fields(所在书店)Text6.Text = Rst.Fields(原价)Text7.Text = Rst.Fields(会员价)Text8.Text = Rst.Fields(svip价)ElseRst.MoveFirstEnd IfCase 2:Rst.MoveNextIf Not Rst.EOF ThenText1.Text = Rst.Fields(编号)Text2.Text = Rst.Fields(书名)Combo1.Text = Rst.Fields(新旧)Text4.T