详解易语言链接DB2OLEDB实例方法

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

创新互联公司是一家专业提供绿园企业网站建设,专注与做网站、网站建设、html5、小程序制作等业务。10年已为绿园众多企业、政府机构等服务。创新互联专业的建站公司优惠进行中。

‘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)))
.计次循环尾 ()
记录集.到下一条 ()
.计次循环尾 ()

感谢大家对创新互联的支持。


网站标题:详解易语言链接DB2OLEDB实例方法
网站URL:http://pwwzsj.com/article/ppjgoh.html