一、提交单条SQL语句 下面以一次数据库插入为例 1.定义连接字符串:Server=....;DataBase=StudentManageDB;Uid=sa;Pwd=admin,如果是连接非本机的数据库,在Server之后填写IP地址,Server服务器地址,DataBase数据库名,Uid用户名...并封装Connection和Sql语句SqlCommand cmd = new SqlCommand(sql, conn);创建Command对象的方法很多这里我们使用个人觉得比较简便的方法 6.执行操作...ExecuteNonQuery方法int result = cmd.ExecuteNonQuery(); result的值为受影响的行数 7.关闭连接conn.Close(); namespace ADO.NETDemo...} Console.ReadKey(); } } } 二、提交多条Sql语句 将多条sql语句中间通过分号连接“;”,例子如下 namespace ADO.NETDemo
大致操作过程: _Connectionptr : CreateInstance , Open , ......#import "C://program files//commonfiles//system//ado//msado15.dll" no_namespacerename ("EOF","adoEOF"...) 2、链接数据库 CoInitialize(NULL); //初始化Com组件 _ConnectionPtr conPtr...//Connection用于与数据库服务器的链接 conPtr.CreateInstance(__uuidof(Connection)); //Connection用于与数据库服务器的链接另一种方式...//数据库链接指针 //conPtr.CreateInstance("ADODB.Connection"); //Connection用于与数据库服务器的链接
操作数据库有增加、修改、删除、查询记录等,在前面的例子中,用的基本都是查询,这种是需要得到结果数据的,另外几种是修改数据库里的数据,很多时候是不需要返回数据的。...所以抽象出来就是一种需要返回结果,一种不需要,这样2种操作数据库的功能,所以在CADO里面增加2个函数: Function Execute(StrSql As String) As Long On...As CADO Set ado = NewCADO() '打开数据库 If ado.OpenDB(ThisWorkbook.fullname) Then...因为我们是在Excel里使用,很多时候读取数据库后数据都是输出到单元格中,那么进一步处理CopyFromRecordset,这个也做到CADO里面,增加一个输出到Excel的函数: Function ResultToExcel...As CADO Set ado = NewCADO() '打开数据库 If ado.OpenDB(ThisWorkbook.fullname) Then
目录: 1、数据库的基础知识以及创建Access数据库 2、数据库的接口 3、使用ADO或ADO控件访问数据库 上篇文章,为大家讲解了数据库的接口,大家对ADO也有了较为基础的了解...VB为用户提供了很多访问数据库的方式: 【方法一】使用ADO对象,通过编写代码访问数据库 【方法二】使用ADO Data控件和数据环境设计器创建数据库连接,不编写代码访问数据库 一、首先我还是以Access...数据库为例,介绍ADO对象访问数据库。...ADO对象是连接应用程序和数据库的桥梁。...二、使用ADO Data控件和数据绑定设计器访问数据库 1、先介绍ADO Data控件访问数据库 在“工程”/“部件”中选中Microsoft ADO Data
连接第一步(要仔细看)对于小白来讲,这里的教程最详细,连接ADO数据库第一步,要添加什么部件呢?全称是Microsoft ADO Data Control 6.0 (SP6) (OLEDB) 部件。...寻找Microsoft ADO Data Control 6.0 (SP6) (OLEDB) 部件VB用ADO连接SQLServer数据库'数据源信息常量 Public Const conn As String...,可以访问数据库的次数 Private IsConnect As Boolean '标记数据库是否连接 Private Connect_Num As Integer '标记执行Connect()函数后访问数据的次数..." End End If '设置连接标识,表示已经连接到数据库 IsConnect = TrueEnd Sub '断开与数据库的连接Private Sub DisConnect() Dim rc...,计数器复位Public Sub DBapi_Disconnect() Connect_Num = 0 DisconnectEnd Sub '执行数据库操作语言'byval 就是按参数的值传递,再传递过程中
在前面介绍的一些操作数据库的代码中,可以看到,主要的操作逻辑基本上是打开数据库-操作-关闭数据库,很多时候改变的仅仅是操作,所以,把这些封装到一个类里面,以后调用自己写的类就会更方便。...因为ADO这个东西不仅仅只有Excel VBA可以调用,只要能调用COM组件的语言都是可以使用的,所以ADO实现的方法和属性都是通用性的,对于使用Excel VBA的人来说,有些时候为了方便在Excel...添加这个引用的目的是为了使用前期绑定,方便输代码,因为使用了VBAProject来管理代码,以后其他文件需要操作数据库都添加引用这个文件即可,不会再需要添加引用ADO。...ADODB.Connection '用来返回错误,通过GetErr函数 Private StrErr As String 然后输入类的初始、销毁代码,主要就是声明ADODB.Connection以及关闭数据库...实现OpenDB 打开数据库就是调用ADO的Open方法,在打开的时候,主要是需要写好Provider字符串,前面基本上是使用Excel来做测试的,但是数据库有很多种,不同的数据库Provider字符串是不一样的
添加数据:尝试过使用Recordset的Update功能,并不是所有数据库都支持,所以还是启用事物,逐条添加: '插入数据 Function InsertDB() As RetCode '选择数据源
摘要:接下来的几篇博客将要讲到如何使用ado.net实现简单的数据库操作,包括增删改等内容。...首先会介绍基础的数据库操作,然后以一个实例来进行讲解,这个实例会把一个数据表读取到winform上,然后在winform上有一些按钮和文本框,通过这些实现对数据库里的内容的增删改的操作。...,详细的说一下ado.net的简单数据库操作。...第二部分、数据库操作 数据库操作部分接在上面的第四步,这里又细分了几步,看下面: 1.编写sql语句 这是啥意思呢,其实就是先写个sql = "XXX",比如,你要查询某个表中的全部内容,那你就要写...好了,关于ado.net数据库的操作今天就说到这里啊,剩下的晚上再写啊。 写的东西比较浅,没什么含量,太菜了,有什么失误的地方,希望看到的同学可以留言告知,谢谢! QQ:3074596466
最近在学习ADO与数据库的相关知识,现在我将自己学到的东西整理写出来,也算是对学习的一种复习。...这篇文章主要说明如何遍历某台机器上所有的数据库服务,遍历某个服务中所有的数据库,遍历数据库中的所有表以及表中所有字段字段,最后再说明如何通过ADO操作数据库中的表。...,实现这个功能没有什么特殊的函数,主要是对系统表的应用,我们用的是系统表master.sys.database,该表中记录了服务中所有的数据库,通过ADO的方式来进行操作: //初始化COM组件库 CoInitialize...: 该操作也是使用系统表的内容,代码如下: //遍历test数据库中所有表 cout << "数据库中所有表:" << endl; pRecord->Open("use test SELECT name...,遍历其中的所有数据库,根据获取到的数据库获取数据库中所有表,进到某一个表中遍历所有字段,有了字段用户就可以通过SQL语句操作某个表或者其中的某个字段了
DB信息:就是手动记录历史DB用的按钮,开始是想打开一个新的数据库就自动记录,后来发现更多的都是临时操作一下,不值得记录,所以干脆做成一个按钮来记录。...End If End Sub 这里做了一个这样的处理:因为直接记录数据库的文件名或者udl文件名,可能不大好记忆,所以需要在customUI的comboBox(scbInput)里先输入一个描述。...MsgBox "请选择数据库。"...+ "'") Then MsgBox MPublic.dbinfo.GetErr End If End If End Sub 删除sql:删除当前连接的数据库的常用...sql语句 Sub rbDelSQL(control As IRibbonControl) If DB_Info.db Is Nothing Then MsgBox "请选择数据库
这里以自己的理解简单说说ADO: Conection 操作数据库和操作文件类似,像Open读取文件里那样,首先就是要打开文件,获取一个指向文件的指针。...操作数据库也差不多,首先也得打开数据库,ADO里叫做连接数据库,首先New一个Connection类,然后调用Open方法来连接数据库,只有连接成功了才能去操作数据库。...Recordset ADO读取数据库的数据,不管是使用Connection的Excute、Recordset的Open、Command的Excute,都是读取到Recordset这个类中,之后才能在VBA...Excel VBA为了方便操作,在Range对象上实现了CopyFromRecordset 方法,方便使用者直接从Recordset对象中读取数据到单元格,这是Excel VBA使用ADO来操作数据库的一个方便之处...,可以加快数据库操作的速度。
这里说到的对Excel进行的各种各样的操作,在数据库里就相当于是对数据库进行了很多步修改操作(像Update、Insert、Delete语句都是修改操作)。...事务就相当于是那个保存的按钮,这些对数据库的修改操作,可以使用事务这个东西来控制要么一次性全部执行操作,要么就回到操作之前的状态。 这么控制有什么用呢?...具体在VBA里的使用就非常的简单了,直接调用ADO的方法就可以了: Function Begin() As Long AdoConn.BeginTrans End Function Function...,但是前面也说到过,仅仅是把Excel当作数据库来处理,Excel不是真正的数据库,很多数据库的特性是不支持的,其中事务就不能支持: 虽然执行了Rollback,但是insert的数据还是被保存了。...下面看下sqlite数据库: 可以看到,执行了Rollback,insert的数据没有保存到数据库。 执行了Commit,insert的数据才保存到数据库。
学习ADO时总结的一些经验 用ADO操作数据库的方法步骤 ADO接口简介 ADO库包含三个基本接口:_ConnectionPtr接口、_CommandPtr接口和_RecordsetPtr接口。...基本流程 (1)初始化COM库,引入ADO库定义文件 (2)用Connection对象连接数据库 (3)利用建立好的连接,通过Connection、Command对象执行SQL命令,或利用Recordset...,编译的时候系统会为我们生成msado15.tlh,ado15.tli两个C++头文件来定义ADO库。...\\test.mdb","","",adModeUnknown); (2)通过DSN数据源对任何支持ODBC的数据库进行连接: m_pConnection->Open("Data Source=adotest...所有数据库的操作都会立即在各用户记录集上反应出来。 adOpenStatic = 3 //静态光标。
stringbuilder 类 stringbuilder类:用来定义可变字符串 stringbulider Append(string value) 在结...
读取:主要是要读取数据库中的数据,但平时操作数据库还经常会需要读取表名、字段信息,所以这2个功能也做了,就是简单的输出前面得到的TableInfo结构体信息即可: '输出所有表名 Sub rbbtnOutTableName
这里只是个简单不能再简单的VB小程序实例,但它包含这几个关键字:VB6.0、ADO、Access环境:visual basic 6.0 企业版(非精简版,不然会缺少必须的控件)数据库:Access数据库...,数据库是xs.mbd,内建表为xj结果:vb使用ADO连接access数据库,查询xj表中的所有数据,然后把查询到的结果循环输出到窗口中。...代码:Private Sub Form_Click()Dim db As New ADODB.Connection, RS As New ADODB.Recordset 'ADO连接对象和记录集Dim...db.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;Data source =" & App.Path & "/xs.mdb" '数据库连接...db.Open '打开数据库strSQL = "select * from xj" 'SQL字符串RS.Open strSQL, db, 3, 1 '查询数据表Do While Not RS.EOF '
历史DB:使用文件选择器来找需要打开的数据库,已经比较方便了。 但是如果是经常使用的数据库,还是希望能够一键就打开,这种时候就需要在菜单上显示出来。...既然是操作数据库的程序,那么就用数据库来保存这些信息,我使用的是sqlite数据库来保存: '动态显示历史打开过的DB,保存在DBOperate.sqlite Sub dymHistoryDBPath_getContent...这样dynamicMenu就动态的将常用数据库显示出来,每次需要打开的时候只需要点击dynamicMenu下的按钮菜单即可: '历史菜单的打开数据库 Sub rbdymOpenDB(control As...,还会更新数据库的打开时间,这样动态加载的时候,最近一次打开的就排在第一位。...同时会读取对应的这个数据库保存的一些常用的sql语句,都是为了方便操作。
就是把数据库的所有表的数据都读取出来: Sub rbbtnAllTableAllData(control As IRibbonControl) Dim i As Long If
ADO的Connection对象有一个OpenSchema方法,能够获取数据库的很多信息,比如表的名称等信息、字段的名称等信息,具体可以查看SchemaEnum枚举类型。...在操作数据库的过程中,很多时候会需要得到一些数据库的信息,这个时候就可以使用OpenSchema,在CADO里面增加一个最基础的获取表的名称的函数: Function GetTablesName(ret...这个函数可以很好的获取Access数据库的表名、Excel表格的Sheet名等,但sqlite数据库似乎不能够获取到,这可能是驱动程序的原因。...不过sqlite数据库可以使用其他方式来读取所需要的信息,并不一定要使用OpenSchema。 至于其他的数据库类型,因为个人较少使用,所以也没有去测试。
ADO读取字段信息也可以使用OpenSchema,但是有的数据库也不一定支持。...像读取表名那样,很多数据库都有特定的sql语句,但是又存在返回的信息不统一的问题,特别是对字段类型的描述,不同数据库之间差异较大。
领取专属 10元无门槛券
手把手带您无忧上云