VB中的ADO对象编程资料PPT课件.ppt

VB中的ADO对象编程ADO(ActiveXDataObjects)ActiveX数据对象VB应用程序先在VB工程中把ADO对象库加载上5一、通过DSN建立连接1、DSN分类：
系统DSN：可以被登陆到系统中的所有用户使用。
用户DSN：为特定用户建立的，只能被建立他的用户使用。
文件DSN：用于文档的DSN。

9101112133、建立SQLServer系统DSN15Dimcnaasnewadodb.connection
Dimcnbasnewadodb.connection
Privatesubcommand1_click()
Dimcnastringasstring
Cnastring=“dsn=sqlpubs;uid=sa;pwd=1234”‘SQLDSN数据源的连接字符串
Withcna
.connectionstring=cnastring
.connectiontimeout=10
.open
Endwith
或：cna.open“dsn=sqlpubs;uid=sa;pwd=1234”
或：can.openCnastring
Cna.close‘关闭连接
EndsubPrivatesubcommand2_click()
Dimcnbstringasstring
Cnbstring=“dsn=aa;uid=;pwd=”‘AccessDSN数据源的连接字符串
Withcnb
.connectionstring=cnastring
.connectiontimeout=10
.open
Endwith
或：cnb.open“dsn=aa;uid=;pwd=”
Cnb.close‘关闭连接
Endsub二、直接使用数据库文件名ADO中比较重要的是:Command,Connection,Recordset对象1、如何连接数据源利用Connection对象可以创建一个数据源的连接.应用的方法是Connection对象的Open方法.语法:Connection对象.OpenConnectionString,UserID,PassWord,OpenOptions其中：Connection对象为你定义的Connection对象的实例;ConnectionString为可选项,包含了连接的数据库的信息;UserID可选项,包含建立连接的用户名;PassWord为可选项,包含建立连接的用户密码;OpenOptions为可选项,假如设置为dConnectAsync,则连接将异步打开.
例：cn.openCnstring
2.打开记录集对象实际上记录集返回的是一个从数据库取回的查询结果集.因此有三种打开方法:
一种使用记录集的Open方法。
另一种是用Connection对象的Execute方法.
一种是用Command对象的Execute方法.
(a)记录集的Open方法语法:Recordset.OpenSource,ActiveConnection,CursorType,LockType,Options其中：Recordset为所定义的记录集对象的实例.Source可选项,指明了所打开的记录源信息.可以是合法的命令,对象变量名,SQL语句,表名,存储过程调用,或保存记录集的文件名.ActiveConnection可选项,合法的已打开的Connection对象的变量名,或者是包含ConnectionString参数的字符串.CursorType可选项,确定打开记录集对象使用的指针类型.LockType可选项确定打开记录集对象使用的锁定类型.(b)Connection对象的Execute方法语法:Setrecordset=Connection.Execute(CommandText,RecordsAffected,Options)参数说明:CommandText一个字符串,返回要执行的SQL命令,表名,存储过程或指定文本.RecordsAffected可选项,Long类型的值,返回操作影响的记录数.Options可选项,Long类型值,指明如何处理CommandText参数.(c)Command对象的Execute方法
使用Command对象的Execute方法执行CommandText属性中设置的SQL命令,返回查询记录集.语法如下:Command.ExecuteRecordsAffected,Parameters,Options'不返回记录集或者SetRecordset=
command.Execute(RecordsAffected,Parameters,Options)‘返回记录集
CommandText的语法为:Command.CommandText=stringvariable其中:stringvariable为字符串变量