精易论坛

标题: 【开发者开源大赛】入门级ADO类v1.33H,通杀win平台数据库!【放血推荐】 [打印本页]
作者: 天机科技    时间: 2016-12-14 21:26
标题: 【开发者开源大赛】入门级ADO类v1.33H,通杀win平台数据库!【放血推荐】
本帖最后由 593739322 于 2016-12-14 21:36 编辑

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

什么是 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, 下载次数: 517)

作者语：前面开源了不少帖子，基本上都是力气活含金量不高，但是这个模块绝对的高精尖技术，在易语言里面属于高级教程了。我只能说这模块源码不是一般人能驾驭的，能够精通此模块数据库方面基本通杀了，目前使用此模块的易友已经破百了，模块还在持续更新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路径))
作者: jjjjjjwei    时间: 2016-12-14 21:36
支持下。。。。。。。
作者: 天机科技    时间: 2016-12-14 21:38
居然沙发被抢了！
作者: 随风而去    时间: 2016-12-14 21:43
这个要严重的顶一下
作者: 蒙顺童    时间: 2016-12-14 21:46
感谢分享，很给力！~
作者: percher    时间: 2016-12-14 21:48
给力了！还有精币拿
作者: 樱桃    时间: 2016-12-14 21:49
感谢开源！！
作者: 新纪元    时间: 2016-12-14 21:51
据说回复有奖励，我试试。
作者: 小圣2634779152    时间: 2016-12-14 21:56
6666666真给力
作者: 渁煑渔    时间: 2016-12-14 21:58
要支持一个，不错学习了，
作者: 日渐消瘦    时间: 2016-12-14 22:01
支持下。。。。。。。
作者: 玖龄后梦劭    时间: 2016-12-14 22:08
支持开源~！感谢分享
作者: ぃ低つ调の    时间: 2016-12-14 22:09
要支持一个，不错学习了，
作者: う网淅乄    时间: 2016-12-14 22:35
支持支持 正需要么
作者: rainboys    时间: 2016-12-14 23:19
支持楼主开源，感谢分享
作者: 刹那永恒    时间: 2016-12-14 23:26
支持下拉卡拉
作者: 名无所谓    时间: 2016-12-15 02:18
赞....
作者: 认真学E    时间: 2016-12-15 07:58
支持楼主开源，感谢分享
作者: sadamu9527    时间: 2016-12-15 08:02
非常感谢！感谢源码分享！
作者: 夜阑听雨    时间: 2016-12-15 08:34
有源码 有教程 太好了
作者: qdmall    时间: 2016-12-15 08:45
支持开源~！感谢分享
作者: czj1388    时间: 2016-12-15 08:54
历害了WORD哥。。。。
作者: sunmoonstar    时间: 2016-12-15 09:12
特地来支持。。。
作者: 和影子散步    时间: 2016-12-15 09:22
不知道是干什么用的 不过看上去好厉害
作者: 夏末流年    时间: 2016-12-15 09:46
好源码！！！
作者: simonlord    时间: 2016-12-15 10:32
支持开源~！感谢分享。楼主v587，一统江湖
作者: cccaaa123    时间: 2016-12-15 10:58
非常好，感谢分享
作者: gtsing    时间: 2016-12-15 11:12
作者: zz0147    时间: 2016-12-15 11:29

不错的源码。必须支持你。
谢谢
作者: 小爬虫    时间: 2016-12-15 11:53
楼主辛苦了，源码收下了
作者: xshn    时间: 2016-12-15 13:06
感谢分享，这次大奖就是你的啦
作者: steve    时间: 2016-12-15 13:48
好东西啊！！！
作者: 传奇马    时间: 2016-12-15 14:34
这货挺强大
作者: 网上邻居007    时间: 2016-12-15 14:36
速度支持啊
作者: polang001    时间: 2016-12-15 14:43
支持开源~！感谢分享
作者: 蚂蚁软件_萧峰    时间: 2016-12-15 15:04
支持开源~！感谢分享
作者: DerBai    时间: 2016-12-15 15:22
感谢发布原创作品，精易因你更精彩！
作者: 金哥专用    时间: 2016-12-15 15:25
感谢分享！！
作者: rzglei    时间: 2016-12-15 17:47
非常感谢！！
作者: 深邃如海    时间: 2016-12-15 19:02
6666666666666厉害
作者: ajkaos    时间: 2016-12-15 22:35
谢谢分享，祝得大奖
作者: youwoyy    时间: 2016-12-15 22:43
支持一下楼主
作者: liogen    时间: 2016-12-15 22:44
很牛逼的说?
作者: lyhuilin    时间: 2016-12-15 23:08
很牛逼的说?
作者: cants7    时间: 2016-12-15 23:09
#在这里快速回复#支持开源~！感谢分享
作者: gowy111    时间: 2016-12-16 04:13
又一大神膜拜~
作者: 拉面    时间: 2016-12-16 04:55
支持开源~！感谢分享
作者: 包子陈    时间: 2016-12-16 08:08
支持这个，楼主大爱
作者: crystalxp    时间: 2016-12-16 14:04
膜拜~
作者: boxfan111    时间: 2016-12-16 15:27
大神，膜拜下
作者: 咏恒ぃ☆吣    时间: 2016-12-16 15:51
学习吸收~~xia
作者: 萧然    时间: 2016-12-16 16:39
这个是这次开源中最好的了！！
作者: fengyyun    时间: 2016-12-16 17:15
大神，膜拜下
作者: う网淅乄    时间: 2016-12-16 17:53
看了源码 保存到excel代码有问题吧  传进去的参数没有看到利用的 替换都是替换空
作者: 天机科技    时间: 2016-12-16 19:37
う网淅乄 发表于 2016-12-16 17:53
看了源码 保存到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路径))

作者: weed543    时间: 2016-12-16 20:18
一直在用,很好
作者: yuan71058    时间: 2016-12-17 17:35
支持开源~！感谢分享
作者: 咏恒ぃ☆吣    时间: 2016-12-18 21:52
来学习下
作者: huben    时间: 2016-12-20 05:51
支持开源~！感谢分享
作者: boxfan111    时间: 2016-12-20 10:43
支持开源~！感谢分享
作者: 倾风听雨声    时间: 2016-12-21 00:14
支持开源~！感谢分享
作者: yrj86844286    时间: 2016-12-21 20:32
拿了精币就闪。
作者: Hawk    时间: 2016-12-22 01:25
支持一下，也学习
作者: 滑小稽    时间: 2016-12-23 17:10
mark，支持开源~！感谢分享
很好的软件
作者: jfjdjd    时间: 2016-12-25 09:44
谢谢分享。
作者: Ψ恋上金牛座    时间: 2016-12-25 18:26
一直在用,很好
作者: 我叫落年    时间: 2016-12-26 13:03
支持开源 感谢
作者: 陌落    时间: 2016-12-31 13:32
学习..............
作者: 740949011    时间: 2017-1-1 01:59
今天一分都没有了，明天来评价
作者: 1574455213    时间: 2017-1-9 15:31
拿了精币
作者: dada22537    时间: 2017-1-10 09:11
学习 学习
作者: jable    时间: 2017-1-11 21:34
顶起来。。。。。。。。。。。。。。。。。。。。。。。。。。。。
作者: 浪漫    时间: 2017-1-15 10:44
提示: 作者被禁止或删除 内容自动屏蔽
作者: asuralove    时间: 2017-1-15 12:10
正好需要看看怎么样~~
作者: taozi002    时间: 2017-1-20 09:12
拿钱走人......
作者: yueying    时间: 2017-1-20 09:24
顶一下，楼主太好了。
作者: 小昱    时间: 2017-2-2 00:41
支持开源~！感谢分享
作者: xxo001    时间: 2017-2-4 21:11
支持！感谢大大分享
作者: fgs720319    时间: 2017-2-6 15:51
高手啊，认真学习来啦哈哈
作者: ctqch    时间: 2017-3-30 12:43
非常感谢！！
作者: qq2278322    时间: 2017-3-30 13:03
这个不错。。。支持下
作者: cwgwww    时间: 2017-4-27 02:20
正好需要,谢谢
作者: waitwuyi    时间: 2017-8-4 20:12
这个可要顶
作者: easydream    时间: 2017-9-10 10:49
下载学习支持大神
作者: maikell    时间: 2017-10-17 17:24
谢谢分享 刚刚需要
作者: ybzgood    时间: 2018-11-2 14:15
谢谢分享 刚刚需要
作者: j519067786    时间: 2019-8-7 09:24
没有例子吗。我连接mysql 没用啊
作者: 小汐哟u    时间: 2019-9-15 23:01
小小心意，意思一下
作者: 起風了    时间: 2019-9-29 20:34
小小心意，意思一下
作者: 天生表演家    时间: 2019-10-9 16:34
这个支持连接EXCEL2013版本吗？
作者: By未命名    时间: 2021-9-8 20:18
能不能修复下，我测试读取634000条时，记录集就无法返回条数了，但能读取
作者: 王东林    时间: 2021-9-22 21:53
谢谢分享
作者: 大白图    时间: 2021-11-10 14:05
作者: n0ouuay0    时间: 2021-11-10 14:06
作者: 阳明先生    时间: 2021-11-10 14:06
作者: lm88818    时间: 2021-11-22 09:46
支持开源~！感谢分享!
作者: tmtony    时间: 2021-11-29 08:38
谢谢分享
作者: skyflb    时间: 2021-12-3 01:03
入门级ADO类v1.33H,通杀win平台数据库!
作者: lq850815    时间: 2021-12-4 07:55
支持开源~！感谢分享!
作者: kolins007    时间: 2021-12-5 20:06
谢谢 楼主分享



欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4