ADO开发手册

Size: px

Start display at page:

Download "ADO开发手册"

矮骆
6 years ago
Views:

1 ADO 开发手册非官方文档作者 : 孙雪青日期 : 2002 年 3 月 28 日星期四版本 : alphasun@263.net.cn 概述我在用 ADO 的时候 (VC++ 6.0) 遇到的最大的问题是没有文档, 查看头文件进行开发, 心里往往对一个函数的调用没有底所以非常希望有一篇文档 ( 无论是官方的还是民间的 ) 能够指导我进行相关的开发可是我没找到在做我的 ISAPI Extension 的过程中, 逐渐熟悉了 ADO 的脾气我把我的经验总结起来, 书写成文, 好让与我有同样烦恼的同志能够少走一些弯路这篇文档远远不是完备的 (complete), 我希望大家在看了之后, 能够把自己的经验告诉我 ( 通过 ), 好让我能够把这些宝贵的经验添加到这篇文档中, 使得大家能够共享这可贵的资料而体验开发的乐趣感谢希望大家能够提供各自的经验, 您的名字将在出现在这里让我们一同来感谢提供宝贵经验的人修订历史 2002 年 3 月 28 日星期四创建本文档使用 ADO 的基本流程使用 ADO, 我们需要将下面的语句添加到 stdafx.h 中, 如此把 ADO 的库引入到工程中 #import "c:\program files\common files\system\ado\msado15.dll" no_namespace rename("eof","adoeof") 根据机器安装时候的设置不同具体的路径可能不一样编译的时候会出现如下的警告信息 msado15.tlh(405) : warning C4146: unary minus operator applied to unsigned type, result still unsigned MSDN 建议我们不要理会当然, 我们可以在 stdafx.h 中加入 #pragma warning(disable:4146) 1

2 这样这个警告信息就会被抑制 1 初始化 COM 系统 ADO 使用了 COM, 所以在使用 ADO 之前, 请确认你的程序已经对 COM 系统进行了初始化, 否则无法使用 COM, 当然也就无法使用 ADO 了对于单一线程的程序使用 AfxOleInit() 或者 CoInitialize(0) 肯定能够成功, 但是对于多线程的程序, 情况比较复杂, 仅仅在主线程里面初始化是不行的, 需要在子线程里面初始化, 但是所有子线程只要初始化一次即可, 即 N 个子线程只要初始化一次而不用初始化 N 次准备一个数据库连接的接口我们的数据库连接使用 _ConnectionPtr, 这样, 我们调用 CreateInstance() 得到接口 : _ConnectionPtr m_pconnection; m_pconnection.createinstance("adodb.connection"); 于是我们得到了一个连接的指针注意 _ConnectionPtr 是智能指针如果不作 COM 的初始化, 这里是无法得到接口的建立数据库连接根据数据库的不同, 建立的连接的方法多种多样建立连接使用 : Connection15::Open() 下面介绍 ACCESS ODBC 和 SQL Server 的连接方法 ACCESS 的连接字符串 Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb ODBC 的连接字符串 DSN=WebHunter; UID=xxx; PWD=xxx DSN 当然是 ODBC 的数据源的名字 UID 用户的帐号 PWD 口令 SQL Server 的连接字符串 Driver=SQL Server;Database=AgSite;Server= ;UID=ag;PWD=ag; Database Server UID PWD 数据库的名字服务器的 IP 地址, 离子中使用的回应地址这样的地址在 IP 协议总代表本机地址用户的帐号口令 1 得到. 半导体. 同志的提醒 2

3 准备记录集接口我们的记录集使用 _RecordsetPtr 调用 CreateInstance() 得到接口 : _RecordsetPtr m_precordset; m_precordset.createinstance("adodb.recordset"); 同样这也是一个智能指针, 也需要实现初始化 COM 系统打开记录集用 Recordset15::Open() 打开记录集使用 select 语句, 我们可以方便的从数据库中得到所需要的记录下面给出几个 select 语句的例子 : SELECT * FROM MyTable WHERE ID>100 AND Parent= 10 SELECT TOP 1 * FROM MyTable ORDER BY ID DESC 这一句的意思是对 ID 进行降序排序, 并且取得最大号码的一个数据的存入与取得通过记录集接口, 我们可以把数据存入到数据库中, 以及从数据库中取出数据参见 Recordset15::PutCollect() 和 Recordset15::GetCollect() 接口操作中传递的数据类型是 _variant_t, 免不了要作类型的转换下面给出常用的几种类型的转换方法整型 var.vt == VT_I4; int nval = var.lval; ar.vt == VT_BSTR; Cstring strval = CString(var.bstrVal); ar.vt == VT_R8; double fval = var.dblval; var.vt = VT_DATE; COleDateTime date = COleDateTime(var.date); COleDateTime date; var.date = DATE(date); 其它操作有时候执行的操作不涉及记录集, 比如创建表, 删除表, 这个时候需要用到数据库连接接口的执行 SQL 语句的功能参见 Connection15::Execute() 3

4 关闭记录集数据库最后, 别忘了关闭记录和数据库, 还有 CoUninitialize() 让 COM 也歇了 2 _RecordsetPtr 这个类型是由下面的定义而来的 _COM_SMARTPTR_TYPEDEF(_Recordset, uuidof(_recordset)); 所以它是 _Recordset 的智能指针这个类的继承链是 _Recordset Recordset21 Recordset20 Recordset15 _ADO IDispatch 下面是 _Recordset 可以使用的常用函数 template<typename _IIID> class _com_ptr_t ::CreateInstance(LPCSTR clsidstringa, IUnknown* pouter = NULL, DWORD dwclscontext = CLSCTX_ALL) 这个函数是模板里面的函数第一个参数给一个 ProgID 就可以 Recordset 的 ProgID 是 ADODB.Recordset HRESULT Recordset15::Open (const _variant_t & Source, const _variant_t & ActiveConnection, enum CursorTypeEnum CursorType, enum LockTypeEnum LockType, long Options ); 打开一个记录集 2 得到了文献 [2] 的有益提醒, 连我自己也忘了 :-) 4

5 Source ActiveConnection Cursortype LockType Option 打开的方式, 有很多种情况一般是一个 select 语句, 用来选出所需要的记录一个已经打开的数据库连接游标类型 3 adopenunspecified adopenforwardonly adopenkeyset adopendynamic adopenstatic 4 未指明, 不作特别指定向前游标采用这种光标的记录集看不到其它用户的新增删除操作, 但对于更新原有记录的操作对你是可见的动态游标, 所有数据库的操作都会立即在各用户记录集上反应出来静态游标, 它为你的记录集产生一个静态备份, 但其它用户的新增删除更新操作对你的记录集来说是不可见的锁定方式指明当一个现成打开数据库的时候, 这个数据库采用何种策略对其它线程进行共享 adlockunspecified adlockreadonly 未指明, 不作特别指定只读, 其它线程想使用数据库的话只能只读 adlockpessimistic 悲观方式, 数据在更新时锁定其它所有动作, adlockoptimistic AdLockBatchOptimistic cmd 的类型, 就是前面第一个参数的类型 adcmdunspecified adcmdunknown adcmdtext adcmdtable adcmdstoredproc adcmdfile? adcmdtabledirect? 这是最安全的锁定机制 ( 应该是并行度很低的一种形式, 比如说连读都不行 ) 乐观方式 ( 并行度较高 ), 只有在你调用 Update 方法时才锁定记录在此之前仍然可以做数据的更新插入删除等动作乐观的批处理方式 ( 以批处理的方式, 进行的高并行度操作 ), 编辑时记录不会锁定, 更改插入及删除是在批处理模式下完成不作特别指定未知类型文本, 我用这个是一个表名是一个存储过程 3 得到了文献 [2] 的有益帮助不作特别指定, 这样说比较合理, 参见文献 [2] 4 5

6 HRESULT Recordset15::AddNew( const _variant_t & FieldList = vtmissing, const _variant_t & Values = vtmissing ); 添加新的纪录 FieldList 可以什么都不给, 等到后来才给我的做法就是这样的, 先 AddNew() 然后 PutCollect(), 很有效 void Recordset15::PutCollect ( const _variant_t & Index, const _variant_t & pvar ) 把一个值放到记录中的一个字段里面去 Index 字段编号, 从 0 开始这个变量的 variant 类型请设置为 VT_I4, 别的只有可能也可以用, 不过我没有用过 pvar 字段的值 _variant_t Recordset15::GetCollect ( const _variant_t & Index ) 与 PutCollect() 相对应的, 读取字段值的方法 Index 这个变量的 variant 类型请设置为 VT_I4 含义和 PutCollect() 中的相同 _Recordset* GetInterfacePtr() 这个函数也是模板函数, 他的返回值是内部封装的 _Recordset 指针 HRESULT Recordset15::Close() 和 Open() 相对应, 我们打开了就需要关上返回值是 0 表示成功 HRESULT Recordset15::Update ( const _variant_t & Fields=vtMissing, const _variant_t & Values= vtmissing ) 当我们用 PutCollect() 改变了字段的值, 需要 Update() 否则所改变的值不会更改到数据库中可以不填写参数, 这个时候只是把 PutCollect() 所改变的部分更新 6

7 HRESULT Recordset15::Delete ( enum AffectEnum AffectRecords ) 删除记录 AffectRecords adaffectcurrent 对当前的 record 起作用 adaffectgroup? adaffectall 意思可能是对全部的记录其作用 adaffectallchapters 同样是? :-) 注意 : Delete() 之后不需要 Update() HRESULT Recordset15::MoveNext() 跳到当前的记录集中的下一个记录 _ConnectionPtr 这个也是一个智能指针, 用来做数据库的连接 _COM_SMARTPTR_TYPEDEF(_Connection, uuidof(_connection)); 下面是继承链 _Connection Connection15 _ADO IDispatch HRESULT Connection15::Open ( _bstr_t ConnectionString, _bstr_t UserID, _bstr_t Password, long Options ) 打开一个数据库连接 ConnectionString 连接字符串有好多种连接方式下面这种是 SQL Server 的连接方法 Driver=SQL Server;Database=AgSite;Server= ;UID=ag;PWD=ag; UserID 用户 ID 可以给空字符串, 只要在连接字符串中已经给出 Password 口令可以给空字符串, 只要在连接字符串中已经给出 Options 连接模式 7

8 admodeunknown admodewrite admodereadwrite admodesharedenyread admodesharedenywrite admodeshareexclusive admodesharedenynone admoderecursive 未知模式, 用这个就可以 _RecordsetPtr Connection15::Execute ( _bstr_t CommandText, VARIANT * RecordsAffected, long Options ) 执行 SQL 语句 CommandText 语句的文本 RecordsAffected 被影响到的记录 Options 选项 adcmdunspecified 未指明 adcmdunknown 未知 adcmdtext 文本形式 adcmdtable? adcmdstoredproc 存储过程 adcmdfile? adcmdtabledirect 还是? Connection15::State 这不是成员函数, 这是一个状态变量 adstateclosed 关闭 adstateopen 打开 adstateconnecting 正在连接 adstateexecuting 正在执行 adstatefetching 正在取得数据 ( 有关于这个数据的含义, 待考 ) 参考文献 [1] ADO 第一次亲密接触 -- ADO 开发实践作者 : 浙江省温岭市电信公司王骏 [2] wnchg, 在 Visual C++ 中用 ADO 进行数据库编程 8

穨ac3-6.PDF

穨ac3-6.PDF 6-1 ADO ADO Access 2000 ADO ADOX 6-1-1 ADO ADO Connection Command Recordset Parameter Field Error 6-1 6-1 ADO 6-1 Properties Property Connection ADO (Open ) Recordset Command Command SQL Connection SQL