详解易语言链接DB2 OLEDB实例方法

在本文里我们给大家整理了关于易语言链接DB2 OLEDB的实例方法，有需要的朋友们可以参考学习下。

很多朋友在写易语言软件的时候需要用到链接DB2等内容，大家参阅下。

‘database=rbsj；这是连数据库名，Hostname=PC-200806261910;”这是自己的计算机的名字，

如果真 (数据库连接.连接 (“Provider=IBMDADB2;database=rbsj;Hostname=PC-200806261910;”))

sql ＝ “SELECT * FROM ADMIN.RBSJ ”

				?

									.版本 2

									.支持库 eDB

									.支持库 eGrid

									.如果真 (记录集.打开 (sql, #SQL语句) ＝ 真)

									' 如果真 (记录集.打开并排序 (“日报数据”, " 编号 排序升"))

									信息框 (“已连接表”, #错误图标, “连接数据库错误”)

									高级表格1.清空数据 ()

									高级表格1.表头行数 ＝ 1

									高级表格1.表头列数 ＝ 0

									高级表格1.行数 ＝ 记录集.记录数量 ＋ 1

									高级表格1.列数 ＝ 记录集.字段数量

									' 高级表格1.置数据 (0, 0, #表格常量.文本型, 到文本 (“标签”))

									.计次循环首 (记录集.字段数量, 变量1)

									高级表格1.置数据 (0, 变量1 － 1, #表格常量.文本型, 记录集.取字段名 (变量1 － 1))

									.计次循环尾 ()

									到首记录 ()

									.计次循环首 (记录集.记录数量, 变量2)

									.计次循环首 (记录集.字段数量, 变量1)

									记录集.读文本 (变量1 － 1, 单元)

									高级表格1.置数据 (变量2, 变量1 － 1, #表格常量.文本型, 单元)

									' 高级表格1.置数据 (变量2, 1 － 1, #表格常量.文本型, 到文本 (记录集.取字段名 (0)))

									.计次循环尾 ()

									记录集.到下一条 ()

									.计次循环尾 ()