【开发者开源大赛】入门级ADO类v1.33H,通杀win平台数据库!【放血推荐】

天机科技

ADO (ActiveX Data Objects）是一种程序对象，用于表示用户数据库中的数据结构和所包含的数据。在 Microsoft Visual Basic 编辑器中，可以使用ADO对象以及ADO的附加组件（称为Microsoft ADO Extensions for DLL and Security(ADOX)）来创建或修改表和查询、检验数据库、或者访问外部数据源。还可在代码中使用ADO来操作数据库中的数据。

什么是 ADO？

• ADO 是一项微软的技术
• ADO 指 ActiveX 数据对象（ActiveX Data Objects）
• ADO 是一个微软的 Active-X 组件
• ADO 会随微软的 IIS 被自动安装
• ADO 是一个访问数据库中数据的编程接口
  

ADO库包含三个基本接口:_ConnectionPtr接口、_CommandPtr接口和_RecordsetPtr接口。

当前最新版：v1.33H
作者：原野，BUG反馈QQ：860067266，QQ交流群：93902676

' #1.33h版本
' 2016年12月13日 19:45:31 修复 记录集类型.查找()位置不准确的BUG,感谢易友【君俊】提供代码
' 2016年12月13日 19:47:09 新增 记录集类型.创建记录集(),用于当本记录集类作为全局变量或程序集变量时初始化失败BUG,感谢易友【君俊】提供代码
' 2016年12月13日 19:56:46 新增 库连接类型.新建Ac库表(),用于不安装Access来创建库文件,感谢易友【君俊】提供代码
' 2016年12月13日 19:59:02 修正 离线集类型的部分方法调用错误代码和备注
' 2016年12月13日 19:59:57 修正 离线集类型不能为全局或程序集变量的BUG
' 2016年12月13日 20:00:56 修正 离线集类型在为全局变量时载入字节集()和取记录数()失败的BUG.
' 2016年12月14日 19:44:26 修复 库连接类型.新建Ac库表()数据类型错误BUG,原因:字段类型是数组用成了变量

入门级ADO类1.33H,通杀win平台数据库!         
        

---

记录操作为何频频出错?多线程下程序为何总是崩溃?数据丢失究竟是何缘由?BUG一出再出的背后到底隐藏着什么?这一切背后是人性的扭曲还是道德的沦丧?是智商的爆发还是菜鸟的无奈?史诗级灾难片《从0到1》

---

资源分流：《百度云盘》      《易语言TV》        《TX视频》

《从0到1》 名称：从0到1　 作者：原野 上架时间：2016年4月18日
标题	阅读	时长	更新时间
※ 第1集 《ADO类的介绍》	484	18分	2016-03-20 00:00:00
※ 第2集 《ADO类的应用》	294	54分	2016-03-20 00:00:00
※ 第3集 《模块化与画流程图》	200	37分	2016-03-27 00:00:00
※ 第4集 《模块化的层级封装》	179	23分	2016-03-27 00:00:00
※ 第5集 《传输引擎介绍》	172	36分	2016-04-10 00:00:00
※ 第6集 《自定义协yi构建》	170	50分	2016-04-14 00:00:00
※ 第7集 《自定义协yi应用》	159	56分	2016-04-15 00:00:00
※ 第8集 《本地化远程查询》	231	20分	2016-05-05 00:00:00
※ 第9集 《简易动态多站点》	266	23分	2016-05-07 00:00:00
※ 第10集 《同步CMS》	230	80分	2016-05-19 00:00:00
※ 第11集 《多线程、线程池、多进程、分布式》	324	32分	2016-05-22 00:00:00
※ 第12集 《ADO类1.33F》	118	32分	2016-11-26 03:59:10

ADO类1.33h.rar (51.81 KB, 下载次数: 515)

2016-12-14 21:10 上传

点击文件名下载附件

作者语：前面开源了不少帖子，基本上都是力气活含金量不高，但是这个模块绝对的高精尖技术，在易语言里面属于高级教程了。我只能说这模块源码不是一般人能驾驭的，能够精通此模块数据库方面基本通杀了，目前使用此模块的易友已经破百了，模块还在持续更新ing。我一般不开源，开源就来点重量级的。大家看在我“放血推荐”的份上给我刷点票啥的支持下哈。

                                                               ↓       在下面         ↓       的按钮        ↓       多来点         ↓




补充内容 (2016-12-16 19:42):
' 2016年12月16日 19:38:02 修正 记录集类型.保存到Excel()参数丢失的BUG,感谢易友【う网淅乄】的反馈

.版本 2
.子程序 保存到Excel, 逻辑型, 公开, 将指定库的数据表导出保存到xls文件且需要office支持,成功返回真,感谢易友【う网淅乄】反馈的参数空的BUG
.参数 参库索引, 数据库类型
.参数 参Excel路径, 文本型, , .xls为后缀,导出的文件路径,如果存在重名则覆盖
.参数 参数据表名, 文本型, , 导出的数据表名
.局部变量 SQL语句, 文本型
.如果真 (文件是否存在 (参Excel路径))
     删除文件 (参Excel路径)
.如果真结束
SQL语句 ＝ “Select * Into [Excel 8.0;database=%db].%tb From %tb”
SQL语句 ＝ 子文本替换 (SQL语句, “%db”, 参Excel路径, , , 真)
SQL语句 ＝ 子文本替换 (SQL语句, “%tb”, 参数据表名, , 2, 真)
打开 (参库索引, SQL语句, 真)  ' 如果返回假,可尝试修改游标位置
关闭 ()
返回 (文件是否存在 (参Excel路径))

byronzhj

SQL保存到数组有问题，然后看了源码，是源码的问题

lm88818

感谢分享，很给力！~

nydqg

dddddddddddddddddddddddddd

起風了

好东西，开源精神！

laojikiss200

学习了·············楼主辛苦······

kolins007

谢谢 楼主分享

lq850815

支持开源~！感谢分享!

skyflb

入门级ADO类v1.33H,通杀win平台数据库!

tmtony

谢谢分享

lm88818

支持开源~！感谢分享!