收藏 分销(赏)

图书管理系统论文(VB+Access).doc

上传人:精**** 文档编号:2177781 上传时间:2024-05-22 格式:DOC 页数:33 大小:409.04KB
下载 相关 举报
图书管理系统论文(VB+Access).doc_第1页
第1页 / 共33页
图书管理系统论文(VB+Access).doc_第2页
第2页 / 共33页
图书管理系统论文(VB+Access).doc_第3页
第3页 / 共33页
图书管理系统论文(VB+Access).doc_第4页
第4页 / 共33页
图书管理系统论文(VB+Access).doc_第5页
第5页 / 共33页
点击查看更多>>
资源描述

1、图书管理系统论文(VB+Access) 作者: 日期:2 个人收集整理 勿做商业用途目 录内容摘要 2引言 3第一章 课题简介 4第二章 需求分析 52。1图书管理现状52。2系统的数据字典62。3系统数据流程图 10第三章 系统概念113.1系统功能模块解析 123.2系统功能结构图 133。3系统ER图的设计 14第四章 系统逻辑和物理设计 194.1数据库的设计 194.2数据库的维护 22 4。3功能模块的实现 24第五章 调试与分析445。1存在问题及解决方案 455.2进一步改进设想 45第六章 用户操作说明 466.1软硬件环境 466。2应用系统安装 466.3操作手册 46小

2、结46参考文献47致谢47图书管理系统论文(vb+access)引 言当今时代是飞速发展的的信息时代.在各行各业中离不开信息处理,这正是计算机被广泛应用于信息管理系统的原因。计算机的最大好处在于利用它能够进行信息管理.使用计算机进行信息控制,不仅提高了工作效率,而且大大的提高了其安全性.尤其对于复杂的信息管理,计算机能够充分发挥它的优越性。计算机进行信息管理与信息管理系统的开发密切相关,系统的开发是系统管理的前提。本系统就是为了管理好图书馆信息而设计的。图书馆作为一种信息资源的集散地,图书和用户借阅资料繁多,包含很多的信息数据的管理,现今,有很多的图书馆都是初步开始使用,甚至尚未使用计算机进行

3、信息管理.根据调查得知,他们以前对信息管理的主要方式是基于文本,表格等纸介质的手工处理,对于图书借阅情况(如借书天数,超过限定借书时间的天数)的统计和核实等往往采用对借书卡的人工检查进行,对借阅者的借阅权限,以及借阅天数等用人工计算,手抄进行.数据处理工作量大,容易出错。由于数据繁多,容易丢失,且不易查找。总的来说,缺乏系统规范的信息管理手段.尽管有的图书馆有计算机,但是尚未用于信息管理,没有发挥它的效力,资源闲置比较突出,这就是管理信息系统的开发的基于环境。基于这个问题,我认为有必要建立一个图书管理系统,使图书管理工作规范化,系统化,程序化,避免图书管理的随意性,提高信息处理的速度和准确性,

4、能够及时,准确,有效的查询和修改图书情况。第一章课题简介课题:图书管理系统。任务:针对各大中专院校的图书管理现状,设计出适合一般学校的计算机辅助图书管理系统.实现对图书基本信息、读者基本信息进行计算机辅助管理,完成借书和还书有关信息的记录、修改、查询、删除等一系列任务的计算机管理与实现。开发环境:本图书管理开发系统是在Pentyum 166mmx 以上机型的计算机上进行开发并获得通过的,同时方便系统开发,减少开发过程的难度,我们是基于以下的软件环境。以Windows xp为操作系统以Visual Basic6.0为开发工具以Access 2000作为后台数据库功能概述:该系统界面友好,操作简便

5、,能完成添加图书信息,修改图书信息,查询图书信息,添加读者类别,修改读者类别,查询读者信息,修改读者信息等一系列图书管理功能,开发本系统的总体任务是实现图书管理的系统化和自动化,帮助管理人员更好更高效地完成图书管理工作。本着实用性和介绍性的原则,整个系统由五大模块组成,每个大的模块又包括三至四个小的模块。一、图书管理部分:包括图书信息管理和类别管理,其功能是实现对各部分数据内容进行添加、修改、查询等操作.二、借阅管理部分:包括借书管理和还书管理,其功能是实现对各部分数据内容的添加和查询等操作。三、读者管理部分:包括读者信息管理和读者类别管理,其功能是实现对各部分数据内容的添加和修改等操作。四、

6、系统管理部分:包括修改系统用户密码和增加新用户两项功能。 五、帮助部分:包括系统设计前台和后台简概,退出系统等功能。系统具有高效、易操作、易维护等特点,并且系统结构清晰、界面友好,功能较为齐全,能有效地协助管理人员进行图书管工作。第二章 需求分析需求分析阶段确定的系统逻辑模型是以后设计和实现目标系统的基础,因此必须准确完整地体现用户的要求.在这一章里,我将给出系统的数据流图,功能结构图,数据字典,为系统的设计奠定基础.2。1图书管理现状随着计算机技术的飞速发展,其应用方面已渗透到社会生活的各个领域。它已经成为我们学习和工作的得力助手。在学校,尤其是在一些高校,图书是学校的一项重要资源,图书的管

7、理也是学校的一项常规性的重要工作。而长期以来,学生图书管理都是依赖人工进行的.现今,有很多的学校都已经开始使用计算机进行图书信息管理,并且起得良好的效果。近年来我校招生情况越来越好,所以图书管理工作越来越繁重,但由于种种原因,管理人员并没有增加,因此原有的人工管理工作已不能适应现行的工作需要。同时,陈旧的人工管理也不利于推广计算机应用。为使图书管理工作科学化、规范化,就必须采用计算机辅助管理。2。2系统的数据字典数据字典的作用是在软件分析和设计的过程中给人提供关于数据的描述信息。数据流图和数据字典共同构成系统的逻辑模型,没有数据字典数据流图就不严格,然而没有数据流图数据字典也难于发挥作用.只有

8、数据流图和对数据流图的精确定义放在一起,才能共同构成系统的规格说明。系统开发时,常用卡片的形式书写保存描述一个数据元素。下面给出本系统的主要数据元素的数据字典卡片:名字:读者信息查询报表别名:读者信息表描述:读者基本情况查询结果的信息表定义:读者信息查询报表读者编号读者姓名性别类别单位住址电话登记日期已借书数量位置:输出到打印机名字:图书信息查询报表别名:图书信息表描述:各种书籍查询基本信息表定义:图书信息查询报表图书编号书名类别作者出版社出版日期登记日期是否被借出位置:输出到打印机2.3. 数据流程图数据流程图(Data Flow DFD)是描述实际业务管理系统工作流程的一种图形表示法。它描

9、绘系统的逻辑模型图,其中没有任何具体的物理元素,只是描绘信息在系统中流动和处理的情况.因为数据流图是逻辑系统的图形表示,即使不是专业的计算机技术人员也容易理解,所以是极好的通信工具。此外,设计数据流图只需考虑系统必须完成的基本逻辑功能,完全不需要考虑如何具体地实现这些功能,所以它也是软件设计的很好的出发点。图书管理系统主要是为了对图书、读者基本信息等进行计算机管理。下面就是对各个功能模块的流程分析:1、图书类别管理基本信息流程:分析:图书类别基本信息的流动首先是以图书类别的编号为依据,来达到添加、修改、查询图书类别记录.同时,也对数据库中的图书类别表的编号进行检查. 2、图书信息管理基本信息流

10、程:分析:图书基本信息的流动首先是以图书编号为流动方向的依据,来达到添加、修改、记录、删除图书记录.为了数据的一致性,进行这些操作的同时,也对数据库中的记录进行检查,检查是否有重复的记录。如有则不能进行添加。3、读者类别管理基本信息流程 分析:读者类别基本信息的流动首先是以读者类别编号为流动方向的依据,来达到添加、修改、记录读者类别记录。为了数据的一致性,进行这些操作的同时,也对数据库中的记录进行检查,检查是否有重复的记录.如没有则可进行添加.4、读者信息管理基本信息流程:分析:读者基本信息的流动首先是以读者的编号为依据,来达到添加、修改、查询、删除读者信息的记录。同时,也对数据库中的读者信息

11、表的编号进行检查。 5、借书管理基本信息流程:分析:借书管理基本信息的流动首先是以借阅编号为流动方向的依据,来达到添加、查询借书记录.为了数据的一致性,进行这些操作的同时,也对数据库中的记录进行检查,检查是否有重复的记录。如没有则可进行添加。6、还书管理基本信息流程:分析:借阅管理部分是实现对各部分数据内容的添加和查询操作,在借阅信息中包括借阅编号、读者编号、读者姓名、书籍名称、出借日期和还书日期。并通过添加功能来达到借阅信息表的数据的更新,通过查询可使管理员很快地了解借阅信息,从而避免书籍的丢失现象产生。通过上面对各个模块流程的分析,那么我们就不难对整个系统的大致流程有一个全面的认识。设计时

12、采用了常用的自顶向下的瀑布式结构化设计方法.各子系统具有独立的数据库结构,同时又具有相关的关键字,这样系统做起来后就便于用户操作。综合上面各个模块的流程分析,其总体流程图如下:第三章系统的概念概念设计阶段主要任务和目标是根据需求分析的结果,包括一般联系实体,画出对应的ER图。对于复杂的系统,通常首先要对它的各功能模进行分析,然后再把它的功能结构图画出来,便是设计和优化。功能分析之后,再根据各个岗位、各个用户对数据和使用权限的不同要求作出局部ER图,然后再把各个局部ER图综合起来形成统一的整体ER图。 3.1系统模块功能解析图书管理部分:包括图书信息管理和类别管理,其功能是实现对各部分数据内容进

13、行添加、修改、查询等操作.各管理部分的明细如下:(1)图书信息管理:包括图书信息的添加、图书信息的修改、图书信息的查询和图书的信息删除4部分。其中,图书信息包括图书编号、书名、图书类别、作者、出版社、出版日期、登记日期以及是否已被借出。(2)图书类别管理:包括图书类别的添加、图书类别的修改、图书类别的删除3部分功能。其中,图书类别包括类别名称和类别编号两部分。借阅管理部分:包括借书管理和还书管理,其功能是实现对各部分数据内容的添加和查询等操作。各管理部分的明细如下:(1)借书管理:包括添加借书信息和查询借书信息2部分功能.其中,借阅信息包括借阅编号、读者编号、读者姓名、图书编号、图书名称、出借

14、日期和还书日期。(2)还书管理:实现添加还书信息功能。其中,还书信息与借阅信息部分明细相同.读者管理部分:包括读者信息管理和读者类别管理,其功能是实现对各部分数据内容的添加和修改、删除等操作.各管理部分的明细如下:(1)读者信息管理:包括读者信的添加、读者信息的修改、读者信息的查询和读者信息的删除4部分功能.其中,读者信息包括读者姓名、读者编号、性别、读者类别、工作单位、家庭住址、电话号码、登记日期和已借书数量.(2)读者类别管理:包括读者类别的添加、读者类别的修改、读者类别的删除3部分功能.其中,读者类别包括各种类名称、借书期限和有效期限4部分.系统管理部分:包括修改系统用户密码、增加新用户

15、和退出系统三项功能。系统初始设置一个超级用户名和密码,操作人员可以利用这个超级用户名和密码登录,之后,可以设置其他的超级用户名称,也可以设置权限用户,同时也设置了这个用户可以使用的权限。 帮助部分:包括系统设计前台和后台简概述等功能。运行本系统程序,首先出现登录界面,输入正确的用户名和密码后才能进入主窗体.对主窗体上各个菜单的设置采用快捷键,便于用户更方便的应用该系统。3.2 系统功能结构图图书管理系统系统结构图数据存盘数据读取期刊打印图书打印用户查询模糊查询多条件查询期刊统计图书统计统计打印检索家庭图书主库用户建库编目数据存取3.3系统ER图的设计软件系统本质上是信息处理系统,因此,在软件系

16、统的整个开发过程中都必须考虑两方面的问题“数据”及对数据的“处理。为了把用户的数据要求清晰明确地表达出来,系统分析员通常建立一个概念性的数据模型。概念性数据模型是一种面向问题的数据模型,是按照用户的观点来对数据和信息建模,它描述了从用户角度看到的数据,它反映了用户的现实环境,且与在软件系统中的实现方法无关。这里我们运用最常用的表示概念性数据模型的方法,是实体联系方法即E-R模型.通常,软件系统中有许多数据是需要长期保存的。为减少数据冗余,简化修改数据的过程,实现对数据进化规范化.正题名期刊号期刊信息表录入时间 作者ISBN号位置图书信息表文件类型出版社 附录价格副题名正题名书籍号登陆用户信息图

17、书信息期刊信息数据库数据库表的关系出版社年份价格卷副题名统一刊号ISSN号登陆用户信息表用户口令用户名密码 码用户名用户名胜古名名胜古迹 户管理管理出版社副题名录入时间ISBN号存放位置作者 者书籍号正题名期刊 刊E-R图卷年份 份期副题名ISSN号价格图书统一刊号期刊号正题名程序流程图: 删除数据程序流图:删除数据确定删除?从数据库中删除录入数据数据要求不符合要求 no符合要求 yes 保存到数据库录入数据程序流图: 输入查询关键字寻找数据没有记录找到记录从数据库中删除查询信息程序流图第四章 系统逻辑和物理设计4.1数据库的设计根据上面的数据库ER图,现在需要将上面的数据库概念结构转化为SQ

18、L Server2000数据库系统所支持的实际数据模型,也就是数据库的逻辑结构。在上面的实体以及实体之间关系的基础上,形成数据库中的表格以及各个表格之间的关系。图书管理信息系统数据库中各个表格的设计结果如下面的几个表格所示。每个表格表示在数据库中的一个表。1.图书类别表字段名数据类型说明类别名称文本必添字段“是”,允许空字符为“否”类别编号文本必添字段“是”,允许空字符为“否”2.图书信息表字段名数据类型说明图书编号文本必添字段“是”,允许空字符为“否”书名文本必添字段“是”,允许空字符为“否”类别文本字段大小50作者文本字段大小50出版社文本字段大小50出版日期日期/时间无登记日期日期/时间

19、无是否借出文本字段大小23.借阅信息表字段名数据类型说明借阅编号自动编号无读者编号文本字段大小50读者姓名文本字段大小50图书编号文本字段大小50图书名称文本字段大小50出借日期日期/时间无4.读者信息表字段名数据类型说明读者姓名文本必添字段“是”,允许空字符为“否读者编号文本必添字段“是”,允许空字符为“否性别文本字段大小2读者类别文本字段大小50工作单位文本字段大小50家庭住址文本字段大小50电话号码文本字段大小50登记日期日期/时间无已借数量数字无字段名数据类型说明种类名称文本必添字段“是”,允许空字符为“否”借书数量数字无借书期限数字无有限期限数字无5.读者类别表 4。2数据库的维护

20、由于应用环境不断变化,数据库运行过和中物理存储也会不断变化,对数据库设计进行调整,修改等维护工作是设计工作的继续和提高。对数据库经常性的维护工作主要包括:1。数据库的转储和恢复针对不同的应用要求制定不同的转储计划,保证一旦发生故障能尽快将数据库恢复到某种一致的状态,尽可能减少对数据库的破坏。2.数据库的安全性、完整性控制在数据库运行过程中由于应用环境的变化,对安全性的要求也会发生变化,如原来机密的数据现在可以公开查询了,新加入的数据又可能是机密的了。系统中用户的密级改变.这都需要根据实际情况修改原有的安全性控制,可以设置数据库密码及用户权限。同样,数据库的完整性的约束条件也会变化,需要DBA不

21、断修正.3.数据库性能的监督、分析和改造利用Microsoft SQL Server2000提供的检测系统性能参数的工具,在数据库运行过程中,监督数据进行分析,找出改进系统性能的方法,并做适当调整。4。数据库的重组及重构造数据库运行一段时间后,由于记录不断增、删、改,增添、修改的数据不能为空,否则不能保存到数据库中。使数据库的物理存储情况变坏,降低了数据的存取效率,数据库性能下降,这时DBA要对数据库进行重组织,或部分重组织(只对频繁增、删的表进行重组织),可以利用Microsoft SQL Server2000专门提供的数据重组织实用程序操作,按原设计要求重新安排存储位置、回收垃圾、减少指针

22、链等,提高系统性能。有些情况,如由于数据库应用环境发生变化,增加了新的应用或新的实体,取消了某些应用,有的实体与实体间的联系发生变化,则需要调整数据库的模式及内模式。4.3功能模块的实现按结构化的程序设计思想,在完成了系统分析、系统设计后,就可以进行系统实现阶段了,系统实现是每指把系统的物理模型转换成实际运行系统的全过程。在打开数据表之前应该先打开数据库,使用公共模块中定义的conn对象。打开数据库应该安排在Form_Load事件中,因为确定用户名和密码是否正确就已经使用数据库中的内容了.双击窗体部分,加入如下的代码:Private Sub From_Load()Dim connections

23、tring As StringConnectionstring=”Provider=Microsoft。Jet.oledb.4。0;”_ “data source=archivel.mdbconn。Open connectionstringEnd Sub注意:当程序不再使用数据库时,应该调用Connection对象的Close方法将其关闭,但此时它还会占用一定的系统资源,完全将资源释放给系统的方法是使用下面的语句:Set conn=Nothing.不过,这两个步骤往往会被省略,因为当程序关闭时,程序所打开的数据也会随之关闭,Connection对象所占用的系统资源也会自动释放给系统。登录窗体的

24、实现图书录入窗口期刊录入窗口其代码如下:Option ExplicitDim CNt As Integer 记录确定次数程序装载的过程中将此变量初始化为0 Dim sql As StringDim rs_login As New ADODB.RecordsetIf Trim(txtuser.Text) = ” Then 判断输入的用户名是否为空 MsgBox 没有这个用户, vbOKOnly + vbExclamation, txtuser.SetFocusElse sql = select * from 系统管理 where 用户名=” txtuser。Text & ” rs_login.O

25、pen sql, conn, adOpenKeyset, adLockPessimistic If rs_login。EOF = True Then MsgBox ”没有这个用户”, vbOKOnly + vbExclamation, txtuser。SetFocus Else ”检验密码是否正确 If Trim(rs_login。Fields(1)) = Trim(txtpwd.Text) Then userID = txtuser.Text userpow = rs_login。Fields(2) rs_login。Close Unload Me Form1。Show Else MsgBo

26、x ”密码不正确, vbOKOnly + vbExclamation, ” txtpwd.SetFocus End If End IfEnd IfCNt = cnt + 1If CNt = 3 Then Unload MeEnd IfExit SubEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()Dim connectionstring As Stringconnectionstring = ”provider=Microsoft.Jet.oledb.4.0;” & _ ”data source

27、=book.mdb”conn。Open connectionstringCNt = 0End Sub注意:工程属性对话框中的”启动选项”用来选取择运行VB时显示的第一个窗体,或者Sub Main.主窗体中的代码不多,基本上都是实现单击某个菜单选项即弹出相应窗体的语句,这些语句将分别在各个窗体中介绍。单击“系统管理” “退出系统”菜单,关闭系统代码如下:Private Sub exit_sys_Click()EndEnd sub系统主窗体的实现登陆窗口用户录入窗口其代码如下:Private Sub add_admin_Click()frmadduser.ShowEnd SubPrivate Su

28、b add_back_book_Click()frmbackbookinfo。ShowEnd SubPrivate Sub add_book_info_Click()frmaddbookinfo。ShowEnd SubPrivate Sub add_book_style_Click()frmaddbookstyle。ShowEnd SubPrivate Sub add_lend_book_Click()frmfindbook。ShowEnd SubPrivate Sub add_reader_info_Click()frmaddreaderinfo.ShowEnd SubPrivate Sub

29、 add_reader_style_Click()frmaddreaderstyle。ShowEnd SubPrivate Sub change_pwd_Click()frmchangepwd。ShowEnd SubPrivate Sub del_book_info_Click()frmmodifybookinfo.ShowEnd SubPrivate Sub del_book_style_Click()frmmodifybookstyle.ShowEnd SubPrivate Sub del_reader_info_Click()frmreaderinfo。ShowEnd SubPrivat

30、e Sub del_reader_style_Click()frmmodifyreaderstyle.ShowEnd SubPrivate Sub exit_sys_Click()EndEnd SubPrivate Sub find_book_info_Click()frmfindbook。ShowEnd SubPrivate Sub find_lend_book_Click()frmfindborrowinfo.ShowEnd SubPrivate Sub find_reader_info_Click()frmfindreader.ShowEnd SubPrivate Sub gu_Clic

31、k()frmSplash。ShowEnd SubPrivate Sub H_Click()End SubPrivate Sub Image1_Click()End SubPrivate Sub modify_book_info_Click()frmmodifybookinfo.ShowEnd SubPrivate Sub modify_book_style_Click()frmmodifybookstyle。ShowEnd SubPrivate Sub modify_reader_info_Click()frmreaderinfo。ShowEnd SubPrivate Sub modify_r

32、eader_style_Click()frmmodifyreaderstyle.ShowEnd Sub图书类别管理窗体的实现图书类别管理窗体由2个Text控件、2个label控件、2个commandbutton控件组成。其中,2个label控件作为标识,2个text控件被接收用户输入,2个commandbutton控件作为“确定”和“取消”按钮。运行时的窗体如下:图书统计窗口期刊统计窗口图书存取窗口期刊存取窗口图书浏览窗口其实现代码如下:当单击添加图书类别菜单时,代码如下:Private Sub add_book_style_Click()frmaddbookstyle。ShowEnd Sub

33、当单击“确定”按钮时,首先检查输入的图书类型和种类编号是否为空,代码如下:Private Sub Command1_Click()Dim rs_bookstyle As New ADODB.RecordsetDim sql As StringIf Trim(Text1.Text) = Then MsgBox 图书种类不能为空, vbOKOnly + vbExclamation, ” Text1.SetFocus Exit SubEnd IfIf Trim(Text2。Text) = ” Then MsgBox ”种类编号不能为空”, vbOKOnly + vbExclamation, ” Te

34、xt2。SetFocus Exit SubEnd If如果不为空,则检查类别名称是否有重复,需要打开图书类别表,先定义一个字符串类型的变量和一个RECORDSET对象变量。Private Sub Command1_Click()Dim rs_bookstyle As New ADODB.RecordsetDim sql As StringIf Trim(Text1。Text) = ” Then使用RECORDSET对象的OPEN方法打开数据表。End Ifsql = select from 图书类别 where 类别名称=” Text1.Text ”rs_bookstyle。Open sql,

35、 conn, adOpenKeyset, adLockPessimistic 如果没有重复,此时TECORDSET对象的EOF属性应改为FASLE,此时将新的数据添加到数据库,并给出提示代码如下。 If rs_bookstyle.EOF Then rs_bookstyle。AddNew rs_bookstyle。Fields(0) = Trim(Text1.Text) rs_bookstyle。Fields(1) = Trim(Text2.Text) rs_bookstyle.Update MsgBox ”添加图书类别成功!, vbOKOnly, ” rs_bookstyle。CloseEls

36、e如果有重复,则给出提示,然后将焦点设置给TEXT1,并将所有的文本框清空,代码如下。 Else MsgBox 读者类别重复!, vbOKOnly + vbExclamation, ” Text1。SetFocus Text1.Text = rs_bookstyle.Close Exit SubEnd IfEnd Sub添加图书信息窗体的实现添加图书信息窗体由1个Frame控件、1个Combox控件、2个CommandButton控件、6个Text控件和7个Label控件作为标识,6个Text控件和1个ComboBox控件用于接收用户输入,2个CommandButton控件作为“确定”和“取消

37、”按钮。运行时的窗体如下:图书查询窗口期刊查询窗口用户查询窗口期刊打印窗口当单击“图书管理/图书信息管理/添加图书信息”菜单时,弹出如下代码:Private Sub Command1_Click()Dim rs_addbook As New ADODB。RecordsetDim sql As StringIf Trim(Combo1。Text) = ” Then MsgBox 请选择图书种类”, vbOKOnly + vbExclamation, Combo1.SetFocus Exit SubEnd IfIf Trim(Text1.Text) = ” Then MsgBox 图书编号不能为空

38、”, vbOKOnly + vbExclamation, ” Text1.SetFocus Exit SubEnd IfIf Trim(Text2.Text) = ” Then MsgBox 书名不能为空”, vbOKOnly + vbExclamation, ” Text2.SetFocus Exit SubEnd If If Not IsDate(Text5.Text) Then MsgBox 请按照yyyymm-dd格式输入日期”, vbOKOnly + vbExclamation, ” Text5.SetFocus Exit Sub End If If Not IsDate(Text6

39、.Text) Then MsgBox ”请按照yyyymm-dd格式输入日期, vbOKOnly + vbExclamation, ” Text6.SetFocus Exit Sub End Ifsql = ”select * from 书籍信息 where 书籍编号= Text1。Text & ”rs_addbook.Open sql, conn, adOpenKeyset, adLockPessimisticIf rs_addbook.EOF Then rs_addbook.AddNew rs_addbook.Fields(0) = Trim(Text1。Text) rs_addbook.

40、Fields(1) = Trim(Text2。Text) rs_addbook.Fields(2) = Trim(Combo1.Text) rs_addbook。Fields(3) = Trim(Text3。Text) rs_addbook。Fields(4) = Trim(Text4。Text) rs_addbook。Fields(5) = Trim(Text5。Text) rs_addbook.Fields(6) = Trim(Text6.Text) rs_addbook。Fields(7) = ”否” rs_addbook.Update MsgBox ”添加书籍信息成功!, vbOKOnly, ” rs_addbook

展开阅读全文
部分上传会员的收益排行 01、路***(¥15400+),02、曲****(¥15300+),
03、wei****016(¥13200+),04、大***流(¥12600+),
05、Fis****915(¥4200+),06、h****i(¥4100+),
07、Q**(¥3400+),08、自******点(¥2400+),
09、h*****x(¥1400+),10、c****e(¥1100+),
11、be*****ha(¥800+),12、13********8(¥800+)。
相似文档                                   自信AI助手自信AI助手
搜索标签

当前位置:首页 > 学术论文 > 其他

移动网页_全站_页脚广告1

关于我们      便捷服务       自信AI       AI导航        获赠5币

©2010-2024 宁波自信网络信息技术有限公司  版权所有

客服电话:4008-655-100  投诉/维权电话:4009-655-100

gongan.png浙公网安备33021202000488号   

icp.png浙ICP备2021020529号-1  |  浙B2-20240490  

关注我们 :gzh.png    weibo.png    LOFTER.png 

客服