[管理系统中计算机应用上机]去文库,查看完整内容> 内容来自用户:wj118220 1.数据库特点:数据结构化 2.修改表结构的SQL命令是ALTERTABLE 3.SQL语言中,修改表结构的命令是ALTER 4.从划分范围上看,企业信息系...+阅读
我编完了,代码如下, Attribute VB_Name = "FrmBorrowN" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Option Explicit Dim ADO As ADODB.Recordset Dim ssql As String Private Sub Cmdagain_Click() T1.Text = "" T2.Text = "" T1.SetFocus End Sub Private Sub CmdExit_Click() Unload Me End Sub Private Sub CmdOk_Click() If Trim(T1.Text) = "" Then MsgBox "请输入书号!" T1.SetFocus Exit Sub End If If Trim(T2.Text) = "" Then MsgBox "请确认书号!" T2.SetFocus Exit Sub End If If Trim(T1.Text) = Trim(T2.Text) Then ssql = "select 学号 from S_Libary where 书号='" & Trim(T1.Text) & "'" '查询此书是否借出 Set ADO = New ADODB.Recordset ADO.Open ssql, mCnDB, adOpenStatic, adLockReadOnly, adCmdText If ADO.RecordCount = 0 Then MsgBox "无此借书记录" Exit Sub End If ADO.Close ssql = "update S_Libary set 借书日期='" & Trim(Tb1.Text) & "' where 书号='" & Trim(T1.Text) & "'" '修改借书日期 mCnDB.Execute ssql ssql = "update S_Libary set 还书日期='" & Trim(Tb2.Text) & "' where 书号='" & Trim(T1.Text) & "'" '修改还书日期 mCnDB.Execute ssql ssql = "update S_Book set 借出次数=借出次数+1 where 书号='" & Trim(T1.Text) & "'" '修改该书借出次数 mCnDB.Execute ssql End If MsgBox "续借完成!" Call CmdExit_Click End Sub Private Sub Form_Load() Me.Icon = FrmMain.Icon End Sub Private Sub T1_KeyPress(KeyAscii As Integer) If (KeyAscii >= 32 And KeyAscii= 58 And KeyAscii= 32 And KeyAscii= 58 And KeyAscii
本文地址:https://www.39baobao.com/show/33_28897.html
以上内容来自互联网,请自行判断内容的正确性。若本站收录的信息无意侵犯了贵司版权,请联系我们,我们会及时处理和回复,谢谢.
以下为关联文档:
erp管理系统是什么企业资源计划系统,是指建立在信息技术基础上,以系统化的管理思想,为企业决策层及员工提供决策运行手段的管理平台。ERP系统集中信息技术与先进的管理思想於一身,成为现代企业的...
仓库管理系统软件有哪些给你介绍一款比较实用的仓库管理软件,你可以去我们公司网站上了解更详细介绍。北京富通维尔科技有限公司。 维尔科技推出的仓储管理系统WMS是专门为中小型物流公司、仓储企业...
人事管理系统有几大模块HR各大模块工作,各有侧重,但又不可分割,少了哪一个模块,都会影响整个人力资源系统功能的发挥。如果根据企业人力资源管理的不同发展阶段来划分,可以分为:低级阶段人事行政部设置1-...
建筑工程造价管理的图书目录第1章 工程造价基础知识1.1 基本建设概述1.1.1 基本建设及其相关概念1.1.2 建设项目及其分类1.1.3 建设项目组成单元的划分1.1.4 基本建设程序1.2 建设过程与计价关系本章小...
售后维修用的工单管理系统哪个好易维帮助台挺不错的,支持电话、微信、钉钉等多种客服渠道接入工单,原汁原味派单。易维APP还能实时掌控维修人员地理位置,进行地图模式派单。维修服务结束之后,客户还可以直接在A...
列出数据库管理系统的五个职责这是数据库系统概念第一章的习题答案,我翻译了一下,可能不准确。 网页链接英文答案资源 通用数据库管理系统(DBMS)有五个职责: a.与文件管理器的交互。 b.完整性实施。 C.安全性...
请列举除ACCESS之外的至少4种的主流数据库管理系统产品DB2,性能,安全没得说,适用有钱的行业; Oracle 11g 性能,安全没得说,适用有钱的行业,烟草,石油等,有钱行业最流行的数据库; sqlserver 性能安全没得说 ,一般大中型企业,比上两种便宜,算是...
如何做用java做基于web的学生成绩管理系统Java jdk , Tomcat , mysql 或者其他的数据库 ,数据库管理工具(Navicate for mysql 等), myeclipse(尽量最新版本) 这些软件尽量为最新的 。 Tomcat配置java jdk /bin下的 JAVA_HO...
数据模型的分类数据系统的构造数据库管理系统的概念分别是概念数据模型数据模型按不同的应用阶段分成三种类型、使用和维护数据库,简称dbms、删除等操作、处理对象和管理系统的集合体。它对数据库进行统一的管理和控制、逻辑数...