易语言ADODB数据库类操作实例源码

系统结构:取记录集对象,取连接对象本身,连接,连接Access数据库,连接SqlServer数据库,连接Firebird数据库,连接MYSQL数据库,关闭,新建数据表,新建数据表_SQL方式,执行SQL1,执行SQL2,是否已连接,开始事务,提交事务,回滚事务,取ADODB版本,打开,关闭,是否已打开,记录数量,添加记录,删除记录,读字段名记录,读字段序号记录,写字段名记录,写字段序号记录,跳到记录,下一条,上一条,到首记录,到尾记录,首记录前,尾记录后,更新,撤销,批量更新,批量撤销,取字段名,取字段类型,取类型名,取每页记录数,置每页记录数,取总页数,取当前页号,置当前页,过滤,取字段定义长度,取字段数,写字节集,置游标位置,初始化高级表格,显示分页数据,公共_高级表格初始化,公共_文件到字节集,公共_添加数据到记录集,公共_修改记录集数据,公共_删除记录集数据,CoInitialize,CoUninitialize,

======ADODB数据库类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 取记录集对象
           |  |
           |  |------ 取连接对象本身
           |  |
           |  |------ 连接
           |  |
           |  |------ 连接Access数据库
           |  |
           |  |------ 连接SqlServer数据库
           |  |
           |  |------ 连接Firebird数据库
           |  |
           |  |------ 连接MYSQL数据库
           |  |
           |  |------ 关闭
           |  |
           |  |------ 新建数据表
           |  |
           |  |------ 新建数据表_SQL方式
           |  |
           |  |------ 执行SQL1
           |  |
           |  |------ 执行SQL2
           |  |
           |  |------ 是否已连接
           |  |
           |  |------ 开始事务
           |  |
           |  |------ 提交事务
           |  |
           |  |------ 回滚事务
           |  |
           |  |------ 取ADODB版本
           |  |
           |  |
======ADODB记录集类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 打开
           |  |
           |  |------ 关闭
           |  |
           |  |------ 是否已打开
           |  |
           |  |------ 记录数量
           |  |
           |  |------ 添加记录
           |  |
           |  |------ 删除记录
           |  |
           |  |------ 读字段名记录
           |  |
           |  |------ 读字段序号记录
           |  |
           |  |------ 写字段名记录
           |  |
           |  |------ 写字段序号记录
           |  |
           |  |------ 跳到记录
           |  |
           |  |------ 下一条
           |  |
           |  |------ 上一条
           |  |
           |  |------ 到首记录
           |  |
           |  |------ 到尾记录
           |  |
           |  |------ 首记录前
           |  |
           |  |------ 尾记录后
           |  |
           |  |------ 更新
           |  |
           |  |------ 撤销
           |  |
           |  |------ 批量更新
           |  |
           |  |------ 批量撤销
           |  |
           |  |------ 取字段名
           |  |
           |  |------ 取字段类型
           |  |
           |  |------ 取类型名
           |  |
           |  |------ 取每页记录数
           |  |
           |  |------ 置每页记录数
           |  |
           |  |------ 取总页数
           |  |
           |  |------ 取当前页号
           |  |
           |  |------ 置当前页
           |  |
           |  |------ 过滤
           |  |
           |  |------ 取字段定义长度
           |  |
           |  |------ 取字段数
           |  |
           |  |------ 写字节集
           |  |
           |  |------ 置游标位置
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ _连接MYSQL_被单击
           |  |
           |  |------ _连接Firebird_被单击
           |  |
           |  |------ _连接access_被单击
           |  |
           |  |------ _连接Sqlserver_被单击
           |  |
           |  |------ _添加_被单击
           |  |
           |  |------ _修改_被单击
           |  |
           |  |------ _分页_被单击
           |  |
           |  |------ _删除_被单击
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 初始化高级表格
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _显示记录_被单击
           |  |
           |  |------ _测试_被单击
           |  |
           |  |------ _高级表格1_被单击
           |  |
           |  |------ 显示分页数据
           |  |
           |  |------ _上一页_被单击
           |  |
           |  |------ _下一页_被单击
           |  |
           |  |
======公共_程序集
           |  |
           |  |------ 公共_高级表格初始化
           |  |
           |  |------ 公共_文件到字节集
           |  |
           |  |------ 公共_添加数据到记录集
           |  |
           |  |------ 公共_修改记录集数据
           |  |
           |  |------ 公共_删除记录集数据
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CoInitialize
           |  |
           |  |---[dll]------   CoUninitialize

调用的DLL命令:

.DLL命令 CoInitialize, 整数型, "Ole32.dll"
    .参数 pvReserved, 整数型

.DLL命令 CoUninitialize, , "Ole32.dll"