设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 3007|回复: 3
打印 上一主题 下一主题

[ADO/DAO] 我是ADO新手

[复制链接]

点击这里给我发消息

跳转到指定楼层
1#
发表于 2015-1-12 15:33:58 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 zhidao 于 2015-1-24 17:16 编辑

前段时间了发了一个ADO编程入门教程的帖子,很高兴得到了大家关注,证明还是有一部分人想接触ADO的,作为我们这小部分新手,面对它就像看见大山了一样迷茫,无从下手,因为不了解所以迷茫,所以来这里寻找学习方法,想让你们引导我们,分享你们的学习经验。


                                                  

                          高手!高手!在哪里。

                              分享:
                                     【入门教程】Roych版主总结的Access使用ADO开发的教程
                                  利用ADO实现不绑定记录源,录入实例:

        本人也是新手,正在学习ADO,发此贴的目的就是分享一下我学到的东西,解释不周的地方望各位见谅,指正。
创建ADO对象
创建ADO对象方法1:
在工具栏”引用“下选择MicrosoftActiveXDataObjects2.xLibrary
Dim cnn As New ADODB.Connection   ‘创建连接对象

Dim cnn As New ADODB.Recordset    ’创建记录集对象
创建ADO对象方法2:
Dim cnn As Object, rst As Object   
Set cnn=CreateObject("ADODB.Connection") (连接对象 )
Set rst=CreateObject("ADODB.Recordset")    (记录集对象)

  Connection对象
---------建立连接方法1:用OPEN方法建立连接---------
连接对象变量名.OPEN 连接字符串
----------关闭连接释放系统资源--------
连接对象变量名.Close  或  Set 连接对象变量名=Nothing
关闭对象并非将它从内存中删除,以后仍可以更改它的属性设置并且再次打开。若要将对象从内存中完全删除,可将对象变量设置为Nothing。

Recordset对象
-------OPEN方法---------
记录对象变量名.Open 数据来源, 连接对象, 指针类型, 锁定方式, 数据源类型
Open方法的参数较多,其含义详细介绍如下。
数据来源:此参数提供一个打开后要执行的命令,代表要从数据库中选取的数据,可以是数据库中一个数据表的名称,也可以是SQL语法所组成的字符串。
数据链接:它的取值是一个连接对象名称。
指针类型:此参数用来设定RecordSet对象在打开数据库时所使用的记录指针类型,此参数有四种类型可选
               AdOpenForwardOnly(0:缺省值):记录指针在读取数据时,仅可以从第一条记录依次向读取下一条记录(顺序浏览)。但RecordSet对象有些属性及方法在此参数时不能被使用,且记录集是只读的。
               adOpenKeyset :索引键集指针,参数值为1。记录指针可以自由移动,此种类型的记录指针可以保证用户在从数据库中读取记录时,并不会读取到其它用户在同一个表中增加或删除的记录,但其它用户修改表的结果将可以被看到。
                adOpenDynamic :动态指针,参数值为2。其它用户对数据表所做任何修改或增删记录操作都会立即反映到RecordSet对象中。记录指针可以自由移动。
               adOpenStatic :静态指针,参数值为3。 其它用户对数据表进行了修改或增删记录操作,则RecordSet对象中存储的值完全不会随着改变,完全不受其它用户有影响。
锁定方式:此参数是设置RecordSet对象的并发事件的控制方式,其取值和含义如下表:
                adLockReadOnly : 参数值为1(默认值),是以只读方式打开,其它用户不能修改任何数据。
               adLockPerssimistic: 参数值为2 ,当数据源的数据正在被更新时,系统会锁定记录,禁止其它用户的操作。允许任何两个用户更新同一条记录,当RS(“字段名”)=表达式值语句被执行时,系统自动进行锁定此记录的状态,当执行UPDATE后系统自动对此记录解锁。     adLockOptimistic: 参数值为3, 当数据源的数据正在被更新时,系统不锁定,允许其它用户对该数据库进行操作,只有在调用UPDATE方法写入到数据库时才被锁定,写入完成后自动解锁。
               adLockBatchtimistic:参数值为4, 当数据源的数据正在被更新时,记录不会被锁定,直到使用UPDATEBATCH方法将所有的记录成批地写入数据库时才锁定记录,写入完成后,自动解锁。


--------利用记录集OPEN方法连接access自身表格的方法:------
Private Sub 录入_Click()
Dim jiluji As New ADODB.Recordset
jiluji.Open "数据表名称", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
jiluji.AddNew
jiluji("字段名称") = "1"
jiluji.Update
End Sub




分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

2#
 楼主| 发表于 2015-2-8 13:50:58 | 只看该作者
本帖最后由 zhidao 于 2015-2-8 22:14 编辑

ADO问:
          1、有更改的行数已超过限制
3#
发表于 2015-2-8 16:26:16 | 只看该作者
谢谢分享
回复

使用道具 举报

4#
发表于 2015-2-8 22:23:36 | 只看该作者
谢谢分享 学习中
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-5 19:07 , Processed in 0.096232 second(s), 27 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表